Execute Brain****/ALGOL 68: Difference between revisions
Allow for nested []
(I can read it, but I don't know the language enough to fix it.) |
(Allow for nested []) |
||
Line 1:
{{implementation|Brainf***}}{{collection|RCBF}}
Line 38 ⟶ 32:
# [ # VOID:
IF data list[data addr] = zero THEN
INT br
IF code list[code addr] = ABS "["
THEN
br level +:= 1;
ELIF code list[code addr] = ABS "]"
THEN
br level -:= 1
FI;
IF br level > 0
THEN
code addr +:= 1;
TRUE
ELSE
FALSE
FI
DO SKIP OD
FI,
# ] # VOID:
IF data list[data addr] /= zero THEN
INT br
IF code list[code addr] = ABS "["
THEN
br level +:= 1
ELIF code list[code addr] = ABS "]"
THEN
br level -:= 1
FI;
code addr -:= 1;
br level < 0
DO SKIP OD
FI
| |||