| swissChili | 923b536 | 2021-05-09 20:31:43 -0700 | [diff] [blame] | 1 | (defun add-two (a) |
| 2 | (+ a 2)) | ||||
| swissChili | a820dea | 2021-05-09 16:46:55 -0700 | [diff] [blame] | 3 | |
| swissChili | 67bdf28 | 2021-06-06 18:46:08 -0700 | [diff] [blame] | 4 | (defun main-old () |
| swissChili | a820dea | 2021-05-09 16:46:55 -0700 | [diff] [blame] | 5 | (if t |
| swissChili | 923b536 | 2021-05-09 20:31:43 -0700 | [diff] [blame] | 6 | (print (add-two (* 4 3))) |
| 7 | (print (- 3 6)))) | ||||
| swissChili | 67bdf28 | 2021-06-06 18:46:08 -0700 | [diff] [blame] | 8 | |
| 9 | (defun main() | ||||
| 10 | (let1 (a 3) | ||||
| 11 | (print "a is") | ||||
| 12 | (print a))) | ||||