#!/bin/sh

source $testsuitedir/lib_test.sh

cat > PROGRAMME << EOP
	:interruption FPE fpe
	:new INT , PTR
	-3 -> &0
:label loop
	:new INT -> &1
	@&0 / @&0 -> &@&1
	:increase &0
	:goto loop :when @&0 <=3
	:delete &0, &1
	:shutdown
:label fpe
	1 -> &@&1
	:return
EOP

cat > MEMOIRE_INITIALE << EOM
# Memory:
# Aliases:
# Free addresses:
# Free blocks:
# End of memory
EOM

cat > MEMOIRE_REF << EOM
# Memory:
#> &2 : INT 1
#> &3 : INT 1
#> &4 : INT 1
#> &5 : INT 1
#> &6 : INT 1
#> &7 : INT 1
#> &8 : INT 1
# Aliases:
# Free addresses:
# From &0 on 2 addresses
# Free blocks:
# Block of 2 free addresses from &0
# End of memory
EOM

cat > STDOUT_REF << EOS
EOS

cat > STDERR_REF << EOS
EOS

cat > CODE_RETOUR_REF << EOC
0
EOC

test_basique
