mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
27f0a7ca44
* refactor tests and analysis passes * identity test working * combine test categories with only a few cases * more fixes
16 lines
233 B
Common Lisp
16 lines
233 B
Common Lisp
(let ((var1 10)
|
|
(var2 20)
|
|
(sum 0)
|
|
)
|
|
|
|
(protect (var1 var2)
|
|
(set! var1 1)
|
|
(set! var2 2)
|
|
(+! sum var1)
|
|
(+! sum var2)
|
|
)
|
|
(+! sum var1)
|
|
(+! sum var2)
|
|
sum
|
|
)
|