/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/ |
H A D | sem_disp.adb | 259 if Present (Default_Value (Formal)) then 268 Default_Value (Formal)); 270 elsif not Is_Tag_Indeterminate (Default_Value (Formal)) then 273 " function call", Default_Value (Formal));
|
H A D | freeze.adb | 508 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 509 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 510 Nkind (Default_Value (O_Formal)) 513 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8850 and then Present (Default_Value (F)) 8854 Default_Value (F)); 8989 if Present (Default_Value (Formal)) then 8995 Dcopy := New_Copy_Tree (Default_Value (Formal)); 9041 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/ |
H A D | freeze.adb | 462 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 463 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 464 Nkind (Default_Value (O_Formal)) 467 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 6768 and then Present (Default_Value (F)) 6772 Default_Value (F)); 6930 if Present (Default_Value (Formal)) then 6936 Dcopy := New_Copy_Tree (Default_Value (Formal)); 6983 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | gen_il-internals.ads | 165 Default_Value : Field_Default_Value; component
|
H A D | sem_disp.adb | 359 if Present (Default_Value (Formal)) then 368 Default_Value (Formal)); 370 elsif not Is_Tag_Indeterminate (Default_Value (Formal)) then 373 " function call", Default_Value (Formal));
|
H A D | freeze.adb | 576 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 577 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 578 Nkind (Default_Value (O_Formal)) 581 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 10105 and then Present (Default_Value (F)) 10109 Default_Value (F)); 10246 if Present (Default_Value (Formal)) then 10252 Dcopy := New_Copy_Tree (Default_Value (Formal)); 10298 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/adacontrol/adactl-1.18r9/src/ |
H A D | rules-default_parameter.adb | 129 Default_Value => Empty_Usage);
|
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
H A D | sem_ch6.adb | 2062 Present (Default_Value (New_Formal)); 2064 Present (Default_Value (Old_Formal)); 2077 (Default_Value (New_Formal), Etype (New_Formal)); 2083 (Default_Value (Old_Formal), 2084 Default_Value (New_Formal)) 4190 if No (Default_Value (F)) then 5222 if Present (Default_Value (F)) then
|
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
H A D | sem_ch6.adb | 2062 Present (Default_Value (New_Formal)); 2064 Present (Default_Value (Old_Formal)); 2077 (Default_Value (New_Formal), Etype (New_Formal)); 2083 (Default_Value (Old_Formal), 2084 Default_Value (New_Formal)) 4190 if No (Default_Value (F)) then 5222 if Present (Default_Value (F)) then
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
H A D | freeze.adb | 503 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 504 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 505 Nkind (Default_Value (O_Formal)) 508 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 7822 and then Present (Default_Value (F)) 7826 Default_Value (F)); 7951 if Present (Default_Value (Formal)) then 7957 Dcopy := New_Copy_Tree (Default_Value (Formal)); 8003 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/ |
H A D | freeze.adb | 503 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 504 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 505 Nkind (Default_Value (O_Formal)) 508 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 7822 and then Present (Default_Value (F)) 7826 Default_Value (F)); 7951 if Present (Default_Value (Formal)) then 7957 Dcopy := New_Copy_Tree (Default_Value (Formal)); 8003 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | freeze.adb | 508 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 509 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 510 Nkind (Default_Value (O_Formal)) 513 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8296 and then Present (Default_Value (F)) 8300 Default_Value (F)); 8435 if Present (Default_Value (Formal)) then 8441 Dcopy := New_Copy_Tree (Default_Value (Formal)); 8487 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/ |
H A D | freeze.adb | 508 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 509 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 510 Nkind (Default_Value (O_Formal)) 513 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8296 and then Present (Default_Value (F)) 8300 Default_Value (F)); 8435 if Present (Default_Value (Formal)) then 8441 Dcopy := New_Copy_Tree (Default_Value (Formal)); 8487 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | freeze.adb | 508 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 509 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 510 Nkind (Default_Value (O_Formal)) 513 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8296 and then Present (Default_Value (F)) 8300 Default_Value (F)); 8435 if Present (Default_Value (Formal)) then 8441 Dcopy := New_Copy_Tree (Default_Value (Formal)); 8487 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/ |
H A D | freeze.adb | 508 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 509 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 510 Nkind (Default_Value (O_Formal)) 513 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8296 and then Present (Default_Value (F)) 8300 Default_Value (F)); 8435 if Present (Default_Value (Formal)) then 8441 Dcopy := New_Copy_Tree (Default_Value (Formal)); 8487 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/ |
H A D | freeze.adb | 508 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 509 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 510 Nkind (Default_Value (O_Formal)) 513 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8296 and then Present (Default_Value (F)) 8300 Default_Value (F)); 8435 if Present (Default_Value (Formal)) then 8441 Dcopy := New_Copy_Tree (Default_Value (Formal)); 8487 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | freeze.adb | 508 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 509 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 510 Nkind (Default_Value (O_Formal)) 513 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8296 and then Present (Default_Value (F)) 8300 Default_Value (F)); 8435 if Present (Default_Value (Formal)) then 8441 Dcopy := New_Copy_Tree (Default_Value (Formal)); 8487 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/ |
H A D | freeze.adb | 512 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 513 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 514 Nkind (Default_Value (O_Formal)) 517 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8908 and then Present (Default_Value (F)) 8912 Default_Value (F)); 9047 if Present (Default_Value (Formal)) then 9053 Dcopy := New_Copy_Tree (Default_Value (Formal)); 9099 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | freeze.adb | 510 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 511 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 512 Nkind (Default_Value (O_Formal)) 515 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 9189 and then Present (Default_Value (F)) 9193 Default_Value (F)); 9330 if Present (Default_Value (Formal)) then 9336 Dcopy := New_Copy_Tree (Default_Value (Formal)); 9382 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/ |
H A D | freeze.adb | 510 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 511 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 512 Nkind (Default_Value (O_Formal)) 515 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 9189 and then Present (Default_Value (F)) 9193 Default_Value (F)); 9330 if Present (Default_Value (Formal)) then 9336 Dcopy := New_Copy_Tree (Default_Value (Formal)); 9382 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/ |
H A D | freeze.adb | 512 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 513 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 514 Nkind (Default_Value (O_Formal)) 517 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8908 and then Present (Default_Value (F)) 8912 Default_Value (F)); 9047 if Present (Default_Value (Formal)) then 9053 Dcopy := New_Copy_Tree (Default_Value (Formal)); 9099 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/ |
H A D | freeze.adb | 510 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 511 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 512 Nkind (Default_Value (O_Formal)) 515 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 9189 and then Present (Default_Value (F)) 9193 Default_Value (F)); 9330 if Present (Default_Value (Formal)) then 9336 Dcopy := New_Copy_Tree (Default_Value (Formal)); 9382 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/ |
H A D | freeze.adb | 508 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 509 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 510 Nkind (Default_Value (O_Formal)) 513 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8850 and then Present (Default_Value (F)) 8854 Default_Value (F)); 8989 if Present (Default_Value (Formal)) then 8995 Dcopy := New_Copy_Tree (Default_Value (Formal)); 9041 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/ |
H A D | freeze.adb | 508 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 509 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 510 Nkind (Default_Value (O_Formal)) 513 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8850 and then Present (Default_Value (F)) 8854 Default_Value (F)); 8989 if Present (Default_Value (Formal)) then 8995 Dcopy := New_Copy_Tree (Default_Value (Formal)); 9041 Set_Raises_Constraint_Error (Default_Value (Formal));
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/ |
H A D | freeze.adb | 512 elsif Nkind (Default_Value (O_Formal)) = N_Aggregate 513 or else Nkind (Original_Node (Default_Value (O_Formal))) /= 514 Nkind (Default_Value (O_Formal)) 517 New_Copy_Tree (Original_Node (Default_Value (O_Formal)))); 8911 and then Present (Default_Value (F)) 8915 Default_Value (F)); 9050 if Present (Default_Value (Formal)) then 9056 Dcopy := New_Copy_Tree (Default_Value (Formal)); 9102 Set_Raises_Constraint_Error (Default_Value (Formal));
|