Anonymous user
Execute Brain****/Haskell: Difference between revisions
This version compiles with GHC and will run if loaded into ghci using :load BF
No edit summary |
(This version compiles with GHC and will run if loaded into ghci using :load BF) |
||
Line 8:
A more efficient implementation could for example only admit well-bracketed brainfuck programs, and parse bracket blocks first, to replace the ''matchLeft'' and ''matchRight'' which need linear time.
<lang haskell>
moveLeft (x:l,r) = (l,x:r)
moveRight (l,x:r) = (x:l,r)
Line 44 ⟶ 46:
dialog :: String -> IO ()
dialog s = mapM_ print . run s . map read . lines =<< getContents
</lang>(This version compiles with GHC and will run if loaded into ghci using ':load BF')
Example session:
| |||