Use the argument as an input program

Frege · Oct 4, 2016 · 507df05 · 507df05
1 parent cf2db91
commit 507df05
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/examples/Brainfuck.fr b/examples/Brainfuck.fr
@@ -67,7 +67,7 @@ private printAsChar i = print $ packed [Char.from i]
 -- execution environment
 
 run :: String -> IO Tape   
-run prog = execute (parse helloWorld) (Tape [] 0 [])  
+run prog = execute (parse prog) (Tape [] 0 [])
 
 main _ = do
   tape <- run helloWorld