diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-05-03 19:30:22 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-05-04 19:04:09 +0200 |
commit | ff7dc8f280ace0c0c2e307e62fda21f75359f096 (patch) | |
tree | fe0c50aed3767fbf858c2b3ddd0fa37f141f752e /src/synth/synth-objtypes.ads | |
parent | 7792975e486d010c8a6f85fe3ff9c01afc65d015 (diff) | |
download | ghdl-ff7dc8f280ace0c0c2e307e62fda21f75359f096.tar.gz ghdl-ff7dc8f280ace0c0c2e307e62fda21f75359f096.tar.bz2 ghdl-ff7dc8f280ace0c0c2e307e62fda21f75359f096.zip |
synth: move copy_memory to synth-objtypes; add unshare.
Diffstat (limited to 'src/synth/synth-objtypes.ads')
-rw-r--r-- | src/synth/synth-objtypes.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/synth/synth-objtypes.ads b/src/synth/synth-objtypes.ads index 91ffcc32e..339197489 100644 --- a/src/synth/synth-objtypes.ads +++ b/src/synth/synth-objtypes.ads @@ -283,6 +283,10 @@ package Synth.Objtypes is function Is_Equal (L, R : Memtyp) return Boolean; + procedure Copy_Memory (Dest : Memory_Ptr; Src : Memory_Ptr; Sz : Size_Type); + + function Unshare (Src : Memtyp) return Memtyp; + procedure Init; -- Set by Init. |