diff options
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 9a4b28552..6b8b28b49 100644 --- a/src/vhdl/translate/trans-helpers2.adb +++ b/src/vhdl/translate/trans-helpers2.adb @@ -26,8 +26,7 @@ with Trans.Foreach_Non_Composite; package body Trans.Helpers2 is use Trans.Helpers; - procedure Copy_Fat_Pointer (D : Mnode; S: Mnode) - is + procedure Copy_Fat_Pointer (D : Mnode; S: Mnode) is begin New_Assign_Stmt (M2Lp (Chap3.Get_Array_Base (D)), M2Addr (Chap3.Get_Array_Base (S))); |