DataMuseum.dk

top - download

    Length: 4841 (0x12e9)
    Types: TextFile
    Names: »V«

└─⟦afbc8121e⟧ Bits:30000532 8mm tape, Rational 1000, MC68020_OS2000 7_2_2
    └─ ⟦77aa8350c⟧ »DATA« 
        └─⟦f794ecd1d⟧ 
            └─⟦24d1ddd49⟧ 
                └─⟦this⟧ 

TextFile

--    The use of this system is subject to the software license terms and
--    conditions agreed upon between Rational and the Customer.
--
--                Copyright 1988 by Rational.
--
--                          RESTRICTED RIGHTS LEGEND
--
--    Use, duplication, or disclosure by the Government is subject to
--    restrictions as set forth in subdivision (b)(3)(ii) of the Rights in
--    Technical Data and Computer Software clause at 52.227-7013.
--
--
--                Rational
--                3320 Scott Boulevard
--                Santa Clara, California 95054-3197
--
--   PROPRIETARY AND CONFIDENTIAL INFORMATION OF RATIONAL;
--   USE OR COPYING WITHOUT EXPRESS WRITTEN AUTHORIZATION
--   IS STRICTLY PROHIBITED.  THIS MATERIAL IS PROTECTED AS
--   AN UNPUBLISHED WORK UNDER THE U.S. COPYRIGHT ACT OF
--   1976.  CREATED 1988.  ALL RIGHTS RESERVED.
--
--


package Runtime_Ids is

    -- This package defines the types and constants
    -- used in the pragmas which identify the units
    -- of the runtime to the debugger.

    type Compunit_Id is new Integer;

    Runtime_Compunit : constant Compunit_Id := 17;

    type Subprogram_Id is new Integer;

    Internal : constant Subprogram_Id := 16#0_00#;

    Enum_Image : constant Subprogram_Id := 16#1_00#;
    Enum_Pos   : constant Subprogram_Id := 16#1_01#;
    Enum_Pred  : constant Subprogram_Id := 16#1_02#;
    Enum_Succ  : constant Subprogram_Id := 16#1_03#;
    Enum_Value : constant Subprogram_Id := 16#1_04#;
    Enum_Width : constant Subprogram_Id := 16#1_05#;
    Int_Image  : constant Subprogram_Id := 16#1_06#;
    Int_Value  : constant Subprogram_Id := 16#1_07#;
    Int_Width  : constant Subprogram_Id := 16#1_08#;

    Allocate_Collection   : constant Subprogram_Id := 16#2_00#;
    Allocate_Fixed_Cell   : constant Subprogram_Id := 16#2_01#;
    Deallocate_Collection : constant Subprogram_Id := 16#2_02#;
    Deallocate_Fixed_Cell : constant Subprogram_Id := 16#2_03#;
    Collection_Size       : constant Subprogram_Id := 16#2_04#;

    Initialize_Master             : constant Subprogram_Id := 16#3_00#;
    Create_Task                   : constant Subprogram_Id := 16#3_01#;
    Activate_Offspring            : constant Subprogram_Id := 16#3_02#;
    Notify_Parent                 : constant Subprogram_Id := 16#3_03#;
    Task_End                      : constant Subprogram_Id := 16#3_04#;
    Await_Dependents              : constant Subprogram_Id := 16#3_05#;
    Task_Completion               : constant Subprogram_Id := 16#3_06#;
    Terminate_Allocated_Offspring : constant Subprogram_Id := 16#3_07#;
    Terminate_Dependent_Offspring : constant Subprogram_Id := 16#3_08#;
    Entry_Call                    : constant Subprogram_Id := 16#3_09#;
    Conditional_Entry_Call        : constant Subprogram_Id := 16#3_0A#;
    Timed_Entry_Call              : constant Subprogram_Id := 16#3_0B#;
    Begin_Accept                  : constant Subprogram_Id := 16#3_0C#;
    End_Accept                    : constant Subprogram_Id := 16#3_0D#;
    Quick_Accept                  : constant Subprogram_Id := 16#3_0E#;
    Close_Alternatives            : constant Subprogram_Id := 16#3_0F#;
    Open_Delay                    : constant Subprogram_Id := 16#3_10#;
    Open_Entry                    : constant Subprogram_Id := 16#3_11#;
    Open_Terminate                : constant Subprogram_Id := 16#3_12#;
    Select_Rendezvous             : constant Subprogram_Id := 16#3_13#;
    Abort_Multiple_Tasks          : constant Subprogram_Id := 16#3_14#;
    Check_Return_Task             : constant Subprogram_Id := 16#3_15#;
    Delay_Statement               : constant Subprogram_Id := 16#3_16#;
    Entry_Count                   : constant Subprogram_Id := 16#3_17#;
    Task_Callable                 : constant Subprogram_Id := 16#3_18#;
    Task_Stack_Size               : constant Subprogram_Id := 16#3_19#;
    Task_Terminated               : constant Subprogram_Id := 16#3_1A#;

    Raise_Exception        : constant Subprogram_Id := 16#4_00#;
    Raise_Constraint_Error : constant Subprogram_Id := 16#4_01#;
    Propagate_Exception    : constant Subprogram_Id := 16#4_02#;
    Stack_Check            : constant Subprogram_Id := 16#4_03#;

    Mantissa                : constant Subprogram_Id := 16#5_00#;
    Large                   : constant Subprogram_Id := 16#5_01#;
    Fixed_Multiply          : constant Subprogram_Id := 16#5_02#;
    Compare_8_Bit_Unsigned  : constant Subprogram_Id := 16#5_03#;
    Compare_8_Bit_Signed    : constant Subprogram_Id := 16#5_04#;
    Compare_16_Bit_Unsigned : constant Subprogram_Id := 16#5_05#;
    Compare_16_Bit_Signed   : constant Subprogram_Id := 16#5_06#;
    Compare_32_Bit_Unsigned : constant Subprogram_Id := 16#5_07#;
    Compare_32_Bit_Signed   : constant Subprogram_Id := 16#5_08#;

end Runtime_Ids;