Lines Matching refs:Lbit
413 Lbit : constant Uint := Static_Integer (Last_Bit (CC)); constant
418 if Lbit >= Max_Machine_Scalar_Size then
423 if Fbit = 0 and then (Lbit + 1) mod SSU = 0 then
450 Error_Msg_Uint_1 := Lbit + 1;
456 if (Lbit + 1) mod SSU /= 0 then
6875 Lbit : Uint; variable
7057 Lbit := Static_Integer (Last_Bit (CC));
7061 and then Lbit /= No_Uint
7072 elsif Lbit < Fbit - 1 then
7185 Lbit := Lbit + UI_From_Int (SSU) * Posit;
7188 and then RM_Size (Rectype) <= Lbit
7196 Set_Esize (Comp, 1 + (Lbit - Fbit));
7215 if Hbit < Lbit then
7216 Hbit := Lbit;
7233 Set_Esize (Ocomp, 1 + (Lbit - Fbit));
9912 Lbit : Uint; variable
10064 Lbit := Fbit + Esize (Comp) - 1;
10173 Max_Bit_So_Far := Lbit;
10178 and then RM_Size (Rectype) <= Lbit
10204 if Hbit < Lbit then
10205 Hbit := Lbit;
10283 OC_Lbit (OC_Count) := Lbit;