/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
H A D | sem_ch3.adb | 8354 Digs_Val : Uint; variable 8424 Digs_Val := Expr_Value (Digs_Expr); 8426 if Digs_Val > 18 then 8427 Digs_Val := UI_From_Int (+18); 8431 Set_Digits_Value (Implicit_Base, Digs_Val); 8432 Bound_Val := UR_From_Uint (10 ** Digs_Val - 1) * Delta_Val; 8494 Set_Digits_Value (T, Digs_Val); 9650 Digs_Val : Uint; variable 9666 if Digs_Val > Digits_Value (E) then 9701 Digs_Val := Expr_Value (Digs); [all …]
|
H A D | sem_ch12.adb | 1249 Digs_Val : constant Uint := Uint_6; constant 1258 Set_Digits_Value (Base, Digs_Val); 1274 Set_Digits_Value (T, Digs_Val);
|
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
H A D | sem_ch3.adb | 8354 Digs_Val : Uint; variable 8424 Digs_Val := Expr_Value (Digs_Expr); 8426 if Digs_Val > 18 then 8427 Digs_Val := UI_From_Int (+18); 8431 Set_Digits_Value (Implicit_Base, Digs_Val); 8432 Bound_Val := UR_From_Uint (10 ** Digs_Val - 1) * Delta_Val; 8494 Set_Digits_Value (T, Digs_Val); 9650 Digs_Val : Uint; variable 9666 if Digs_Val > Digits_Value (E) then 9701 Digs_Val := Expr_Value (Digs); [all …]
|
H A D | sem_ch12.adb | 1249 Digs_Val : constant Uint := Uint_6; constant 1258 Set_Digits_Value (Base, Digs_Val); 1274 Set_Digits_Value (T, Digs_Val);
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 14790 Digs_Val : Uint; variable 14861 Digs_Val := Expr_Value (Digs_Expr); 14863 if Digs_Val > 18 then 14864 Digs_Val := UI_From_Int (+18); 14933 Set_Digits_Value (T, Digs_Val); 17680 Digs_Val : Uint; variable 17703 if Digs_Val > Digits_Value (E) then 17748 if Digs_Val > Max_Digs_Val then 17779 Digs_Val := Expr_Value (Digs); 17787 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 14790 Digs_Val : Uint; variable 14861 Digs_Val := Expr_Value (Digs_Expr); 14863 if Digs_Val > 18 then 14864 Digs_Val := UI_From_Int (+18); 14933 Set_Digits_Value (T, Digs_Val); 17680 Digs_Val : Uint; variable 17703 if Digs_Val > Digits_Value (E) then 17748 if Digs_Val > Max_Digs_Val then 17779 Digs_Val := Expr_Value (Digs); 17787 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/ |
H A D | sem_ch3.adb | 14790 Digs_Val : Uint; variable 14861 Digs_Val := Expr_Value (Digs_Expr); 14863 if Digs_Val > 18 then 14864 Digs_Val := UI_From_Int (+18); 14933 Set_Digits_Value (T, Digs_Val); 17680 Digs_Val : Uint; variable 17703 if Digs_Val > Digits_Value (E) then 17748 if Digs_Val > Max_Digs_Val then 17779 Digs_Val := Expr_Value (Digs); 17787 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
H A D | sem_ch3.adb | 14048 Digs_Val : Uint; variable 14119 Digs_Val := Expr_Value (Digs_Expr); 14121 if Digs_Val > 18 then 14122 Digs_Val := UI_From_Int (+18); 14191 Set_Digits_Value (T, Digs_Val); 16867 Digs_Val : Uint; variable 16890 if Digs_Val > Digits_Value (E) then 16935 if Digs_Val > Max_Digs_Val then 16966 Digs_Val := Expr_Value (Digs); 16974 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc48/gcc-4.8.5/gcc/ada/ |
H A D | sem_ch3.adb | 12742 Digs_Val : Uint; variable 12813 Digs_Val := Expr_Value (Digs_Expr); 12815 if Digs_Val > 18 then 12816 Digs_Val := UI_From_Int (+18); 12883 Set_Digits_Value (T, Digs_Val); 15501 Digs_Val : Uint; variable 15524 if Digs_Val > Digits_Value (E) then 15578 if Digs_Val > Max_Digs_Val then 15609 Digs_Val := Expr_Value (Digs); 15617 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/devel/mingw32-gcc/gcc-4.8.1/gcc/ada/ |
H A D | sem_ch3.adb | 12742 Digs_Val : Uint; variable 12813 Digs_Val := Expr_Value (Digs_Expr); 12815 if Digs_Val > 18 then 12816 Digs_Val := UI_From_Int (+18); 12883 Set_Digits_Value (T, Digs_Val); 15501 Digs_Val : Uint; variable 15524 if Digs_Val > Digits_Value (E) then 15578 if Digs_Val > Max_Digs_Val then 15609 Digs_Val := Expr_Value (Digs); 15617 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 14790 Digs_Val : Uint; variable 14861 Digs_Val := Expr_Value (Digs_Expr); 14863 if Digs_Val > 18 then 14864 Digs_Val := UI_From_Int (+18); 14933 Set_Digits_Value (T, Digs_Val); 17680 Digs_Val : Uint; variable 17703 if Digs_Val > Digits_Value (E) then 17748 if Digs_Val > Max_Digs_Val then 17779 Digs_Val := Expr_Value (Digs); 17787 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/ |
H A D | sem_ch3.adb | 13158 Digs_Val : Uint; variable 13229 Digs_Val := Expr_Value (Digs_Expr); 13231 if Digs_Val > 18 then 13232 Digs_Val := UI_From_Int (+18); 13299 Set_Digits_Value (T, Digs_Val); 15922 Digs_Val : Uint; variable 15945 if Digs_Val > Digits_Value (E) then 15999 if Digs_Val > Max_Digs_Val then 16030 Digs_Val := Expr_Value (Digs); 16038 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 14790 Digs_Val : Uint; variable 14861 Digs_Val := Expr_Value (Digs_Expr); 14863 if Digs_Val > 18 then 14864 Digs_Val := UI_From_Int (+18); 14933 Set_Digits_Value (T, Digs_Val); 17680 Digs_Val : Uint; variable 17703 if Digs_Val > Digits_Value (E) then 17748 if Digs_Val > Max_Digs_Val then 17779 Digs_Val := Expr_Value (Digs); 17787 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/ |
H A D | sem_ch3.adb | 14790 Digs_Val : Uint; variable 14861 Digs_Val := Expr_Value (Digs_Expr); 14863 if Digs_Val > 18 then 14864 Digs_Val := UI_From_Int (+18); 14933 Set_Digits_Value (T, Digs_Val); 17680 Digs_Val : Uint; variable 17703 if Digs_Val > Digits_Value (E) then 17748 if Digs_Val > Max_Digs_Val then 17779 Digs_Val := Expr_Value (Digs); 17787 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/ |
H A D | sem_ch3.adb | 14048 Digs_Val : Uint; variable 14119 Digs_Val := Expr_Value (Digs_Expr); 14121 if Digs_Val > 18 then 14122 Digs_Val := UI_From_Int (+18); 14191 Set_Digits_Value (T, Digs_Val); 16867 Digs_Val : Uint; variable 16890 if Digs_Val > Digits_Value (E) then 16935 if Digs_Val > Max_Digs_Val then 16966 Digs_Val := Expr_Value (Digs); 16974 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | sem_ch3.adb | 15366 Digs_Val : Uint; variable 15437 Digs_Val := Expr_Value (Digs_Expr); 15439 if Digs_Val > Max_Digits then 15510 Set_Digits_Value (T, Digs_Val); 18392 Digs_Val : Uint; variable 18419 if Digs_Val > Digits_Value (E) then 18486 if Digs_Val > Max_Digs_Val then 18517 Digs_Val := Expr_Value (Digs); 18525 if Digs_Val > Max_Digs_Val then 18587 if Digs_Val >= Uint_1 then [all …]
|
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 14904 Digs_Val : Uint; variable 14975 Digs_Val := Expr_Value (Digs_Expr); 14977 if Digs_Val > 18 then 14978 Digs_Val := UI_From_Int (+18); 15047 Set_Digits_Value (T, Digs_Val); 17803 Digs_Val : Uint; variable 17826 if Digs_Val > Digits_Value (E) then 17871 if Digs_Val > Max_Digs_Val then 17902 Digs_Val := Expr_Value (Digs); 17910 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | sem_ch3.adb | 14975 Digs_Val : Uint; variable 15046 Digs_Val := Expr_Value (Digs_Expr); 15048 if Digs_Val > Max_Digits then 15051 Digs_Val := UI_From_Int (Max_Digits); 15119 Set_Digits_Value (T, Digs_Val); 17920 Digs_Val : Uint; variable 17947 if Digs_Val > Digits_Value (E) then 18014 if Digs_Val > Max_Digs_Val then 18045 Digs_Val := Expr_Value (Digs); 18053 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/ |
H A D | sem_ch3.adb | 15000 Digs_Val : Uint; variable 15071 Digs_Val := Expr_Value (Digs_Expr); 15073 if Digs_Val > 18 then 15074 Digs_Val := UI_From_Int (+18); 15143 Set_Digits_Value (T, Digs_Val); 17908 Digs_Val : Uint; variable 17935 if Digs_Val > Digits_Value (E) then 18002 if Digs_Val > Max_Digs_Val then 18033 Digs_Val := Expr_Value (Digs); 18041 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/ |
H A D | sem_ch3.adb | 14975 Digs_Val : Uint; variable 15046 Digs_Val := Expr_Value (Digs_Expr); 15048 if Digs_Val > Max_Digits then 15051 Digs_Val := UI_From_Int (Max_Digits); 15119 Set_Digits_Value (T, Digs_Val); 17920 Digs_Val : Uint; variable 17947 if Digs_Val > Digits_Value (E) then 18014 if Digs_Val > Max_Digs_Val then 18045 Digs_Val := Expr_Value (Digs); 18053 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/ |
H A D | sem_ch3.adb | 15000 Digs_Val : Uint; variable 15071 Digs_Val := Expr_Value (Digs_Expr); 15073 if Digs_Val > 18 then 15074 Digs_Val := UI_From_Int (+18); 15143 Set_Digits_Value (T, Digs_Val); 17908 Digs_Val : Uint; variable 17935 if Digs_Val > Digits_Value (E) then 18002 if Digs_Val > Max_Digs_Val then 18033 Digs_Val := Expr_Value (Digs); 18041 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/ |
H A D | sem_ch3.adb | 14975 Digs_Val : Uint; variable 15046 Digs_Val := Expr_Value (Digs_Expr); 15048 if Digs_Val > Max_Digits then 15051 Digs_Val := UI_From_Int (Max_Digits); 15119 Set_Digits_Value (T, Digs_Val); 17920 Digs_Val : Uint; variable 17947 if Digs_Val > Digits_Value (E) then 18014 if Digs_Val > Max_Digs_Val then 18045 Digs_Val := Expr_Value (Digs); 18053 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/ |
H A D | sem_ch3.adb | 15000 Digs_Val : Uint; variable 15071 Digs_Val := Expr_Value (Digs_Expr); 15073 if Digs_Val > 18 then 15074 Digs_Val := UI_From_Int (+18); 15143 Set_Digits_Value (T, Digs_Val); 17908 Digs_Val : Uint; variable 17935 if Digs_Val > Digits_Value (E) then 18002 if Digs_Val > Max_Digs_Val then 18033 Digs_Val := Expr_Value (Digs); 18041 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/ |
H A D | sem_ch3.adb | 14904 Digs_Val : Uint; variable 14975 Digs_Val := Expr_Value (Digs_Expr); 14977 if Digs_Val > 18 then 14978 Digs_Val := UI_From_Int (+18); 15047 Set_Digits_Value (T, Digs_Val); 17803 Digs_Val : Uint; variable 17826 if Digs_Val > Digits_Value (E) then 17871 if Digs_Val > Max_Digs_Val then 17902 Digs_Val := Expr_Value (Digs); 17910 if Digs_Val > Max_Digs_Val then [all …]
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/ |
H A D | sem_ch3.adb | 14904 Digs_Val : Uint; variable 14975 Digs_Val := Expr_Value (Digs_Expr); 14977 if Digs_Val > 18 then 14978 Digs_Val := UI_From_Int (+18); 15047 Set_Digits_Value (T, Digs_Val); 17803 Digs_Val : Uint; variable 17826 if Digs_Val > Digits_Value (E) then 17871 if Digs_Val > Max_Digs_Val then 17902 Digs_Val := Expr_Value (Digs); 17910 if Digs_Val > Max_Digs_Val then [all …]
|