1
0
Fork 0
mirror of https://github.com/Reuh/anselme.git synced 2025-10-28 00:59:31 +00:00

Firth test batch and associated fixes

This commit is contained in:
Étienne Fildadut 2023-12-31 14:30:14 +01:00
parent aa8dfbd498
commit 409a2e7095
22 changed files with 516 additions and 5 deletions

View file

@ -0,0 +1,87 @@
:@choice = 2
:f = "f"!script($_)
| a |>
|-> a
#p!checkpoint
| aa |>
|-> aa
| ab |>
|-> ab
| b |>
|-> b
choice = 2
| c |>
|-> c
choice=1
| f:
f!
| f from #p:
f!from(#p)
:g = "g"!script($_)
| a |>
|-> a
#p!checkpoint
| aa |>
|-> aa
| ab |>
|-> ab
| b |>
|-> b
choice = 2
|autoflush
| c |>
|-> c
choice = 1
| g:
g!
| g from #p:
g!from(#p)
:h = "h"!script($_)
1 ~
| a |>
|-> a
#p!checkpoint
| aa |>
|-> aa
| ab |>
|-> ab
choice = 1
| b |>
|-> b
| c |>
|-> c
choice = 1
| h:
h!
| h from #p:
h!from(#p)
:i = "i"!script($_)
| a |>
|-> a
#p!checkpoint
| aa |>
|-> aa
| ab |>
|-> ab
| b |>
|-> b
1 ~
| c |>
|-> c
| i:
i!
| i from #p:
i!from(#p)