diff options
author | Tristan Gingold <tgingold@free.fr> | 2017-06-16 07:53:12 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2017-06-16 18:41:35 +0200 |
commit | 9dbe65d4db54dd5d44e2d140fa008e3150b882de (patch) | |
tree | 6a703a019cdb7ba98b2ec8f48ff9642e7093ba74 /src/vhdl/translate/trans-helpers2.adb | |
parent | d18f30ccdbd6ace83bff7d4de5af0c72b0082bb7 (diff) | |
download | ghdl-9dbe65d4db54dd5d44e2d140fa008e3150b882de.tar.gz ghdl-9dbe65d4db54dd5d44e2d140fa008e3150b882de.tar.bz2 ghdl-9dbe65d4db54dd5d44e2d140fa008e3150b882de.zip |
Allocate dynamic object in suspended procedures on stack2.
Diffstat (limited to 'src/vhdl/translate/trans-helpers2.adb')
-rw-r--r-- | src/vhdl/translate/trans-helpers2.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/vhdl/translate/trans-helpers2.adb b/src/vhdl/translate/trans-helpers2.adb index 500753bb5..11ea54042 100644 --- a/src/vhdl/translate/trans-helpers2.adb +++ b/src/vhdl/translate/trans-helpers2.adb @@ -129,8 +129,7 @@ package body Trans.Helpers2 is end Gen_Memcpy; function Gen_Alloc - (Kind : Allocation_Kind; Size : O_Enode; Ptype : O_Tnode) - return O_Enode + (Kind : Allocation_Kind; Size : O_Enode; Ptype : O_Tnode) return O_Enode is Constr : O_Assoc_List; begin |