From 2851a60eb0b78c4f5d5016ce50dc5dba8baf9979 Mon Sep 17 00:00:00 2001
From: darkf <lw9k123@gmail.com>
Date: Sun, 20 Oct 2013 16:21:41 -0700
Subject: [PATCH] fix whitespace after string literals

---
 parser.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/parser.hs b/parser.hs
index 89c2c63..6c0c0ad 100644
--- a/parser.hs
+++ b/parser.hs
@@ -46,6 +46,7 @@ stringLiteral = do
 	char '"'
 	x <- many stringChar
 	char '"'
+	whiteSpace
 	return x
 
 block = do