Lines Matching defs:C43004C

36 PROCEDURE C43004C IS  subprogram
38      ZERO : INTEGER := 0;
40      TYPE REC (D : INTEGER := 0) IS RECORD
44      TYPE DREC (DD : INTEGER := ZERO) IS RECORD
48      TYPE REC1 IS RECORD
52      TYPE REC2 IS RECORD
56      TYPE REC3 (D3 : INTEGER := 0) IS RECORD
60      V : REC1;
61      W : REC2;
62      X : REC3;
64      PACKAGE P IS
78      TYPE REC7 IS RECORD
82      Y : REC7;
86      FUNCTION GEN_EQUAL (X, Y : GP) RETURN BOOLEAN;
88      FUNCTION GEN_EQUAL (X, Y : GP) RETURN BOOLEAN IS
93      PACKAGE BODY P IS
170      FUNCTION REC1_EQUAL IS NEW GEN_EQUAL (REC1);
171      FUNCTION REC2_EQUAL IS NEW GEN_EQUAL (REC2);
172      FUNCTION REC3_EQUAL IS NEW GEN_EQUAL (REC3);
173      FUNCTION REC7_EQUAL IS NEW GEN_EQUAL (REC7);