/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | frontend.adb | 311 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 319 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 331 Set_Loading (Main_Unit, False); 344 and then Fatal_Error (Main_Unit) /= Error_Detected 402 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 406 if Fatal_Error (Main_Unit) /= Error_Detected then 414 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 422 Semantics (Cunit (Main_Unit)); 477 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 522 VAST.Check_Tree (Cunit (Main_Unit)); [all …]
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | frontend.adb | 313 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 321 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 333 Set_Loading (Main_Unit, False); 346 and then Fatal_Error (Main_Unit) /= Error_Detected 404 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 408 if Fatal_Error (Main_Unit) /= Error_Detected then 416 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 424 Semantics (Cunit (Main_Unit)); 501 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 525 VAST.Check_Tree (Cunit (Main_Unit)); [all …]
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/ |
H A D | frontend.adb | 311 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 319 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 331 Set_Loading (Main_Unit, False); 344 and then Fatal_Error (Main_Unit) /= Error_Detected 402 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 406 if Fatal_Error (Main_Unit) /= Error_Detected then 414 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 422 Semantics (Cunit (Main_Unit)); 477 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 522 VAST.Check_Tree (Cunit (Main_Unit)); [all …]
|
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/ |
H A D | frontend.adb | 311 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 319 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 331 Set_Loading (Main_Unit, False); 344 and then Fatal_Error (Main_Unit) /= Error_Detected 402 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 406 if Fatal_Error (Main_Unit) /= Error_Detected then 414 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 422 Semantics (Cunit (Main_Unit)); 477 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 522 VAST.Check_Tree (Cunit (Main_Unit)); [all …]
|
/dports/lang/gcc48/gcc-4.8.5/gcc/ada/ |
H A D | frontend.adb | 258 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 266 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 278 Set_Loading (Main_Unit, False); 291 and then not Fatal_Error (Main_Unit) 330 Set_Config_Pragmas (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 334 if not Fatal_Error (Main_Unit) then 342 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 350 Semantics (Cunit (Main_Unit)); 404 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); 425 Item := First (Context_Items (Cunit (Main_Unit)));
|
/dports/devel/mingw32-gcc/gcc-4.8.1/gcc/ada/ |
H A D | frontend.adb | 258 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 266 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 278 Set_Loading (Main_Unit, False); 291 and then not Fatal_Error (Main_Unit) 330 Set_Config_Pragmas (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 334 if not Fatal_Error (Main_Unit) then 342 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 350 Semantics (Cunit (Main_Unit)); 404 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); 425 Item := First (Context_Items (Cunit (Main_Unit)));
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 469 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 496 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 469 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 496 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 465 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 503 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 469 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 496 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 469 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 496 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 465 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 503 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 469 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 496 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 469 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 496 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 465 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 501 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 465 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 501 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 465 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 503 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/ |
H A D | frontend.adb | 310 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 318 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 330 Set_Loading (Main_Unit, False); 343 and then Fatal_Error (Main_Unit) /= Error_Detected 391 (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 395 if Fatal_Error (Main_Unit) /= Error_Detected then 403 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 411 Semantics (Cunit (Main_Unit)); 465 Exp_Unst.Unnest_Subprograms (Cunit (Main_Unit)); 501 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); [all …]
|
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/ |
H A D | frontend.adb | 268 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 276 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 288 Set_Loading (Main_Unit, False); 301 and then not Fatal_Error (Main_Unit) 340 Set_Config_Pragmas (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 344 if not Fatal_Error (Main_Unit) then 352 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 360 Semantics (Cunit (Main_Unit)); 417 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); 438 Item := First (Context_Items (Cunit (Main_Unit)));
|
/dports/lang/asis/asis-gpl-2016-src/asis/ |
H A D | a4g-contt-tt.adb | 323 Start_Node := Unit (Cunit (Main_Unit)); 454 return Tree_Table.Table (T).Main_Unit; 464 Tree_Table.Table (T).Main_Unit := U; 513 Main_Unit : Unit_Id; variable 526 Main_Unit := Nil_Unit; 534 Main_Unit := Get_Subunit_Parent_Body (C, Main_Unit); 569 Main_Unit := Get_Body (C, U); 571 if No (Main_Unit) or else 596 Main_Unit := U; 611 Main_Unit := U; [all …]
|
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/ |
H A D | frontend.adb | 309 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 317 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 329 Set_Loading (Main_Unit, False); 342 and then Fatal_Error (Main_Unit) /= Error_Detected 388 Set_Config_Pragmas (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 392 if Fatal_Error (Main_Unit) /= Error_Detected then 400 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 408 Semantics (Cunit (Main_Unit)); 469 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); 490 Item := First (Context_Items (Cunit (Main_Unit)));
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
H A D | frontend.adb | 309 if Source_File_Is_No_Body (Source_Index (Main_Unit)) then 317 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 329 Set_Loading (Main_Unit, False); 342 and then Fatal_Error (Main_Unit) /= Error_Detected 388 Set_Config_Pragmas (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 392 if Fatal_Error (Main_Unit) /= Error_Detected then 400 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 408 Semantics (Cunit (Main_Unit)); 469 pragma Debug (Sem_SCIL.Check_SCIL_Nodes (Cunit (Main_Unit))); 490 Item := First (Context_Items (Cunit (Main_Unit)));
|
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
H A D | frontend.adb | 217 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 250 Set_Loading (Main_Unit, False); 285 Set_Config_Pragmas (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 289 if not Fatal_Error (Main_Unit) then 297 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 305 Semantics (Cunit (Main_Unit));
|
H A D | lib-load.adb | 202 Load_Stack.Table (Load_Stack.Last) := Main_Unit; 213 Units.Table (Main_Unit).Unit_File_Name := Fname; 220 Units.Table (Main_Unit) := ( 396 and then Unit_Name (Main_Unit) /= No_Name 404 Get_External_Unit_Name_String (Unit_Name (Main_Unit)); 429 if Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 457 Unum := Main_Unit; 690 Sind : constant Source_File_Index := Source_Index (Main_Unit); 696 Units.Table (Main_Unit).Cunit := N; 697 Units.Table (Main_Unit).Unit_Name := [all …]
|
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
H A D | frontend.adb | 217 Initialize_Scanner (Main_Unit, Source_Index (Main_Unit)); 250 Set_Loading (Main_Unit, False); 285 Set_Config_Pragmas (Aux_Decls_Node (Cunit (Main_Unit)), Config_Pragmas); 289 if not Fatal_Error (Main_Unit) then 297 and then Nkind (Unit (Cunit (Main_Unit))) = N_Subunit 305 Semantics (Cunit (Main_Unit));
|