From fdf26a7f06916c5c109eade3dcfe725495185edf Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Wed, 10 May 1989 10:19:22 +0000
Subject: [PATCH] reversed a-option

---
 lang/pc/comp/LLlex.c | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lang/pc/comp/LLlex.c b/lang/pc/comp/LLlex.c
index 123e2ce44..9186e908a 100644
--- a/lang/pc/comp/LLlex.c
+++ b/lang/pc/comp/LLlex.c
@@ -46,6 +46,7 @@ int tokenseen = 0;	/* Some comment-options must precede any program text */
 CommentOptions()
 {
 	register int ch, ci;
+	int	on_on_minus = 0;
 	/* Parse options inside comments */
 
 	do {
@@ -73,20 +74,19 @@ CommentOptions()
 
 		case 'l':	ci = 'L' ;	/* for indexing */
 			/* fall through */
+		case 'L':			/* FIL & LIN instructions */
+		case 'R':			/* range checks */
 		case 'a':			/* assertions */
+			on_on_minus = 1;
+			/* fall through */
 		case 't':			/* tracing */
 		case 'A':			/* extra array range-checks */
-		case 'L':			/* FIL & LIN instructions */
-		case 'R':			/* range checks */
-		{
-			int on_on_minus = (ci == 'L' || ci == 'R');
-
 			LoadChar(ch);
 			if( ch == '-' ) options[ci] = on_on_minus;
 			else if( ch == '+' ) options[ci] = !on_on_minus;
 			else PushBack();
+			on_on_minus = 0;
 			break;
-		}
 
 		case 'i':
 		{
-- 
2.34.1