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 {
|
||||
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 { "idx ++ =idx" 2 stop }
|
||||
c "<" eq if { "idx -- =idx" 2 stop }
|
||||
c "[" eq if { "while { arr idx aget } {" 2 stop }
|
||||
c "]" eq if { "}" 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 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 { "while { arr idx aget } {" 2 stop }
|
||||
c "]" eq if { "}" 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 }
|
||||
""
|
||||
}
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue