commit a355e02

Advance before storing start to not include opening "

 1@@ -137,8 +137,8 @@ string(parser* p)
 2 		return NULL;
 3 	}
 4 
 5-	start = p->pos;
 6 	advance(p); /* skip opening " */
 7+	start = p->pos;
 8 
 9 	while (!current_char(p, '"') && !current_char(p, '\0')) {
10 		if (current_char(p, '\\') && p->src[p->pos + 1])
11@@ -285,7 +285,7 @@ expl_print(const expl_node* node, int depth)
12 int
13 main(void)
14 {
15-	expl_node* node = expl_parse("(fn (square x) (* x x))");
16+	expl_node* node = expl_parse("(fn (\"hi\" x) (* x x))");
17 	expl_print(node, 0);
18 	freenode(node);
19 	return EXIT_SUCCESS;