[fpc-pascal] Counting semaphore for free pascal

[Martin Schreiber]

On Tuesday 28 July 2015 20:07:52 kapibara wrote:
>
> FPC doesn't seem to have a general semaphore? I recently attempted to
> implement one, here is the code, plus a working Lazarus demo attached.

MSEgui also has a semaphore implementation, please see sys_sem*() functions in 
lib/kernel/windows/msesysintf1.pas and lib/kernel/linux/msesysintf1.pas.
https://gitlab.com/mseide-msegui/mseide-msegui

Martin