diff options
| author | Tristan Gingold <tgingold@free.fr> | 2016-03-31 06:29:15 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2016-03-31 06:29:15 +0200 |
| commit | e29e126bc30cf3fdfee9962a2f6d0fed0a08c94c (patch) | |
| tree | 0d516e6c13a7c568171397113f405ad0c879210f /src/vhdl | |
| parent | 19793a92b42898c81db8f069f777e95635130e36 (diff) | |
| download | ghdl-e29e126bc30cf3fdfee9962a2f6d0fed0a08c94c.tar.gz ghdl-e29e126bc30cf3fdfee9962a2f6d0fed0a08c94c.tar.bz2 ghdl-e29e126bc30cf3fdfee9962a2f6d0fed0a08c94c.zip | |
Minor cleanup.
Diffstat (limited to 'src/vhdl')
| -rw-r--r-- | src/vhdl/translate/trans-helpers2.adb | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/src/vhdl/translate/trans-helpers2.adb b/src/vhdl/translate/trans-helpers2.adb index b6df362ee..b1442fb92 100644 --- a/src/vhdl/translate/trans-helpers2.adb +++ b/src/vhdl/translate/trans-helpers2.adb @@ -128,15 +128,6 @@ package body Trans.Helpers2 is New_Procedure_Call (Constr); end Gen_Memcpy; - -- function Gen_Malloc (Length : O_Enode; Ptype : O_Tnode) return O_Enode - -- is - -- Constr : O_Assoc_List; - -- begin - -- Start_Association (Constr, Ghdl_Malloc); - -- New_Association (Constr, Length); - -- return New_Convert_Ov (New_Function_Call (Constr), Ptype); - -- end Gen_Malloc; - function Gen_Alloc (Kind : Allocation_Kind; Size : O_Enode; Ptype : O_Tnode) return O_Enode |