| /dports/cad/ghdl/ghdl-1.0.0/src/vhdl/ |
| H A D | vhdl-sem.adb | 1897 (+Subprg,
1912 (+Subprg,
1919 (+Subprg,
2032 Check_Operator_Requirements (Get_Identifier (Subprg), Subprg);
2056 (Subprg,
2095 Xref_Decl (Subprg);
2237 Subprg : Iir; variable
2249 return Subprg;
2287 return Subprg;
2292 Subprg : Iir; variable
[all …]
|
| H A D | vhdl-sem.ads | 61 procedure Check_Operator_Requirements (Id : Name_Id; Subprg : Iir);
68 procedure Sem_Subprogram_Specification (Subprg : Iir);
69 procedure Sem_Subprogram_Declaration (Subprg : Iir);
72 procedure Sem_Subprogram_Body (Subprg : Iir);
|
| H A D | vhdl-annotations.adb | 36 (Block_Info : Sim_Info_Acc; Subprg: Iir);
38 (Block_Info : Sim_Info_Acc; Subprg: Iir);
504 (Block_Info : Sim_Info_Acc; Subprg: Iir)
512 if Get_Kind (Subprg) = Iir_Kind_Function_Declaration then
515 (Block_Info, Get_Return_Type (Subprg));
520 (Block_Info : Sim_Info_Acc; Subprg: Iir)
527 Ref => Subprg,
529 Set_Info (Subprg, Subprg_Info);
535 (Block_Info : Sim_Info_Acc; Subprg: Iir)
541 Set_Info (Subprg, Subprg_Info);
[all …]
|
| H A D | vhdl-sem_expr.adb | 955 if Callee = Subprg then
960 case Get_Kind (Subprg) is
983 case Get_Kind (Subprg) is
1019 case Get_Kind (Subprg) is
1057 (1 => +Subprg));
1081 case Get_Kind (Subprg) is
1102 (Subprg : Iir; Callee : Iir; Loc : Iir)
1130 case Get_Kind (Subprg) is
1194 if Subprg = Null_Iir then
1198 if Subprg = Imp then
[all …]
|
| H A D | vhdl-parse.adb | 1976 Scan_Identifier (Subprg);
1989 Set_Location (Subprg);
2091 Subprg: Iir; variable
2106 Subprg := Create_Iir (Kind);
2107 Set_Location (Subprg);
2143 return Subprg;
8067 Set_Has_Body (Subprg, True);
8223 Subprg : Iir; variable
8240 Set_Location (Subprg);
8311 return Subprg;
[all …]
|
| H A D | vhdl-errors.adb | 898 function Disp_Subprg (Subprg : Iir) return String
920 case Get_Kind (Subprg) is
930 Error_Kind ("disp_subprg", Subprg);
936 Id : constant Name_Id := Get_Identifier (Subprg);
953 case Get_Kind (Subprg) is
959 El := Get_Interface_Declaration_Chain (Subprg);
971 case Get_Kind (Subprg) is
976 Append_Type (Get_Return_Type (Subprg));
|
| H A D | vhdl-utils.adb | 959 function Get_Callees_List_Holder (Subprg : Iir) return Iir is
961 case Get_Kind (Subprg) is
964 return Get_Subprogram_Body (Subprg);
967 return Subprg;
969 Error_Kind ("get_callees_list_holder", Subprg);
1441 function Is_Operation_For_Type (Subprg : Iir; Atype : Iir) return Boolean
1447 Inter := Get_Interface_Declaration_Chain (Subprg);
1454 if Get_Kind (Subprg) = Iir_Kind_Function_Declaration
1455 and then Get_Base_Type (Get_Return_Type (Subprg)) = Base_Type
1824 function Is_Uninstantiated_Subprogram (Subprg : Iir) return Boolean is
[all …]
|
| /dports/cad/ghdl/ghdl-1.0.0/src/ortho/mcode/ |
| H A D | ortho_code-x86-abi.adb | 38 pragma Unreferenced (Subprg);
102 (Subprg, To_Int32 (Create_Symbol (Get_Decl_Ident (Subprg), True)));
122 procedure Start_Body (Subprg : O_Dnode)
124 pragma Unreferenced (Subprg);
142 Disps.Disp_Subprg (Subprg);
146 Insns.Gen_Subprg_Insns (Subprg);
153 Disp_Subprg (Subprg.D_Body);
156 Emits.Emit_Subprg (Subprg);
168 Child := Subprg.First_Child;
174 Cur_Subprg := Subprg;
[all …]
|
| H A D | ortho_code-opts.adb | 33 procedure Jmp_To_Bb (Subprg : Subprogram_Data_Acc)
41 First := Get_Stmt_Link (Subprg.E_Entry);
123 procedure Thread_Jump (Subprg : Subprogram_Data_Acc)
131 First := Get_Stmt_Link (Subprg.E_Entry);
196 procedure Optimize_Subprg (Subprg : Subprogram_Data_Acc)
206 Thread_Jump (Subprg);
208 Jmp_To_Bb (Subprg);
|
| H A D | ortho_code-x86-abi.ads | 48 procedure Start_Subprogram (Subprg : O_Dnode; Abi : out O_Abi_Subprg);
50 procedure Finish_Subprogram (Subprg : O_Dnode; Abi : in out O_Abi_Subprg);
53 procedure Start_Body (Subprg : O_Dnode);
|
| H A D | ortho_code-exprs.adb | 748 Subprg : Subprogram_Data_Acc; variable
755 Subprg := Cur_Subprg;
767 Subprg := Subprg.Parent;
1147 First_Inter := Get_Subprg_Interfaces (Subprg);
1148 if Get_Decl_Storage (Subprg) = O_Storage_Local then
1149 Depth := Get_Decl_Depth (Subprg);
1156 Assocs := (Subprg => Subprg,
1230 F_Type := Get_Decl_Type (Assocs.Subprg);
1232 O_Enode (Assocs.Subprg), Assocs.First_Arg);
1601 procedure Disp_Subprg_Body (Indent : Natural; Subprg : O_Enode)
[all …]
|
| H A D | ortho_code-exprs.ads | 492 function New_Subprogram_Address (Subprg : O_Dnode; Atype : O_Tnode)
504 procedure Start_Association (Assocs : out O_Assoc_List; Subprg : O_Dnode);
555 procedure Disp_Subprg_Body (Indent : Natural; Subprg : O_Enode);
567 Subprg : O_Dnode; component
|
| H A D | ortho_jit.adb | 134 Subprg : out Address)
167 Subprg := Res.Subprg_Name;
|
| /dports/cad/ghdl/ghdl-1.0.0/src/vhdl/translate/ |
| H A D | trans-chap14.adb | 844 Subprg : O_Dnode; variable
890 Subprg : O_Dnode; variable
898 Subprg := Ghdl_Image_B1;
901 Subprg := Ghdl_Image_E8;
904 Subprg := Ghdl_Image_E32;
907 Subprg := Ghdl_Image_I32;
910 Subprg := Ghdl_Image_I64;
913 Subprg := Ghdl_Image_P32;
951 Subprg : O_Dnode; variable
956 Subprg := Ghdl_Value_B1;
[all …]
|
| H A D | trans-chap12.adb | 196 Subprg : O_Dnode; variable
231 Finish_Subprogram_Decl (Inter_List, Subprg);
233 Start_Subprogram_Body (Subprg);
254 Start_Subprogram_Body (Subprg);
275 Subprg : O_Dnode; variable
289 Finish_Subprogram_Decl (Inter_List, Subprg);
291 Start_Subprogram_Body (Subprg);
309 Subprg : O_Dnode; variable
334 Start_Subprogram_Body (Subprg);
342 Finish_Subprogram_Decl (Inter_List, Subprg);
[all …]
|
| H A D | trans-chap7.adb | 1879 Start_Association (Assoc, Subprg);
1906 (Subprg, Res_Type, Loc,
2158 Start_Association (Assoc, Subprg);
2681 Subprg : O_Dnode; variable
2697 (Subprg, Res_Type, Expr,
2718 Subprg : O_Dnode; variable
2731 (Subprg, Res_Type, Expr,
2749 Subprg : O_Dnode; variable
2765 (Subprg, Res_Type, Expr,
5348 Subprg);
[all …]
|
| H A D | trans-chap2.adb | 399 procedure Translate_Subprogram_Body (Subprg : Iir)
501 Chap4.Translate_Declaration_Chain (Subprg);
519 Rtis.Generate_Subprogram_Body (Subprg);
530 (Subprg, Subprg_Translate_Spec_And_Body);
542 New_Debug_Line_Stmt (Get_Line_Number (Subprg));
557 Chap4.Translate_Declaration_Chain (Subprg);
558 Rtis.Generate_Subprogram_Body (Subprg);
560 (Subprg, Subprg_Translate_Spec_And_Body);
657 Chap4.Elab_Declaration_Chain (Subprg, Final);
680 (Get_Sequential_Statement_Chain (Subprg));
[all …]
|
| H A D | trans-chap8.adb | 1282 Start_Association (Assocs, Subprg);
1310 Subprg : O_Dnode; variable
1315 Subprg := Ghdl_Ieee_Assert_Failed;
1317 Subprg := Ghdl_Assert_Failed;
3875 Subprg : O_Dnode; variable
3932 Start_Association (Assoc, Subprg);
3961 Subprg : O_Dnode; variable
4034 Start_Association (Assoc, Subprg);
4122 Subprg : O_Dnode; variable
4866 Subprg : O_Dnode; variable
[all …]
|
| H A D | translation.adb | 49 function Get_Ortho_Decl (Subprg : Iir) return O_Dnode is
51 return Get_Info (Subprg).Subprg_Node;
726 (Name : String; Subprg : out O_Dnode)
732 Finish_Subprogram_Decl (Interfaces, Subprg);
986 Finish_Subprogram_Decl (Interfaces, Subprg);
1006 Finish_Subprogram_Decl (Interfaces, Subprg);
1013 Subprg : out O_Dnode;
1037 Finish_Subprogram_Decl (Interfaces, Subprg);
1086 Finish_Subprogram_Decl (Interfaces, Subprg);
1095 Finish_Subprogram_Decl (Interfaces, Subprg);
[all …]
|
| H A D | trans-chap5.adb | 265 Subprg : O_Dnode; variable
271 Subprg := Ghdl_Signal_Associate_B1;
274 Subprg := Ghdl_Signal_Associate_E8;
277 Subprg := Ghdl_Signal_Associate_E32;
281 Subprg := Ghdl_Signal_Associate_I32;
284 Subprg := Ghdl_Signal_Associate_I64;
287 Subprg := Ghdl_Signal_Associate_F64;
292 Start_Association (Constr, Subprg);
|
| /dports/cad/ghdl/ghdl-1.0.0/src/grt/ |
| H A D | grt-backtraces.adb | 225 Subprg : Address; variable
238 Filename, Lineno, Subprg);
239 if Subprg = Null_Address
243 elsif Subprg /= Null_Address
244 and then To_Ghdl_C_String (Subprg) (1 .. 5) = "grt__"
259 if Subprg /= Null_Address then
261 Demangle_Err (To_Ghdl_C_String (Subprg));
|
| H A D | grt-backtraces-jit.adb | 30 Subprg : out Address) is
35 Subprg := Null_Address;
37 Symbolizer_Proc.all (Pc, Filename, Lineno, Subprg);
|
| H A D | grt-backtraces-jit.ads | 30 Subprg : out System.Address);
36 Subprg : out System.Address); variable
|
| H A D | grt-unithread.adb | 35 procedure Run_Parallel (Subprg : Parallel_Subprg_Acc) is
37 Subprg.all;
|
| H A D | grt-backtraces-gcc.adb | 108 Subprg : out System.Address)
130 Subprg := Res_Subprg;
|