TDOSInfo

type TDOSInfo = packed record

  case Byte of

    0: (

        di_ResList: BPTR;

      );

    1: (

        di_McName: BPTR;

        di_DevInfo: BPTR;

        di_Devices: BPTR;

        di_Handlers: BPTR;

        di_NetHand: APTR;

        di_DevLock: TSignalSemaphore;

        di_EntryLock: TSignalSemaphore;

        di_DeleteLock: TSignalSemaphore;

      );

end;