- if (n==null) return;
- Forest[] holder = new Forest[r.pos];
- if (r.pos==0) n.finish(r, r.zero(n.phase().getLocation().createRegion(n.phase().getLocation())), n.phase());
- else n.reduce(r, r.pos-1, n.phase(), null);
- } else {
- if (r.pos<=0) throw new Error("called wrong form of reduce()");
- int pos = r.pos-1;
- n.reduce(r, pos, n.phase(), n2);
- }
- }
-
- public void reduce(Position r, int pos, GSS.Phase target, Node only) {
- Forest[] holder = r.holder;
- Forest old = holder[pos];
-
- //toplevel_reductions++;
- HashSet<Forest> rr = new HashSet<Forest>();
- for(Forest result : results()) {
- rr.add(result);
- }
- //System.out.println(r);
- for(Forest result : rr) {
- for(Node child : ((Forest.Many<?>)result).parents) {
- if (only != null && child!=only) continue;
- holder[pos] = result;
- if (pos==0) child.finish(r, r.rewrite(child.phase().getLocation().createRegion(target.getLocation())), target);
- else child.reduce(r, pos-1, target, null);