1 files changed, 7 insertions, 0 deletions
diff --git a/parser.c b/parser.c
index 8b5be46..a2b045e 100644
--- a/parser.c
+++ b/parser.c
@@ -448,9 +448,16 @@ Integer:
 	if(peek == L'\''){
 		peek = Bgetrune(parsein);
 		while(peek != L'\''){
+QuotedAtomLoop:
 			buf[i++] = peek;
 			peek = Bgetrune(parsein);
 		}
+		peek = Bgetrune(parsein);
+		if(peek == L'\'')
+			goto QuotedAtomLoop;
+		else
+			Bungetrune(parsein);
+
 		buf[i] = '\0';
 		lookahead.tag = AtomTok;
 		lookahead.text = runestrdup(buf);