! *** PREDECLARED TYPES %IF %DECLARED ( %BASIC$QUADWORD_DECLARED ) = 0 %THEN RECORD BASIC$QUADWORD LONG FILL ( 2 ) END RECORD %LET %BASIC$QUADWORD_DECLARED = 1 %END %IF %IF %DECLARED ( %BASIC$OCTAWORD_DECLARED ) = 0 %THEN RECORD BASIC$OCTAWORD LONG FILL ( 4 ) END RECORD %LET %BASIC$OCTAWORD_DECLARED = 1 %END %IF %IF %DECLARED ( %BASIC$HFLOAT_AXP_DECLARED ) = 0 %THEN RECORD BASIC$HFLOAT_AXP LONG FILL ( 4 ) END RECORD %LET %BASIC$HFLOAT_AXP_DECLARED = 1 %END %IF %IF %DECLARED ( %BASIC$F_FLOATING_COMPLEX_DECL ) = 0 %THEN RECORD BASIC$F_FLOATING_COMPLEX SINGLE REAL_PART SINGLE IMAGINARY_PART END RECORD %LET %BASIC$F_FLOATING_COMPLEX_DECL = 1 %END %IF %IF %DECLARED ( %BASIC$D_FLOATING_COMPLEX_DECL ) = 0 %THEN RECORD BASIC$D_FLOATING_COMPLEX DOUBLE REAL_PART DOUBLE IMAGINARY_PART END RECORD %LET %BASIC$D_FLOATING_COMPLEX_DECL = 1 %END %IF %IF %DECLARED ( %BASIC$G_FLOATING_COMPLEX_DECL ) = 0 %THEN RECORD BASIC$G_FLOATING_COMPLEX GFLOAT REAL_PART GFLOAT IMAGINARY_PART END RECORD %LET %BASIC$G_FLOATING_COMPLEX_DECL = 1 %END %IF %IF %DECLARED ( %BASIC$H_FLOAT_AXP_CMPLX_DCL ) = 0 %THEN RECORD BASIC$H_FLOATING_COMPLEX_AXP BASIC$HFLOAT_AXP REAL_PART BASIC$HFLOAT_AXP IMAGINARY_PART END RECORD %LET %BASIC$H_FLOAT_AXP_CMPLX_DCL = 1 %END %IF ! + ! ! Constants defining single-transition operations ! DECLARE LONG CONSTANT CST$K_CPU_STOP = 1 DECLARE LONG CONSTANT CST$K_CPU_MIGRATE = 2 DECLARE LONG CONSTANT CST$K_CPU_START = 3 DECLARE LONG CONSTANT CST$K_CPU_ASSIGN = 4 DECLARE LONG CONSTANT CST$K_CPU_DEASSIGN = 5 DECLARE LONG CONSTANT CST$K_CPU_FAILOVER = 6 DECLARE LONG CONSTANT CST$K_CPU_POWER_OFF = 7 DECLARE LONG CONSTANT CST$K_CPU_POWER_ON = 8 ! ! Constants defining multiple operation masks. The starting ! position of these values must be in the upper word to save ! space for future single-operation codes ! DECLARE LONG CONSTANT CST$m_reserved1 = x'000000FF' DECLARE LONG CONSTANT CST$M_CPU_STOP = x'00000100' DECLARE LONG CONSTANT CST$M_CPU_MIGRATE = x'00000200' DECLARE LONG CONSTANT CST$M_CPU_START = x'00000400' DECLARE LONG CONSTANT CST$M_CPU_ASSIGN = x'00000800' DECLARE LONG CONSTANT CST$M_CPU_DEASSIGN = x'00001000' DECLARE LONG CONSTANT CST$M_CPU_FAILOVER = x'00002000' DECLARE LONG CONSTANT CST$M_CPU_POWER_OFF = x'00004000' DECLARE LONG CONSTANT CST$M_CPU_POWER_ON = x'00008000' DECLARE LONG CONSTANT CST$S_CST_MASK = 2 record CST_MASK group CST$R_CST_MASK WORD reserved1_bits ! COMMENT ADDED BY SDL - reserved1_bits contains bits reserved1 through CPU_POWER_ON end group CST$R_CST_MASK end record CST_MASK ! ! Constants defining target software nodes for reassignment ! DECLARE LONG CONSTANT CST$K_PARTITION = -1 DECLARE LONG CONSTANT CST$K_COMMUNITY = -2 DECLARE LONG CONSTANT CST$K_HARD_PARTITION = -3 DECLARE LONG CONSTANT CST$K_SW_ROOT = -4 ! ! Constants defining CPU types ! DECLARE LONG CONSTANT CST$K_ANY_OWNED_CPU = -1 DECLARE LONG CONSTANT CST$K_ANY_ACTIVE_CPU = -2 DECLARE LONG CONSTANT CST$K_ANY_STOPPED_CPU = -3 DECLARE LONG CONSTANT CST$K_ANY_UNOWNED_CPU = -4 ! ! Constants defining flag parameter characteristics ! DECLARE LONG CONSTANT CST$M_CPU_DEFAULT_CAPABILITIES = x'00000001' DECLARE LONG CONSTANT CST$M_CPU_ALLOW_ORPHANS = x'00000002' DECLARE LONG CONSTANT CST$M_CPU_DECONFIGURE = x'00000004' DECLARE LONG CONSTANT CST$S_CST_FLAGS = 1 record CST_FLAGS group CST$R_CST_FLAGS BYTE CPU_DEFAULT_CAPABILITIES_bits ! COMMENT ADDED BY SDL - CPU_DEFAULT_CAPABILITIES_bits contains bits & ! CPU_DEFAULT_CAPABILITIES through FILL_116_ end group CST$R_CST_FLAGS end record CST_FLAGS