From 66ae2822dd269332a06641d8fc0da0c0e60734eb Mon Sep 17 00:00:00 2001
From: Paul Ackersviller <packersv@users.sourceforge.net>
Date: Sun, 11 Nov 2007 21:51:20 +0000
Subject: Merge of 23115: add ";|" at end of case statement to cause testing of
 later patterns.

---
 Src/lex.c | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'Src/lex.c')

diff --git a/Src/lex.c b/Src/lex.c
index 5b001c4eb..e91cecfbc 100644
--- a/Src/lex.c
+++ b/Src/lex.c
@@ -158,6 +158,7 @@ mod_export char *tokstrings[WHILE + 1] = {
     "))",	/* DOUTPAR	     */
     "&|",	/* AMPERBANG	  30 */
     ";&",	/* SEMIAMP	     */
+    ";|",	/* SEMIBAR	     */
 };
 
 /* lexical state */
@@ -384,6 +385,7 @@ ctxtlex(void)
     case SEMI:
     case DSEMI:
     case SEMIAMP:
+    case SEMIBAR:
     case AMPER:
     case AMPERBANG:
     case INPAR:
@@ -716,6 +718,8 @@ gettok(void)
 	    return DSEMI;
 	else if(d == '&')
 	    return SEMIAMP;
+	else if (d == '|')
+	    return SEMIBAR;
 	hungetc(d);
 	lexstop = 0;
 	return SEMI;
-- 
cgit 1.4.1