Home
last modified time | relevance | path

Searched refs:Main_Unit (Results 1 – 25 of 994) sorted by relevance

12345678910>>...40

/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/
H A Dfrontend.adb311 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 Dfrontend.adb313 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 Dfrontend.adb311 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 Dfrontend.adb311 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 Dfrontend.adb258 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 Dfrontend.adb258 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb310 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 Dfrontend.adb268 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 Da4g-contt-tt.adb323 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 Dfrontend.adb309 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 Dfrontend.adb309 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 Dfrontend.adb217 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 Dlib-load.adb202 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 Dfrontend.adb217 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));

12345678910>>...40