Init

2022-04-07 18:33:05 +02:00
commit 091ba18f50
177 changed files with 4870 additions and 0 deletions
--- a/cs420-acc/l3-warmup/tests/prim-block-alloc.l3
+++ b/cs420-acc/l3-warmup/tests/prim-block-alloc.l3
@@ -0,0 +1,8 @@
+;; In Emacs, open this file in -*- Scheme -*- mode
+
+;; Test the @block-alloc-0? primitive
+
+(@byte-write 66)
+
+(@byte-write (if (@= (@block-alloc-0 0) (@block-alloc-0 0)) 63 65)) ;A
+(@byte-write (if (not (@= (@block-alloc-0 0) (@block-alloc-0 0))) 66 63)) ;B