--- parser3/src/main/compile.tab.C	2001/08/20 13:22:05	1.6
+++ parser3/src/main/compile.tab.C	2001/08/22 07:31:53	1.7
@@ -31,7 +31,7 @@
 
 #line 8 "compile.y"
 
-static char *RCSId="$Id: compile.tab.C,v 1.6 2001/08/20 13:22:05 parser Exp $"; 
+static char *RCSId="$Id: compile.tab.C,v 1.7 2001/08/22 07:31:53 parser Exp $"; 
 
 /**
 	@todo parser4: 
@@ -1863,12 +1863,18 @@ static int yylex(YYSTYPE *lvalp, void *p
 					PC.string->APPEND_CLEAN(begin, end-begin, PC.file, begin_line);
 				}
 				// reset piece 'begin' position & line
-				begin=PC.source; // ^
+				end=begin=PC.source; // ^
 				begin_line=PC.line;
-				// skip over ^ and _
-				PC.source++;  PC.col++;
-				// skip analysis = forced literal
-				continue;
+				if(PC.ls==LS_METHOD_AFTER) {
+					pop_LS(PC);
+					result=EON;
+					goto break2;
+				} else {
+					// skip over _ after ^
+					PC.source++;  PC.col++;
+					// skip analysis = forced literal
+					continue;
+				}
 
 			// converting ^#HH into char(hex(HH))
 			case '#':