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

14
cs420-acc/l3-compiler/tests/prim-mod.l3 Normal file
View File

@@ -0,0 +1,14 @@
;; In Emacs, open this file in -*- Scheme -*- mode
;; Test the @% primitive
(@byte-write 72)
(@byte-write (@% 65 66)) ;A
(@byte-write (@% 133 67)) ;B
(@byte-write (if (@= (@% 15 4) 3) 67 63)) ;C
(@byte-write (if (@= (@% 15 -4) 3) 68 63)) ;D
(@byte-write (if (@= (@% -15 4) -3) 69 63)) ;E
(@byte-write (if (@= (@% -15 -4) -3) 70 63)) ;F
(@byte-write (if (@= (@% -1073741824 1) 0) 71 63)) ;G
(@byte-write (if (@= (@% 1073741823 2) 1) 72 63)) ;H