aboutsummaryrefslogtreecommitdiff
path: root/kernel/memory/paging.dats
diff options
context:
space:
mode:
authorXander <xander@biltopia.org>2023-08-17 22:08:21 +0200
committerXander <xander@biltopia.org>2023-08-17 22:08:21 +0200
commitd177285a761de33b86fcbde72fd718137bfa6f86 (patch)
tree3a880d6df65418ea591be69cf36fd3da8e679f07 /kernel/memory/paging.dats
parente2d7deb82cd25b47cbccda0c48ab39e17c5c536d (diff)
downloadats-os-d177285a761de33b86fcbde72fd718137bfa6f86.tar.xz
ats-os-d177285a761de33b86fcbde72fd718137bfa6f86.zip
Add valid/unvalid type, replacement of optional
Diffstat (limited to 'kernel/memory/paging.dats')
-rw-r--r--kernel/memory/paging.dats6
1 files changed, 6 insertions, 0 deletions
diff --git a/kernel/memory/paging.dats b/kernel/memory/paging.dats
index 9b55624..84a8bf4 100644
--- a/kernel/memory/paging.dats
+++ b/kernel/memory/paging.dats
@@ -6,6 +6,7 @@ staload UN = "prelude/SATS/unsafe.sats"
staload "./paging.sats"
staload "./frame.sats"
+staload "lib/SATS/valid.sats"
assume entry_type = uint64
@@ -28,3 +29,8 @@ implement flag_contains(entry,flag) =
| NO_EXECUTE() => 63
))) != zero
+(* implement test() = let *)
+(* in *)
+(* (5,true) *)
+(* end *)
+