Disabled external gits
This commit is contained in:
14
cs420-acc/l3-compiler/tests/expr-and.l3
Normal file
14
cs420-acc/l3-compiler/tests/expr-and.l3
Normal file
@@ -0,0 +1,14 @@
|
||||
;; In Emacs, open this file in -*- Scheme -*- mode
|
||||
|
||||
;; Test the "and" expression
|
||||
|
||||
(@byte-write 71)
|
||||
|
||||
(and (@byte-write 65) #u)
|
||||
(and #t (@byte-write 66))
|
||||
(and #f (@byte-write 63))
|
||||
(and (@byte-write 67) #f (@byte-write 63))
|
||||
(@byte-write (and 63 68))
|
||||
(@byte-write (and #t 69))
|
||||
(@byte-write (and #t 'a' 70))
|
||||
(@byte-write (and "a" #u 63 71))
|
Reference in New Issue
Block a user