Home
last modified time | relevance | path

Searched refs:Mod_Expr (Results 1 – 25 of 39) sorted by relevance

12

/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/
H A Dsem_ch3.adb19241 Mod_Expr : constant Node_Id := Expression (Def); constant
19280 and then Nkind (Mod_Expr) = N_Op_Multiply
19281 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19282 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19284 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19292 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19298 if not Is_OK_Static_Expression (Mod_Expr) then
19303 M_Val := Expr_Value (Mod_Expr);
19312 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19321 Make_Range (Sloc (Mod_Expr),
[all …]
H A Dexp_ch4.adb4055 Mod_Expr : constant Node_Id := New_Op_Node (N_Op_Mod, Loc); constant
4069 Set_Left_Opnd (Mod_Expr,
4103 Set_Left_Opnd (Mod_Expr, Op_Expr);
4106 Set_Right_Opnd (Mod_Expr,
4110 Unchecked_Convert_To (Typ, Mod_Expr));
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/
H A Dsem_ch3.adb19241 Mod_Expr : constant Node_Id := Expression (Def); constant
19280 and then Nkind (Mod_Expr) = N_Op_Multiply
19281 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19282 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19284 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19292 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19298 if not Is_OK_Static_Expression (Mod_Expr) then
19303 M_Val := Expr_Value (Mod_Expr);
19312 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19321 Make_Range (Sloc (Mod_Expr),
[all …]
H A Dexp_ch4.adb4055 Mod_Expr : constant Node_Id := New_Op_Node (N_Op_Mod, Loc); constant
4069 Set_Left_Opnd (Mod_Expr,
4103 Set_Left_Opnd (Mod_Expr, Op_Expr);
4106 Set_Right_Opnd (Mod_Expr,
4110 Unchecked_Convert_To (Typ, Mod_Expr));
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/
H A Dsem_ch3.adb19241 Mod_Expr : constant Node_Id := Expression (Def); constant
19280 and then Nkind (Mod_Expr) = N_Op_Multiply
19281 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19282 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19284 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19292 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19298 if not Is_OK_Static_Expression (Mod_Expr) then
19303 M_Val := Expr_Value (Mod_Expr);
19312 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19321 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/
H A Dsem_ch3.adb18378 Mod_Expr : constant Node_Id := Expression (Def); constant
18417 and then Nkind (Mod_Expr) = N_Op_Multiply
18418 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
18419 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
18421 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
18429 Analyze_And_Resolve (Mod_Expr, Any_Integer);
18435 if not Is_OK_Static_Expression (Mod_Expr) then
18440 M_Val := Expr_Value (Mod_Expr);
18449 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
18458 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/
H A Dsem_ch3.adb19241 Mod_Expr : constant Node_Id := Expression (Def); constant
19280 and then Nkind (Mod_Expr) = N_Op_Multiply
19281 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19282 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19284 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19292 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19298 if not Is_OK_Static_Expression (Mod_Expr) then
19303 M_Val := Expr_Value (Mod_Expr);
19312 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19321 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/
H A Dsem_ch3.adb19241 Mod_Expr : constant Node_Id := Expression (Def); constant
19280 and then Nkind (Mod_Expr) = N_Op_Multiply
19281 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19282 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19284 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19292 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19298 if not Is_OK_Static_Expression (Mod_Expr) then
19303 M_Val := Expr_Value (Mod_Expr);
19312 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19321 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/
H A Dsem_ch3.adb19241 Mod_Expr : constant Node_Id := Expression (Def); constant
19280 and then Nkind (Mod_Expr) = N_Op_Multiply
19281 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19282 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19284 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19292 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19298 if not Is_OK_Static_Expression (Mod_Expr) then
19303 M_Val := Expr_Value (Mod_Expr);
19312 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19321 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/
H A Dsem_ch3.adb18378 Mod_Expr : constant Node_Id := Expression (Def); constant
18417 and then Nkind (Mod_Expr) = N_Op_Multiply
18418 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
18419 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
18421 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
18429 Analyze_And_Resolve (Mod_Expr, Any_Integer);
18435 if not Is_OK_Static_Expression (Mod_Expr) then
18440 M_Val := Expr_Value (Mod_Expr);
18449 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
18458 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc48/gcc-4.8.5/gcc/ada/
H A Dsem_ch3.adb16970 Mod_Expr : constant Node_Id := Expression (Def); constant
17011 and then Nkind (Mod_Expr) = N_Op_Multiply
17012 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
17013 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
17014 and then Nkind (Right_Opnd (Mod_Expr)) = N_Integer_Literal
17015 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
17023 Analyze_And_Resolve (Mod_Expr, Any_Integer);
17029 if not Is_OK_Static_Expression (Mod_Expr) then
17034 M_Val := Expr_Value (Mod_Expr);
17048 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/devel/mingw32-gcc/gcc-4.8.1/gcc/ada/
H A Dsem_ch3.adb16970 Mod_Expr : constant Node_Id := Expression (Def); constant
17011 and then Nkind (Mod_Expr) = N_Op_Multiply
17012 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
17013 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
17014 and then Nkind (Right_Opnd (Mod_Expr)) = N_Integer_Literal
17015 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
17023 Analyze_And_Resolve (Mod_Expr, Any_Integer);
17029 if not Is_OK_Static_Expression (Mod_Expr) then
17034 M_Val := Expr_Value (Mod_Expr);
17048 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/
H A Dsem_ch3.adb17372 Mod_Expr : constant Node_Id := Expression (Def); constant
17413 and then Nkind (Mod_Expr) = N_Op_Multiply
17414 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
17415 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
17416 and then Nkind (Right_Opnd (Mod_Expr)) = N_Integer_Literal
17417 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
17425 Analyze_And_Resolve (Mod_Expr, Any_Integer);
17431 if not Is_OK_Static_Expression (Mod_Expr) then
17436 M_Val := Expr_Value (Mod_Expr);
17450 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/
H A Dsem_ch3.adb10851 Mod_Expr : constant Node_Id := Expression (Def); constant
10882 Analyze_And_Resolve (Mod_Expr, Any_Integer);
10888 if not Is_OK_Static_Expression (Mod_Expr) then
10890 ("non-static expression used for modular type bound!", Mod_Expr);
10893 M_Val := Expr_Value (Mod_Expr);
10897 Error_Msg_N ("modulus value must be positive", Mod_Expr);
10907 Make_Range (Sloc (Mod_Expr),
10909 Make_Integer_Literal (Sloc (Mod_Expr), 0),
10911 Make_Integer_Literal (Sloc (Mod_Expr), M_Val - 1)));
10941 ("nonbinary modulus exceeds limit (2 '*'*^ - 1)", Mod_Expr);
[all …]
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/
H A Dsem_ch3.adb10851 Mod_Expr : constant Node_Id := Expression (Def); constant
10882 Analyze_And_Resolve (Mod_Expr, Any_Integer);
10888 if not Is_OK_Static_Expression (Mod_Expr) then
10890 ("non-static expression used for modular type bound!", Mod_Expr);
10893 M_Val := Expr_Value (Mod_Expr);
10897 Error_Msg_N ("modulus value must be positive", Mod_Expr);
10907 Make_Range (Sloc (Mod_Expr),
10909 Make_Integer_Literal (Sloc (Mod_Expr), 0),
10911 Make_Integer_Literal (Sloc (Mod_Expr), M_Val - 1)));
10941 ("nonbinary modulus exceeds limit (2 '*'*^ - 1)", Mod_Expr);
[all …]
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/
H A Dsem_ch3.adb19395 Mod_Expr : constant Node_Id := Expression (Def); constant
19434 and then Nkind (Mod_Expr) = N_Op_Multiply
19435 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19436 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19438 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19446 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19452 if not Is_OK_Static_Expression (Mod_Expr) then
19457 M_Val := Expr_Value (Mod_Expr);
19466 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19475 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/
H A Dsem_ch3.adb19477 Mod_Expr : constant Node_Id := Expression (Def); constant
19519 and then Nkind (Mod_Expr) = N_Op_Multiply
19520 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19521 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19523 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_128
19531 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19537 if not Is_OK_Static_Expression (Mod_Expr) then
19542 M_Val := Expr_Value (Mod_Expr);
19551 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19560 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/
H A Dsem_ch3.adb19510 Mod_Expr : constant Node_Id := Expression (Def); constant
19549 and then Nkind (Mod_Expr) = N_Op_Multiply
19550 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19551 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19553 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19561 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19567 if not Is_OK_Static_Expression (Mod_Expr) then
19572 M_Val := Expr_Value (Mod_Expr);
19581 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19590 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/
H A Dsem_ch3.adb19910 Mod_Expr : constant Node_Id := Expression (Def); constant
19952 and then Nkind (Mod_Expr) = N_Op_Multiply
19953 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19954 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19956 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_128
19964 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19975 if not Is_OK_Static_Expression (Mod_Expr) then
19980 M_Val := Expr_Value (Mod_Expr);
19989 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19998 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/
H A Dsem_ch3.adb19477 Mod_Expr : constant Node_Id := Expression (Def); constant
19519 and then Nkind (Mod_Expr) = N_Op_Multiply
19520 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19521 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19523 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_128
19531 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19537 if not Is_OK_Static_Expression (Mod_Expr) then
19542 M_Val := Expr_Value (Mod_Expr);
19551 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19560 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/
H A Dsem_ch3.adb19510 Mod_Expr : constant Node_Id := Expression (Def); constant
19549 and then Nkind (Mod_Expr) = N_Op_Multiply
19550 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19551 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19553 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19561 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19567 if not Is_OK_Static_Expression (Mod_Expr) then
19572 M_Val := Expr_Value (Mod_Expr);
19581 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19590 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/
H A Dsem_ch3.adb19477 Mod_Expr : constant Node_Id := Expression (Def); constant
19519 and then Nkind (Mod_Expr) = N_Op_Multiply
19520 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19521 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19523 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_128
19531 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19537 if not Is_OK_Static_Expression (Mod_Expr) then
19542 M_Val := Expr_Value (Mod_Expr);
19551 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19560 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/
H A Dsem_ch3.adb19510 Mod_Expr : constant Node_Id := Expression (Def); constant
19549 and then Nkind (Mod_Expr) = N_Op_Multiply
19550 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19551 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19553 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19561 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19567 if not Is_OK_Static_Expression (Mod_Expr) then
19572 M_Val := Expr_Value (Mod_Expr);
19581 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19590 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/
H A Dsem_ch3.adb19395 Mod_Expr : constant Node_Id := Expression (Def); constant
19434 and then Nkind (Mod_Expr) = N_Op_Multiply
19435 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19436 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19438 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19446 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19452 if not Is_OK_Static_Expression (Mod_Expr) then
19457 M_Val := Expr_Value (Mod_Expr);
19466 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19475 Make_Range (Sloc (Mod_Expr),
[all …]
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/
H A Dsem_ch3.adb19395 Mod_Expr : constant Node_Id := Expression (Def); constant
19434 and then Nkind (Mod_Expr) = N_Op_Multiply
19435 and then Nkind (Left_Opnd (Mod_Expr)) = N_Integer_Literal
19436 and then Intval (Left_Opnd (Mod_Expr)) = Uint_2
19438 and then Intval (Right_Opnd (Mod_Expr)) <= Uint_64
19446 Analyze_And_Resolve (Mod_Expr, Any_Integer);
19452 if not Is_OK_Static_Expression (Mod_Expr) then
19457 M_Val := Expr_Value (Mod_Expr);
19466 Check_Restriction (No_Long_Long_Integers, Mod_Expr);
19475 Make_Range (Sloc (Mod_Expr),
[all …]

12