Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;Uncomment the following to test
- ;1
- ; expect 1
- ;'(1 2)
- ; expect (1 2)
- ;'(1 2 . 3)
- ; expect (1 2 . 3)
- ;(define x 3)
- ;x
- ; expect 3
- ;(+ 1 2)
- ; expect 3
- ;(+ 1 (- 6 2))
- ; expect 5
- ;(lambda (x) (+ 1 2))
- ;(define f (lambda (x) (+ x 3)))
- ;(f 3)
- ;expect 6
- ;(define foo (x) (set! z x) (* z x))
- ;foo
- ;Evaluation.check_formals(Pair(Symbol('x'), Pair(Number(9), NULL)))
- ; expect Error
Advertisement
Add Comment
Please, Sign In to add comment