sexpr: properly convert from str to sym

jeffpc · jeffpc · commit 1781f90be757 · 2017-08-23T23:47:59.000+03:00
The rewrite of struct str introduced a regression where all symbols got
parsed as strings.

Signed-off-by: Josef 'Jeff' Sipek &lt;jeffpc@josefsipek.net&gt;
diff --git a/sexpr.y b/sexpr.y
@@ -66,7 +66,7 @@ void sexpr_error2(const char *e, const char *yytext)
 document : tok			{ data->output = $1; }
 	 ;
 
-tok : SYMBOL			{ $$ = str_cast_to_val($1); }
+tok : SYMBOL			{ $$ = VAL_DUP_SYM(str_cstr($1)); str_putref($1); }
     | STRING			{ $$ = str_cast_to_val($1); }
     | NUMBER			{ $$ = VAL_ALLOC_INT($1); }
     | BOOL			{ $$ = VAL_ALLOC_BOOL($1); }

Original file line number	Diff line number	Diff line change
`@@ -66,7 +66,7 @@ void sexpr_error2(const char e, const char yytext)`
`66`	`66`	`document : tok { data->output = $1; }`
`67`	`67`	`;`
`68`	`68`
`69`		`-tok : SYMBOL { $$ = str_cast_to_val($1); }`
	`69`	`+tok : SYMBOL { $$ = VAL_DUP_SYM(str_cstr($1)); str_putref($1); }`
`70`	`70`	`\| STRING { $$ = str_cast_to_val($1); }`
`71`	`71`	`\| NUMBER { $$ = VAL_ALLOC_INT($1); }`
`72`	`72`	`\| BOOL { $$ = VAL_ALLOC_BOOL($1); }`