diff options
Diffstat (limited to 'kernel/prelude')
-rw-r--r-- | kernel/prelude/SATS/safe_casts.sats | 1 | ||||
-rw-r--r-- | kernel/prelude/kernel_prelude.hats | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/kernel/prelude/SATS/safe_casts.sats b/kernel/prelude/SATS/safe_casts.sats new file mode 100644 index 0000000..50a68a8 --- /dev/null +++ b/kernel/prelude/SATS/safe_casts.sats @@ -0,0 +1 @@ +castfn u2uint64{v : nat | v <= 0xFFFFFFFFFFFFFFFF}(v : uint v) : uint64 v diff --git a/kernel/prelude/kernel_prelude.hats b/kernel/prelude/kernel_prelude.hats index 39e7560..514c2c2 100644 --- a/kernel/prelude/kernel_prelude.hats +++ b/kernel/prelude/kernel_prelude.hats @@ -4,6 +4,7 @@ #include "share/atspre_staload.hats" staload "./DATS/print.dats" +staload "./SATS/safe_casts.sats" #endif |