From: ceriel Date: Fri, 24 Jun 1988 14:55:27 +0000 (+0000) Subject: LLscan either macro or function X-Git-Tag: release-5-5~3152 X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=e67a70cbea54dd6a36dbe16220daa1e2aa3a6707;p=ack.git LLscan either macro or function --- diff --git a/util/LLgen/lib/incl b/util/LLgen/lib/incl index 99a1913fc..77dbe7522 100644 --- a/util/LLgen/lib/incl +++ b/util/LLgen/lib/incl @@ -10,7 +10,10 @@ extern int LLsymb; #define LL_SAFE(x) /* Nothing */ #define LL_SSCANDONE(x) if (LLsymb != x) LLerror(x); else #define LL_SCANDONE(x) if (LLsymb != x) LLerror(x); else -#define LL_NOSCANDONE(x) if ((LLsymb = LL_LEXI()) != x) LLerror(x); else +#define LL_NOSCANDONE(x) LLscan(x) +#ifdef LL_FASTER +#define LLscan(x) if ((LLsymb = LL_LEXI()) != x) LLerror(x); else +#endif # include "Lpars.h" diff --git a/util/LLgen/lib/rec b/util/LLgen/lib/rec index 91bdd1973..7ad1b1f75 100644 --- a/util/LLgen/lib/rec +++ b/util/LLgen/lib/rec @@ -20,7 +20,9 @@ static int LLlevel; extern LLread(); extern int LLskip(); extern int LLnext(); +#ifndef LLscan extern LLscan(); +#endif extern LLerror(); # ifndef LLNOFIRSTS extern int LLfirst(); @@ -28,6 +30,7 @@ extern int LLfirst(); extern LLnewlevel(); extern LLoldlevel(); +#ifndef LLscan LLscan(t) { /* * Check if the next symbol is equal to the parameter @@ -40,6 +43,7 @@ LLscan(t) { */ LLerror(t); } +#endif LLread() { for (;;) {