/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | contracts.adb | 763 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 765 (Templ => Original_Node (Subp_Decl), 1798 elsif not Comes_From_Source (Subp_Decl) 1979 Subp_Decl : Node_Id := Subp_Id; variable 1984 Subp_Decl := Enclosing_Declaration (Subp_Decl); 1985 exit when Is_Declaration (Subp_Decl); 1986 Subp_Decl := Parent (Subp_Decl); 1987 pragma Assert (Present (Subp_Decl)); 1990 Insert_After_And_Analyze (Subp_Decl, Prag); 3000 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
H A D | sem_prag.adb | 3848 Subp_Decl : out Node_Id; 4408 Subp_Decl : out Node_Id; 4415 Subp_Decl := Empty; 4558 Subp_Decl : Node_Id; variable 4727 Subp_Decl := 14387 Subp_Decl : Node_Id; variable 14399 Subp_Decl := 16457 Subp_Decl := 23944 Subp_Decl := 25188 Subp_Decl := [all …]
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/ |
H A D | contracts.adb | 763 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 765 (Templ => Original_Node (Subp_Decl), 1798 elsif not Comes_From_Source (Subp_Decl) 1979 Subp_Decl : Node_Id := Subp_Id; variable 1984 Subp_Decl := Enclosing_Declaration (Subp_Decl); 1985 exit when Is_Declaration (Subp_Decl); 1986 Subp_Decl := Parent (Subp_Decl); 1987 pragma Assert (Present (Subp_Decl)); 1990 Insert_After_And_Analyze (Subp_Decl, Prag); 3000 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
H A D | sem_prag.adb | 3848 Subp_Decl : out Node_Id; 4408 Subp_Decl : out Node_Id; 4415 Subp_Decl := Empty; 4558 Subp_Decl : Node_Id; variable 4727 Subp_Decl := 14387 Subp_Decl : Node_Id; variable 14399 Subp_Decl := 16457 Subp_Decl := 23944 Subp_Decl := 25188 Subp_Decl := [all …]
|
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/ |
H A D | contracts.adb | 763 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 765 (Templ => Original_Node (Subp_Decl), 1798 elsif not Comes_From_Source (Subp_Decl) 1979 Subp_Decl : Node_Id := Subp_Id; variable 1984 Subp_Decl := Enclosing_Declaration (Subp_Decl); 1985 exit when Is_Declaration (Subp_Decl); 1986 Subp_Decl := Parent (Subp_Decl); 1987 pragma Assert (Present (Subp_Decl)); 1990 Insert_After_And_Analyze (Subp_Decl, Prag); 3000 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
H A D | sem_prag.adb | 3848 Subp_Decl : out Node_Id; 4408 Subp_Decl : out Node_Id; 4415 Subp_Decl := Empty; 4558 Subp_Decl : Node_Id; variable 4727 Subp_Decl := 14387 Subp_Decl : Node_Id; variable 14399 Subp_Decl := 16457 Subp_Decl := 23944 Subp_Decl := 25188 Subp_Decl := [all …]
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/ |
H A D | contracts.adb | 536 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 717 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 719 (Templ => Original_Node (Subp_Decl), 1573 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1584 elsif not Comes_From_Source (Subp_Decl) 1588 Comes_From_Source (Defining_Entity (Subp_Decl))) 1599 List_Containing (Subp_Decl); 1601 Scope (Defining_Entity (Subp_Decl)); 2395 List_Containing (Subp_Decl) 2426 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/ |
H A D | contracts.adb | 536 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 717 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 719 (Templ => Original_Node (Subp_Decl), 1573 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1584 elsif not Comes_From_Source (Subp_Decl) 1588 Comes_From_Source (Defining_Entity (Subp_Decl))) 1599 List_Containing (Subp_Decl); 1601 Scope (Defining_Entity (Subp_Decl)); 2395 List_Containing (Subp_Decl) 2426 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/ |
H A D | contracts.adb | 536 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 717 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 719 (Templ => Original_Node (Subp_Decl), 1573 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1584 elsif not Comes_From_Source (Subp_Decl) 1588 Comes_From_Source (Defining_Entity (Subp_Decl))) 1599 List_Containing (Subp_Decl); 1601 Scope (Defining_Entity (Subp_Decl)); 2395 List_Containing (Subp_Decl) 2426 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
H A D | contracts.adb | 502 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 645 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 647 (Templ => Original_Node (Subp_Decl), 1599 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1610 elsif not Comes_From_Source (Subp_Decl) 1614 Comes_From_Source (Defining_Entity (Subp_Decl))) 1622 return List_Containing (Subp_Decl) = 2425 Subp_Decl : Node_Id; variable 2446 Subp_Decl := Unit_Declaration_Node (Subp_Id); 2448 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
H A D | sem_prag.adb | 3308 Subp_Decl : out Node_Id; 3879 Subp_Decl : out Node_Id; 3886 Subp_Decl := Empty; 4016 Subp_Decl : Node_Id; variable 4093 Subp_Decl := 12775 Subp_Decl := 14502 Subp_Decl := 22522 Subp_Decl := 23047 Subp_Decl : Node_Id); 23060 Subp_Decl : Node_Id) [all …]
|
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/ |
H A D | contracts.adb | 502 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 645 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 647 (Templ => Original_Node (Subp_Decl), 1599 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1610 elsif not Comes_From_Source (Subp_Decl) 1614 Comes_From_Source (Defining_Entity (Subp_Decl))) 1622 return List_Containing (Subp_Decl) = 2425 Subp_Decl : Node_Id; variable 2446 Subp_Decl := Unit_Declaration_Node (Subp_Id); 2448 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
H A D | sem_prag.adb | 3308 Subp_Decl : out Node_Id; 3879 Subp_Decl : out Node_Id; 3886 Subp_Decl := Empty; 4016 Subp_Decl : Node_Id; variable 4093 Subp_Decl := 12775 Subp_Decl := 14502 Subp_Decl := 22522 Subp_Decl := 23047 Subp_Decl : Node_Id); 23060 Subp_Decl : Node_Id) [all …]
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | contracts.adb | 775 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 777 (Templ => Original_Node (Subp_Decl), 1913 elsif not Comes_From_Source (Subp_Decl) 2094 Subp_Decl : Node_Id := Subp_Id; variable 2099 Subp_Decl := Enclosing_Declaration (Subp_Decl); 2100 exit when Is_Declaration (Subp_Decl); 2101 Subp_Decl := Parent (Subp_Decl); 2102 pragma Assert (Present (Subp_Decl)); 2105 Insert_After_And_Analyze (Subp_Decl, Prag); 2996 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
H A D | sem_prag.adb | 3974 Subp_Decl : out Node_Id; 4536 Subp_Decl : out Node_Id; 4543 Subp_Decl := Empty; 4686 Subp_Decl : Node_Id; variable 4855 Subp_Decl := 14668 Subp_Decl : Node_Id; variable 14680 Subp_Decl := 16750 Subp_Decl := 24302 Subp_Decl := 25536 Subp_Decl := [all …]
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | contracts.adb | 530 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 677 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 679 (Templ => Original_Node (Subp_Decl), 1963 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1974 elsif not Comes_From_Source (Subp_Decl) 1978 Comes_From_Source (Defining_Entity (Subp_Decl))) 1989 List_Containing (Subp_Decl); 2742 Subp_Decl : Node_Id; variable 2763 Subp_Decl := Unit_Declaration_Node (Subp_Id); 2765 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
H A D | sem_prag.adb | 3671 Subp_Decl : out Node_Id; 4256 Subp_Decl : out Node_Id; 4263 Subp_Decl := Empty; 4396 Subp_Decl : Node_Id; variable 4563 Subp_Decl := 14000 Subp_Decl : Node_Id; variable 14012 Subp_Decl := 14861 Subp_Decl : Node_Id; variable 15795 Subp_Decl := 24091 Subp_Decl := [all …]
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/ |
H A D | contracts.adb | 530 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 677 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 679 (Templ => Original_Node (Subp_Decl), 1963 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1974 elsif not Comes_From_Source (Subp_Decl) 1978 Comes_From_Source (Defining_Entity (Subp_Decl))) 1989 List_Containing (Subp_Decl); 2742 Subp_Decl : Node_Id; variable 2763 Subp_Decl := Unit_Declaration_Node (Subp_Id); 2765 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/ |
H A D | contracts.adb | 530 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 677 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 679 (Templ => Original_Node (Subp_Decl), 1963 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1974 elsif not Comes_From_Source (Subp_Decl) 1978 Comes_From_Source (Defining_Entity (Subp_Decl))) 1989 List_Containing (Subp_Decl); 2742 Subp_Decl : Node_Id; variable 2763 Subp_Decl := Unit_Declaration_Node (Subp_Id); 2765 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/ |
H A D | contracts.adb | 530 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 677 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 679 (Templ => Original_Node (Subp_Decl), 1963 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1974 elsif not Comes_From_Source (Subp_Decl) 1978 Comes_From_Source (Defining_Entity (Subp_Decl))) 1989 List_Containing (Subp_Decl); 2742 Subp_Decl : Node_Id; variable 2763 Subp_Decl := Unit_Declaration_Node (Subp_Id); 2765 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | contracts.adb | 530 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 677 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 679 (Templ => Original_Node (Subp_Decl), 1963 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1974 elsif not Comes_From_Source (Subp_Decl) 1978 Comes_From_Source (Defining_Entity (Subp_Decl))) 1989 List_Containing (Subp_Decl); 2742 Subp_Decl : Node_Id; variable 2763 Subp_Decl := Unit_Declaration_Node (Subp_Id); 2765 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | contracts.adb | 530 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 677 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 679 (Templ => Original_Node (Subp_Decl), 1963 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 1974 elsif not Comes_From_Source (Subp_Decl) 1978 Comes_From_Source (Defining_Entity (Subp_Decl))) 1989 List_Containing (Subp_Decl); 2742 Subp_Decl : Node_Id; variable 2763 Subp_Decl := Unit_Declaration_Node (Subp_Id); 2765 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/ |
H A D | contracts.adb | 545 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 726 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 728 (Templ => Original_Node (Subp_Decl), 2057 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 2068 elsif not Comes_From_Source (Subp_Decl) 2072 Comes_From_Source (Defining_Entity (Subp_Decl))) 2083 List_Containing (Subp_Decl); 2085 Scope (Defining_Entity (Subp_Decl)); 2879 List_Containing (Subp_Decl) 2910 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/ |
H A D | contracts.adb | 545 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 726 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 728 (Templ => Original_Node (Subp_Decl), 2057 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 2068 elsif not Comes_From_Source (Subp_Decl) 2072 Comes_From_Source (Defining_Entity (Subp_Decl))) 2083 List_Containing (Subp_Decl); 2085 Scope (Defining_Entity (Subp_Decl)); 2879 List_Containing (Subp_Decl) 2910 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/ |
H A D | contracts.adb | 545 Subp_Decl : constant Node_Id := Unit_Declaration_Node (Subp_Id); constant 726 if Is_Generic_Declaration_Or_Body (Subp_Decl) then 728 (Templ => Original_Node (Subp_Decl), 2057 if Is_Init_Proc (Defining_Entity (Subp_Decl)) then 2068 elsif not Comes_From_Source (Subp_Decl) 2072 Comes_From_Source (Defining_Entity (Subp_Decl))) 2083 List_Containing (Subp_Decl); 2085 Scope (Defining_Entity (Subp_Decl)); 2879 List_Containing (Subp_Decl) 2910 if Nkind (Subp_Decl) = N_Subprogram_Body_Stub then [all …]
|