From cb3ee5843cc0de94f9d8da11aa060cc3a01ed5f3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Sun, 15 Nov 1998 03:27:12 +0100
Subject: [PATCH] Made the start_state variable visible.
Rev: lib/modules/LR.pmod/parser.pike:1.14
---
lib/modules/LR.pmod/parser.pike | 15 +++++++--------
1 file changed, 7 insertions(+), 8 deletions(-)
diff --git a/lib/modules/LR.pmod/parser.pike b/lib/modules/LR.pmod/parser.pike
index 38c6919620..c09d6951aa 100644
--- a/lib/modules/LR.pmod/parser.pike
+++ b/lib/modules/LR.pmod/parser.pike
@@ -1,5 +1,5 @@
/*
- * $Id: parser.pike,v 1.13 1998/11/15 00:07:32 grubba Exp $
+ * $Id: parser.pike,v 1.14 1998/11/15 02:27:12 grubba Exp $
*
* A BNF-grammar in Pike.
* Compiles to a LALR(1) state-machine.
@@ -9,7 +9,7 @@
//.
//. File: parser.pike
-//. RCSID: $Id: parser.pike,v 1.13 1998/11/15 00:07:32 grubba Exp $
+//. RCSID: $Id: parser.pike,v 1.14 1998/11/15 02:27:12 grubba Exp $
//. Author: Henrik Grubbstr�m (grubba@infovav.se)
//.
//. Synopsis: LALR(1) parser and compiler.
@@ -305,7 +305,9 @@ static private mapping(mixed : multiset(object(rule))) begins = ([]);
*/
static private mapping(int : multiset(object(rule))) used_by = ([]);
-static private object(kernel) start_state;
+//. + start_state
+//. The initial LR0 state.
+object(kernel) start_state;
//. + verbose
//. Verbosity level
@@ -1308,11 +1310,8 @@ int compile()
/* Calculate Look-ahead for all items in look-back set */
- foreach (indices(i->relation), object(item) lookback) {
- /* Add Follow(i2) to the lookahead-set */
-
- i->direct_lookahead |= lookback->direct_lookahead;
- }
+ i->direct_lookahead=`|(i->direct_lookahead,
+ @indices(i->relation)->direct_lookahead);
}
}
}
--
GitLab