From: ceriel Date: Wed, 10 May 1989 10:19:22 +0000 (+0000) Subject: reversed a-option X-Git-Tag: release-5-5~2444 X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=fdf26a7f06916c5c109eade3dcfe725495185edf;p=ack.git reversed a-option --- 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': {