===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/parse/ytab.c,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -p -r1.6 -r1.7
--- OpenXM_contrib2/asir2000/parse/ytab.c	2004/06/18 05:57:00	1.6
+++ OpenXM_contrib2/asir2000/parse/ytab.c	2004/06/22 00:33:25	1.7
@@ -1599,7 +1599,7 @@ case 62:
 					if ( f )
 						yyval.f = mkfnode(2,I_FUNC,f,mkfnode(1,I_LIST,0));
 					else {
-						gen_searchf(yyvsp[0].p,(FUNC *)&f);
+						gen_searchf_searchonly(yyvsp[0].p,(FUNC *)&f);
 						if ( f )
 							makesrvar(f,(P *)&val);
 						else