type semaphore=record
                value interger；
                L：list of process
                 end
汇编语言吗？  求大神 说一下这个东东要学什么才能看懂

不象汇编语言

看不懂

procedure wait(S)
      var S:semaphore;
      begin
        S.vbalue<S.value-1;
        if S.value< then block(S.L);
     end
再发一段

这改成什么格式可以用？

这像是C写的硬盘上的问题

初学者，请多多关照

pascal

貌似是pascal

类parscal语言！