-- FIFO.sak
-- Creaeted by Suzuki 20-Nov-81 12:54:15

DIRECTORY
  SakuraRT: TYPE;

FIFO: DEFINITIONS
  
  = BEGIN
  FIFOFunc: PROC [size: CARDINAL, 
                  Init, WriteRequest, ReadRequest: SakuraRT.Handle, 
                  DIn: SakuraRT.Handle, 
                  SpaceAv, DataAv: SakuraRT.Handle, 
                  DOut: SakuraRT.Handle];
  
  END.