mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 11:26:18 -04:00
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
|
|
)
|