diff options
Diffstat (limited to 'src/synth/types_utils.ads')
-rw-r--r-- | src/synth/types_utils.ads | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/synth/types_utils.ads b/src/synth/types_utils.ads index 4e01d89fc..71bdf5399 100644 --- a/src/synth/types_utils.ads +++ b/src/synth/types_utils.ads @@ -32,4 +32,7 @@ package Types_Utils is function To_Int64 is new Ada.Unchecked_Conversion (Uns64, Int64); + + function To_Uns64 is new Ada.Unchecked_Conversion + (Fp64, Uns64); end Types_Utils; |