fix a bug related to immediate symbol value

This commit is contained in:
Yuichi Nishiwaki 2013-10-29 02:33:49 +09:00
parent 9424f0b9c0
commit 4402497a46
1 changed files with 4 additions and 4 deletions

View File

@ -144,19 +144,19 @@ list_data
abbrev
: tQUOTE datum
{
$$ = pic_list(p->pic, 2, p->pic->sQUOTE, $2);
$$ = pic_list(p->pic, 2, pic_symbol_value(p->pic->sQUOTE), $2);
}
| tQUASIQUOTE datum
{
$$ = pic_list(p->pic, 2, p->pic->sQUASIQUOTE, $2);
$$ = pic_list(p->pic, 2, pic_symbol_value(p->pic->sQUASIQUOTE), $2);
}
| tUNQUOTE datum
{
$$ = pic_list(p->pic, 2, p->pic->sUNQUOTE, $2);
$$ = pic_list(p->pic, 2, pic_symbol_value(p->pic->sUNQUOTE), $2);
}
| tUNQUOTE_SPLICING datum
{
$$ = pic_list(p->pic, 2, p->pic->sUNQUOTE_SPLICING, $2);
$$ = pic_list(p->pic, 2, pic_symbol_value(p->pic->sUNQUOTE_SPLICING), $2);
}
;