===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/parse/quote.c,v
retrieving revision 1.24
retrieving revision 1.25
diff -u -p -r1.24 -r1.25
--- OpenXM_contrib2/asir2000/parse/quote.c	2005/09/28 08:40:31	1.24
+++ OpenXM_contrib2/asir2000/parse/quote.c	2005/09/30 02:20:06	1.25
@@ -1,4 +1,4 @@
-/* $OpenXM: OpenXM_contrib2/asir2000/parse/quote.c,v 1.23 2005/09/27 09:32:22 noro Exp $ */
+/* $OpenXM: OpenXM_contrib2/asir2000/parse/quote.c,v 1.24 2005/09/28 08:40:31 noro Exp $ */
 
 #include "ca.h"
 #include "parse.h"
@@ -401,7 +401,8 @@ struct fid_spec fid_spec_tab[] = {
 	{I_POINT,A_fnode,A_str,A_end},
 	{I_PAREN,A_fnode,A_end},
 	{I_MINUS,A_fnode,A_end},
-	{I_NARYOP,A_arf,A_node,A_end}
+	{I_NARYOP,A_arf,A_node,A_end},
+	{I_CONS,A_node,A_fnode,A_end}
 };
 
 #define N_FID_SPEC (sizeof(fid_spec_tab)/sizeof(struct fid_spec))