[fpc-pascal] How to implement a circular buffer object in pascal?

[Bo Berglund]

I would like to create a buffer into which a thread can push incoming
data and the main thread can extract it for processing.
Data are coming from the serial port in a worker thread and should be
consumed by the main thread. The data is a byte stream.

Are there any good examples available?
I have only implemented such systems in C on embedded platforms so it
is not pascal enough to easily port.


-- 
Bo Berglund
Developer in Sweden