1
0
Fork 0
mirror of https://github.com/Reuh/anselme.git synced 2025-10-28 00:59:31 +00:00
anselme/test/tests/scope checkpoint mutable.ans

29 lines
No EOL
186 B
Text

:l = *[1]
:n = 0
:$ f(t)
t!insert(len(l)+1)
|f1: {l} {t}
|CHECK
merge branch!
n < 1 ~
|REC
n += 1
f(t)
|END REC
t!insert(len(t)+1)
|f2: {l}
f(l)
|FINAL
|l: {l}