sora/epfl-archive
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Disabled external gits

Browse Source
This commit is contained in:
choelzl
2022-04-07 18:43:21 +02:00
parent 182267a8cb
commit 88cb3426ad
1067 changed files with 102374 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
cs420-acc/l3-compiler/tests/expr-or.l3 Normal file
View File

@@ -0,0 +1,13 @@
;; In Emacs, open this file in -*- Scheme -*- mode
;; Test the "or" expression
(@byte-write 70)
(or (@byte-write 65) #u)
(or #f (@byte-write 66))
(or #t (@byte-write 63))
(or (@byte-write 67) #t (@byte-write 63))
(@byte-write (or 68 63))
(@byte-write (or #f 69))
(@byte-write (or #f #f 70))