grino/examples/set.gri

10 lines
125 B
Plaintext
Raw Normal View History

2023-09-12 10:20:29 +00:00
($ a 1)
(set! a 2)
(assert= 2 a )
2023-09-12 10:20:29 +00:00
($ (b x) (+ x 1))
($ (c x) (* x 2))
($ d b)
(assert= 3 (d 2))
2023-09-12 10:20:29 +00:00
(set! d c)
(assert= 4 (d 2))