Lines Matching defs:Initialize
40 procedure Initialize (Mode1 : Character; Mode2 : Character) is subprogram
41 C1 : Character := Mode1;
42 C2 : Character := Mode2;
44 procedure Get_Env_Value_Ptr (Name, Length, Ptr : Address);
47 subtype String2 is String (1 .. 2);
48 type String2_Ptr is access all String2;
50 Env_Value_Ptr : aliased String2_Ptr;
51 Env_Value_Length : aliased Integer;
53 EV_Val : aliased constant String :=
56 B : Byte1;
58 EFloat : constant Boolean := Long_Long_Float'Size > Long_Float'Size;
61 AFloat : constant Boolean :=
65 type ByteLF is array (0 .. 7 - 2 * Boolean'Pos (AFloat)) of Byte1;
96 IV_Isf : aliased Byte4; -- Initialize short float argument
97 IV_Ifl : aliased Byte4; -- Initialize float argument
98 IV_Ilf : aliased ByteLF; -- Initialize long float argument
99 IV_Ill : aliased ByteLLF; -- Initialize long long float argument