Monitor: Problemas Clássicos
- O BUFFER Circular (cont.)
UnSpool: Entry(Contents); declare(Contents)character(*)varying; if #Full=0 then wait(BufferOccupied); Contents=Buffer(Head); Head=mod(Head,#Buffers)+1; #Full=#Full-1; signal(BufferVacant); end UnSpool;