Disabled external gits
This commit is contained in:
8
cs420-acc/l3-compiler/tests/prim-block-length.l3
Normal file
8
cs420-acc/l3-compiler/tests/prim-block-length.l3
Normal file
@@ -0,0 +1,8 @@
|
||||
;; In Emacs, open this file in -*- Scheme -*- mode
|
||||
|
||||
;; Test the @block-length primitive
|
||||
|
||||
(@byte-write 66)
|
||||
|
||||
(@byte-write (@block-length (@block-alloc-0 65))) ;A
|
||||
(@byte-write (@block-length (@block-alloc-1 66))) ;B
|
Reference in New Issue
Block a user