{$ifndef EXEC_DEVICES_H}
CONST EXEC_DEVICES_H=0;
{$ifndef EXEC_LIBRARIES_H;incl"exec/libraries.h";endif}
{$ifndef EXEC_PORTS_H;incl"exec/ports.h";endif}
TYPE p_Device = ^Device;
     Device = record
                dd_Library:_Library
              end;
     p_Unit = ^Unit;
     Unit = record
              unit_MsgPort: MsgPort;
              unit_flags,unit_pad: Byte;
              unit_OpenCnt: Word
            end;
CONST UNITF_ACTIVE = $1;
      UNITF_INTASK = $2;
{$endif}
{$ifndef EXEC_DEVICES_LIB}
Const EXEC_DEVICES_LIB=0;
Library SysBase:
-432: Procedure AddDevice(a1: p_Device);
-438: Procedure RemDevice(a1: p_Device);
-444: Function OpenDevice(a0: stryng; d0: Long; a1: Ptr; d1: Long): Long;
-450: Procedure CloseDevice(a1: Ptr)
end;
{$endif}
