11 lines
234 B
Haskell
11 lines
234 B
Haskell
module Main where
|
|
|
|
import TuringHS
|
|
|
|
main :: IO ()
|
|
main = do
|
|
input <- readFile "helloworld.txt"
|
|
putStrLn "Running the program!"
|
|
machine <- interpret (parse input)
|
|
putStrLn $ "The final state of the machine is " ++ show machine
|