You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
26 lines
307 B
Racket
26 lines
307 B
Racket
9 years ago
|
#lang s-exp "bf-expander.rkt"
|
||
|
|
(bf-program
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(loop
|
||
|
|
"["
|
||
|
|
(op ">")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "+")
|
||
|
|
(op "<")
|
||
|
|
(op "-")
|
||
|
|
"]")
|
||
|
|
(op ">")
|
||
|
|
(op "."))
|