checkpoint.

1 files changed, 3 insertions, 1 deletions

diff --git a/projects/10/JackParser.hs b/projects/10/JackParser.hs
index 990e3ec..6f83070 100644
--- a/projects/10/JackParser.hs
+++ b/projects/10/JackParser.hs
@@ -1,6 +1,6 @@
 -- Jack Parser, as the coursework of Project 10 of Nand2Tetris course.
 -- Author: Yuchen Pei (me@ypei.me)
--- Date: January 2018
+-- Date: 2018-01-11
 {-# LANGUAGE FlexibleContexts #-}
 import Text.Parsec.Prim
 import Text.Parsec.Char
@@ -292,10 +292,12 @@ someArgs = do
   many jSpace >> char ')'
   return exps
 
+{--
 replCrWithNl :: [Char] -> [Char]
 replCrWithNl = fmap cr2nl 
   where cr2nl '\r' = '\n'
         cr2nl c = c
+        --}
 
 -- IO