p.holder.merge(pending);
if (p.parents().contains(parent)) return true;
p.parents().add(parent, true);
- if (p!=parent && !fromEmptyReduction && reducing) p.queueReductions(parent);
+ if (p!=parent && !fromEmptyReduction && reducing) p.performReductions(parent);
return true;
}
private boolean newNode3(Node parent, Forest pending, State state, boolean fromEmptyReduction) {
//return;
} while(false);
- Node n = new Node(parent, pending, state, fromEmptyReduction); // ALLOC
+ Node n = new Node(parent, pending, state); // ALLOC
if (reducing) {
- n.queueEmptyReductions();
- if (!fromEmptyReduction) n.queueReductions(parent);
+ n.performEmptyReductions();
+ if (!fromEmptyReduction) n.performReductions(parent);
}
return true;
}
int num = hash.size();
for(int i=0; i<num; i++) {
Node n = reducing_list[i];
- n.queueEmptyReductions();
+ n.performEmptyReductions();
// INVARIANT: we never "see" a node until its parent-set is complete, modulo merges
}
for(int i=0; i<num; i++) {
Node n = reducing_list[i];
reducing_list[i] = null;
- n.queueReductions();
+ n.performReductions();
}
} catch (Reset r) {
reset();
public Forest pending() { return Phase.this.closed ? holder().resolve() : holder; }
public FastSet<Node> parents() { return this; }
- public void queueReductions() {
- if (!reducing) return;
+ public void performReductions() {
if (allqueued) return;
allqueued = true;
state.invokeReductions(token, this, this, null);
}
- public void queueReductions(Node n2) {
- if (!allqueued) { queueReductions(); return; }
- state.invokeReductions(token, this, this, n2);
+ public void performReductions(Node n2) {
+ if (!allqueued) performReductions();
+ else state.invokeReductions(token, this, this, n2);
}
public final void invoke(Reduction r, Node n, Node n2) {
- if (n==null) {
- if (r.position.pos==0) r.reduce(this);
- } else if (r.position.pos==0) return;
- else if (n2==null) r.reduce(n);
- else r.reduce(n, n2);
+ if (n==null || n2==null || r.position.pos==0) {
+ if (r.position.pos==0) {
+ if (n==null) n = this;
+ else return;
+ }
+ if (n==null) return;
+ Forest[] holder = new Forest[r.position.pos];
+ if (r.position.pos==0) n.finish(r, r.zero(), n.phase(), holder);
+ else n.reduce(r, r.position.pos-1, n.phase(), holder);
+ } else {
+ Forest[] holder = new Forest[r.position.pos];
+ if (r.position.pos<=0) throw new Error("called wrong form of reduce()");
+ int pos = r.position.pos-1;
+ Forest old = holder[pos];
+ holder[pos] = n.pending();
+ if (pos==0) {
+ System.arraycopy(holder, 0, r.position.holder, 0, holder.length);
+ Forest rex = r.position.rewrite(n.phase().getLocation());
+ n2.finish(r, rex, n.phase(), holder);
+ } else {
+ n2.reduce(r, pos-1, n.phase(), holder);
+ }
+ holder[pos] = old;
+ }
+ }
+
+ public void reduce(Reduction r, int pos, GSS.Phase target, Forest[] holder) {
+ Forest old = holder[pos];
+ holder[pos] = this.pending();
+ if (pos==0) {
+ System.arraycopy(holder, 0, r.position.holder, 0, holder.length);
+ for(int i=0; i<r.position.pos; i++) if (r.position.holder[i]==null) throw new Error("realbad");
+ Forest rex = r.position.rewrite(target.getLocation());
+ for(GSS.Phase.Node child : this.parents()) child.finish(r, rex, target, holder);
+ } else {
+ for(GSS.Phase.Node child : this.parents()) child.reduce(r, pos-1, target, holder);
+ }
+ holder[pos] = old;
}
- public void queueEmptyReductions() {
- if (!reducing) return;
- state.invokeReductions(token, this, null, null);
+
+ public void finish(Reduction r, Forest result, GSS.Phase target, Forest[] holder) {
+ State state0 = state.gotoSetNonTerminals.get(r.position.owner());
+ if (result==null) throw new Error();
+ if (state0!=null)
+ target.newNode(this, result, state0, r.position.pos<=0, r);
}
- private boolean fe;
- public boolean dead = false;
- public boolean redo = false;
- private Node(Node parent, Forest pending, State state, boolean fe) {
- this.fe = fe;
+ public void performEmptyReductions() { state.invokeReductions(token, this, null, null); }
+
+ private Node(Node parent, Forest pending, State state) {
this.state = state;
this.holder().merge(pending);
Phase start = parent==null ? null : parent.phase();