summaryrefslogtreecommitdiff
path: root/projects/11/JackCompiler.hs
diff options
context:
space:
mode:
Diffstat (limited to 'projects/11/JackCompiler.hs')
-rw-r--r--projects/11/JackCompiler.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/projects/11/JackCompiler.hs b/projects/11/JackCompiler.hs
index d149041..025fe12 100644
--- a/projects/11/JackCompiler.hs
+++ b/projects/11/JackCompiler.hs
@@ -499,13 +499,13 @@ testCompiler xs = do
testCompiler' :: IO ()
testCompiler' = do
--xs <- readFile "./Square/Square.jack"
- xs <- readFile "./Test.jack"
+ xs <- readFile "./Pong/Ball.jack"
testCompiler [xs]
testReader :: IO ()
testReader = do
--xs <- readFile "./Square/Square.jack"
- xs <- readFile "./Test.jack"
+ xs <- readFile "./Pong/Ball.jack"
--print $ buildSRTable $ rights $ [jackReader $ xs]
print $ jackReader $ xs