!*** MODULE $LSYDEF *** !DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN ! ! LSY - Module-Local symbol definition ! ! Common to definitions, references, entry points, and procedure definitions ! PARAMETER LSY$M_WEAK = '00000001'X PARAMETER LSY$M_DEF = '00000002'X PARAMETER LSY$M_UNI = '00000004'X PARAMETER LSY$M_REL = '00000008'X STRUCTURE /LSYDEF/ UNION MAP BYTE LSY$B_GSDTYP ! Type field END MAP MAP ! unsupported type CHARACTER*0 LSY$T_START BYTE %FILL END MAP END UNION BYTE LSY$B_DATYP ! Symbol type UNION MAP INTEGER*2 LSY$W_FLAGS ! Symbol flags END MAP MAP PARAMETER LSY$S_WEAK = 1 PARAMETER LSY$V_WEAK = 0 ! Weak symbol (not used) PARAMETER LSY$S_DEF = 1 PARAMETER LSY$V_DEF = 1 ! Defined symbol PARAMETER LSY$S_UNI = 1 PARAMETER LSY$V_UNI = 2 ! Universal (not used) PARAMETER LSY$S_REL = 1 PARAMETER LSY$V_REL = 3 ! Relocatable BYTE %FILL (1) END MAP END UNION INTEGER*2 LSY$W_ENVINDX ! Environment index END STRUCTURE ! LSYDEF !DEC$ END OPTIONS