! Revision history:
!
! 25-JAN-88 PSR  The X bit has been set to zero for Springboard
!

%constinteger X Bit = 0<<17       {permit error returns}

%constinteger -
      Brasil WriteC     =  0,
      Brasil WriteS     =  1,
      Brasil Write0     =  2,
      Brasil NewLine    =  3,
      Brasil ReadC      =  4,
      Brasil CLI        =  5,
      Brasil Byte       =  6,
      Brasil Word       =  7,
      Brasil File       =  8,  Brasil     File X = Brasil     File ! X Bit,
      Brasil Args       =  9,
      Brasil BGet       = 10,
      Brasil Bput       = 11,
      Brasil Multiple   = 12,  Brasil Multiple X = Brasil Multiple ! X Bit,
      Brasil Open       = 13,  Brasil     Open X = Brasil     Open ! X Bit,
      Brasil ReadLine   = 14,
      Brasil Control    = 15,
      Brasil GetEnv     = 16,
      Brasil Exit       = 17,
      Brasil SetEnv     = 18,
      Brasil IntOn      = 19,
      Brasil IntOff     = 20

%constinteger -
      Brasil CallBack     = 21,
      Brasil EnterOS      = 22,
      Brasil BreakPt      = 23,
      Brasil BreakCtrl    = 24,
      Brasil ReadVarValue = 35 ! X Bit,
      Brasil SetVarVal    = 36,
      Brasil WriteI       = 16_100

%external  %routine  %spec Exit   %alias "3L___exit"(%integer Code)