diff --git a/compile.phi b/compile.phi
index 6a576bb..953b456 100644
--- a/compile.phi
+++ b/compile.phi
@@ -356,29 +356,30 @@
     (return elems)
 ))
 
-(let text (call read_text_file "program.phi"))
 
 (call println "reading file...")
-(call println "=== text ===")
-(call println text)
+(let text (call read_text_file "program.phi"))
+
+//(call println "=== text ===")
+//(call println text)
 
 (call println "tokenizing...")
 (let tokens (call tokenize text))
 
-(call println "=== tokens ===")
-(for (tok line value) tokens (do
-    (call println "%\t%\t%" line tok (if (!= value null) value ""))
-))
+//(call println "=== tokens ===")
+//(for (tok line value) tokens (do
+//    (call println "%\t%\t%" line tok (if (!= value null) value ""))
+//))
 
 (call println "parsing...")
 (let parser (call Parser tokens))
 (let (parse) parser)
 (let ast (call parse))
 
-(call println "=== ast ===")
-(for expr ast (do
-    (call print_expr expr 0)
-))
+//(call println "=== ast ===")
+//(for expr ast (do
+//    (call print_expr expr 0)
+//))
 
 (call println "emitting...")
 (let emitter (call Emitter ast))
diff --git a/vim/syntax/phi.vim b/vim/syntax/phi.vim
index 0d348e0..be682eb 100644
--- a/vim/syntax/phi.vim
+++ b/vim/syntax/phi.vim
@@ -31,7 +31,7 @@ syn match Operator '>='
 syn match Number '0'
 syn match Number '[1-9][0-9]*'
 
-syn region String   start=+"+  skip=+\\"+  end=+"+
+syn region String   start=+"+  skip=+\\\\\|\\"+  end=+"+
 
 syn keyword Todo contained TODO FIXME XXX NOTE
 syn match Comment "//.*$" contains=Todo