Execute Brain****/ALGOL 68: Difference between revisions
Content added Content deleted
m (RCBF (ALGOL 68) moved to RCBF/ALGOL 68: MW has page hierarchy support. (Who'da thunk it?)) |
m (Categorization now in master page) |
||
Line 1: | Line 1: | ||
{{implementation|Brainf***}}{{collection|RCBF}} |
{{implementation|Brainf***}}{{collection|RCBF}} |
||
=={{header|ALGOL 68}}== |
|||
An implementation of BF for Rosetta Code. |
An implementation of BF in [[ALGOL 68]] for Rosetta Code. |
||
<lang algol68>MODE BYTE = SHORT SHORT SHORT INT; |
|||
MODE CADDR = BYTE; # code address # |
MODE CADDR = BYTE; # code address # |
||
Line 60: | Line 60: | ||
FOR i TO UPB code list DO byte code list[i] := ABS code list[i] OD; |
FOR i TO UPB code list DO byte code list[i] := ABS code list[i] OD; |
||
run(byte code list) |
run(byte code list)</lang> |