From 4402497a46859216f6de6fd3c257006701b97cec Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Tue, 29 Oct 2013 02:33:49 +0900
Subject: [PATCH] fix a bug related to immediate symbol value

---
 src/parse.y | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/parse.y b/src/parse.y
index 52baa02a..7d7bea33 100644
--- a/src/parse.y
+++ b/src/parse.y
@@ -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);
 	}
 ;