aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/types_utils.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/types_utils.ads')
-rw-r--r--src/synth/types_utils.ads4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/synth/types_utils.ads b/src/synth/types_utils.ads
index 71bdf5399..04196e11c 100644
--- a/src/synth/types_utils.ads
+++ b/src/synth/types_utils.ads
@@ -35,4 +35,8 @@ package Types_Utils is
function To_Uns64 is new Ada.Unchecked_Conversion
(Fp64, Uns64);
+
+ -- Sign extend V: bit SZ is copied to bits SZ + 1 .. 63/31.
+ function Sext (V : Uns64; Sz : Natural) return Uns64;
+ function Sext (V : Uns32; Sz : Natural) return Uns32;
end Types_Utils;