with SYSTEM; use SYSTEM; with UATL_DATA_TYPES; use UATL_DATA_TYPES; with INTERFACE_DATA_TYPES_488; use INTERFACE_DATA_TYPES_488; package CONTROLLER_488 is task CONTROLLER_488_TASK is pragma PRIORITY(PRIORITY'last-1); entry START; entry BUS_EVENT(AST_INFORMATION : in SYSTEM.UNSIGNED_LONGWORD); pragma AST_ENTRY(BUS_EVENT); entry BUS_TRANSMIT; entry SETUP_IEEE488_DEVICES (I488_DEVICES : in DEVICE_LIST); end CONTROLLER_488_TASK; end CONTROLLER_488;