$SAVE NOLIST
/*****************************************************************************
 * NGTTYP.LIT:	Object type codes used in the Nucleus system call RQ$GET$TYPE.
 *****************************************************************************/

DECLARE
	T$JOB        LITERALLY  '1',
	T$TASK       LITERALLY  '2',
	T$MAILBOX    LITERALLY  '3',
	T$SEMAPHORE  LITERALLY  '4',
	T$REGION     LITERALLY  '5',
	T$SEGMENT    LITERALLY  '6',
	T$EXTENSION  LITERALLY  '7',
	T$USER       LITERALLY  '100H',
	T$CONNECTION LITERALLY  '101H',
	T$IO$JOB     LITERALLY  '300H',
	T$LOG$DEVICE LITERALLY  '301H';

$RESTORE