Copy over LISP code

This commit is contained in:
Tyler Wilding 2020-10-08 00:05:01 -04:00
parent 663453769c
commit 097a9157f5
127 changed files with 34 additions and 11 deletions

View file

@ -1,2 +0,0 @@
; simply return an integer
#x123456789

View file

@ -1 +0,0 @@
(+ 15 -2)

View file

@ -1,2 +0,0 @@
; simply return an integer
#x123456789

View file

@ -1 +0,0 @@
#x17

View file

@ -1 +0,0 @@
-17

View file

@ -1 +0,0 @@
-2147483648

View file

@ -1 +0,0 @@
-2147483649

View file

@ -1 +0,0 @@
0

View file

@ -1 +0,0 @@
-123

View file

@ -0,0 +1,4 @@
; TODO this would be an easy function to templatize
; but I'm not sure how to easily do it in test_arithmetic.cpp without repeating the fixture boilerplate
(+ 15 -2)

View file

@ -0,0 +1,12 @@
;; test the use of #cond to evaluate goos expressions at compile time
(#cond
((> 2 (+ 2 1))
1
(invalid-code)
)
((< 2 (+ 1 2))
3
)
)

View file

@ -0,0 +1,10 @@
(defun return-13 ()
13)
(defun return-12 ()
12)
(defun return-11 ()
11)
(return-12)

View file

@ -0,0 +1,8 @@
(define my-number 36)
(defun return-my-number ()
my-number)
(define my-number 42)
(return-my-number)

Some files were not shown because too many files have changed in this diff Show more