From 5f05fed38f17734dde86c405ce92b8f6195613f5 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Wed, 23 Oct 2013 12:00:53 +0900
Subject: [PATCH] add missing extended identifier characters

---
 src/scan.l | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/scan.l b/src/scan.l
index 6f8af06b..ac494c2c 100644
--- a/src/scan.l
+++ b/src/scan.l
@@ -26,7 +26,7 @@ static pic_value new_escaped_string(pic_state *, const char *);
 boolean		#t|#f|#true|#false
 
   /* symbol */
-identifier	[a-z0-9A-Z+-/*?<=>_.]+
+identifier	[a-z0-9A-Z+-/*!$%&:@^~?<=>_.]+
 
   /* number */
 digit		[0-9]