Unit m_Pipe; {$I M_OPS.PAS} Interface {$IFDEF UNIX} Uses m_Pipe_Disk; Type TPipe = Class(TPipeDisk); {$ENDIF} {$IFDEF WINDOWS} Uses m_Pipe_Disk; Type TPipe = Class(TPipeDisk); {$ENDIF} {$IFDEF OS2} Uses m_Pipe_Disk; Type TPipe = Class(TPipeDisk); {$ENDIF} Implementation End.