beautify bf.isbpl
This commit is contained in:
parent
1ccae742d6
commit
c03c0b7615
1 changed files with 8 additions and 8 deletions
16
bf.isbpl
16
bf.isbpl
|
@ -63,14 +63,14 @@ func makeCode {
|
||||||
func parse {
|
func parse {
|
||||||
with c ;
|
with c ;
|
||||||
|
|
||||||
c "+" eq if { "arr idx arr idx aget ++ 256 % aput" 2 stop }
|
c "+" eq if { "arr idx arr idx aget ++ 256 % aput" 2 stop }
|
||||||
c "-" eq if { "arr idx arr idx aget -- 256 % aput" 2 stop }
|
c "-" eq if { "arr idx arr idx aget -- 256 % aput" 2 stop }
|
||||||
c ">" eq if { "idx ++ =idx" 2 stop }
|
c ">" eq if { "idx ++ =idx" 2 stop }
|
||||||
c "<" eq if { "idx -- =idx" 2 stop }
|
c "<" eq if { "idx -- =idx" 2 stop }
|
||||||
c "[" eq if { "while { arr idx aget } {" 2 stop }
|
c "[" eq if { "while { arr idx aget } {" 2 stop }
|
||||||
c "]" eq if { "}" 2 stop }
|
c "]" eq if { "}" 2 stop }
|
||||||
c "." eq if { "arr idx aget _char putchar" 2 stop }
|
c "." eq if { "arr idx aget _char putchar" 2 stop }
|
||||||
c "," eq if { "arr idx stdin STREAM.read stream _int 256 % aput" 2 stop }
|
c "," eq if { "arr idx stdin STREAM.read stream _int 256 % aput" 2 stop }
|
||||||
""
|
""
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue