add LabelNode
[sbp.git] / src / edu / berkeley / sbp / meta / GrammarAST.java
1 // Copyright 2006-2007 all rights reserved; see LICENSE file for BSD-style license
2
3 package edu.berkeley.sbp.meta;
4 import edu.berkeley.sbp.util.*;
5 import edu.berkeley.sbp.*;
6 import edu.berkeley.sbp.chr.*;
7 import edu.berkeley.sbp.misc.*;
8 import java.util.*;
9 import java.lang.annotation.*;
10 import java.lang.reflect.*;
11 import java.io.*;
12
13 /**
14  *  The inner classes of this class represent nodes in the Abstract
15  *  Syntax Tree of a grammar.
16  */
17 public class GrammarAST {
18
19     public static interface ImportResolver {
20         public InputStream getImportStream(String importname);
21     }
22
23     /**
24      *  Returns a Union representing the metagrammar (<tt>meta.g</tt>); the Tree produced by
25      *  parsing with this Union should be provided to <tt>buildFromAST</tt>
26      */
27     public static Union getMetaGrammar() {
28         return buildFromAST(MetaGrammar.meta, "s", null);
29     }
30
31     /**
32      *  Create a grammar from a parse tree and binding resolver
33      * 
34      *  @param t   a tree produced by parsing a grammar using the metagrammar
35      *  @param s   the name of the "start symbol"
36      *  @param gbr a GrammarBindingResolver that resolves grammatical reductions into tree-node-heads
37      */
38     public static Union buildFromAST(Tree grammarAST, String startingNonterminal, ImportResolver resolver) {
39         return new GrammarAST(resolver, "").buildGrammar(grammarAST, startingNonterminal);
40     }
41
42     private static Object illegalTag = ""; // this is the tag that should never appear in the non-dropped output FIXME
43
44     // Instance //////////////////////////////////////////////////////////////////////////////
45
46     private final String prefix;
47     private final ImportResolver resolver;
48
49     public GrammarAST(ImportResolver resolver, String prefix) {
50         this.prefix = prefix;
51         this.resolver = resolver;
52     }
53
54     // Methods //////////////////////////////////////////////////////////////////////////////
55
56     private Union buildGrammar(Tree t, String rootNonTerminal) {
57         Object o = walk(t);
58         if (o instanceof Union) return (Union)o;
59         return ((GrammarAST.GrammarNode)o).build(rootNonTerminal);
60     }
61
62     private Object[] walkChildren(Tree t) {
63         Object[] ret = new Object[t.size()];
64         for(int i=0; i<ret.length; i++)
65             ret[i] = walk(t.child(i));
66         return Reflection.lub(ret);
67     }
68     private static String stringifyChildren(Tree t) {
69         StringBuffer sb = new StringBuffer();
70         for(int i=0; i<t.size(); i++) {
71             sb.append(t.child(i).head());
72             sb.append(stringifyChildren(t.child(i)));
73         }
74         return sb.toString();
75     }
76     private static String unescape(Tree t) {
77         StringBuffer sb = new StringBuffer();
78         for(int i=0; i<t.size(); i++)
79             sb.append(t.child(i).head()+stringifyChildren(t.child(i)));
80         return sb.toString();
81     }
82
83     private ElementNode walkElement(Tree t) { return (ElementNode)walk(t); }
84     private String      walkString(Tree t) { return (String)walk(t); }
85     private Seq         walkSeq(Tree t) { return (Seq)walk(t); }
86     private Object walk(Tree t) {
87         String head = (String)t.head();
88         while(head.indexOf('.') > 0)
89             head = head.substring(head.indexOf('.')+1);
90         if (head==null) throw new RuntimeException("head is null: " + t);
91         if (head.equals("|")) return walkChildren(t);
92         if (head.equals("RHS")) return walkChildren(t);
93         if (head.equals("Grammar")) return new GrammarNode(walkChildren(t));
94         if (head.equals("(")) return new UnionNode((Seq[][])walkChildren(t.child(0)));
95         if (head.equals("Word")) return stringifyChildren(t);
96         if (head.equals("Elements")) return new Seq((ElementNode[])Reflection.rebuild(walkChildren(t), ElementNode[].class));
97         if (head.equals("NonTerminalReference")) return new ReferenceNode(stringifyChildren(t.child(0)));
98         if (head.equals(")"))   return new ReferenceNode(stringifyChildren(t.child(0)), true);
99         if (head.equals(":"))   return new LabelNode(stringifyChildren(t.child(0)), walkElement(t.child(1)));
100         if (head.equals("::"))  return walkSeq(t.child(1)).tag(walkString(t.child(0)));
101         if (head.equals("...")) return new DropNode(new RepeatNode(new TildeNode(new AtomNode()), null, true,  true,  false));
102
103         if (head.equals("++"))  return new RepeatNode(walkElement(t.child(0)), null,                      false, true,  true);
104         if (head.equals("+"))   return new RepeatNode(walkElement(t.child(0)), null,                      false, true,  false);
105         if (head.equals("++/")) return new RepeatNode(walkElement(t.child(0)), walkElement(t.child(1)),   false, true,  true);
106         if (head.equals("+/"))  return new RepeatNode(walkElement(t.child(0)), walkElement(t.child(1)),   false, true,  false);
107         if (head.equals("**"))  return new RepeatNode(walkElement(t.child(0)), null,                      true,  true,  true);
108         if (head.equals("*"))   return new RepeatNode(walkElement(t.child(0)), null,                      true,  true,  false);
109         if (head.equals("**/")) return new RepeatNode(walkElement(t.child(0)), walkElement(t.child(1)),   true,  true,  true);
110         if (head.equals("*/"))  return new RepeatNode(walkElement(t.child(0)), walkElement(t.child(1)),   true,  true,  false);
111         if (head.equals("?"))   return new RepeatNode(walkElement(t.child(0)), null,                      true,  false, false);
112
113         if (head.equals("!"))   return new DropNode(walkElement(t.child(0)));
114         if (head.equals("^"))   return new LiteralNode(walkString(t.child(0)), true);
115         if (head.equals("`"))   return new BacktickNode(walkElement(t.child(0)));
116         if (head.equals("Quoted")) return stringifyChildren(t);
117         if (head.equals("Literal")) return new LiteralNode(walkString(t.child(0)));
118         if (head.equals("->")) return walkSeq(t.child(0)).follow(walkElement(t.child(1)));
119         if (head.equals("DropNT")) return new NonTerminalNode(walkString(t.child(0)), (Seq[][])walkChildren(t.child(1)), false, null, true);
120         if (head.equals("=")) return new NonTerminalNode(walkString(t.child(0)), (Seq[][])walk(t.child(2)),
121                                                          true, t.size()==2 ? null : walkString(t.child(1)), false);
122         if (head.equals("&"))   return walkSeq(t.child(0)).and(walkSeq(t.child(1)));
123         if (head.equals("&~"))  return walkSeq(t.child(0)).andnot(walkSeq(t.child(1)));
124         if (head.equals("/"))   return (walkSeq(t.child(0))).separate(walkElement(t.child(1)));
125         if (head.equals("()"))  return new LiteralNode("");
126         if (head.equals("["))   return new AtomNode((char[][])Reflection.rebuild(walkChildren(t), char[][].class));
127         if (head.equals("\\{")) return new DropNode(new AtomNode(new char[] { CharAtom.left, CharAtom.left }));
128         if (head.equals("\\}")) return new DropNode(new AtomNode(new char[] { CharAtom.right, CharAtom.right }));
129         if (head.equals(">>"))  return new DropNode(new AtomNode(new char[] { CharAtom.left, CharAtom.left }));
130         if (head.equals("<<"))  return new DropNode(new AtomNode(new char[] { CharAtom.right, CharAtom.right }));
131         if (head.equals("~"))   return new TildeNode(walkElement(t.child(0)));
132         if (head.equals("~~"))  return new Seq(new RepeatNode(new TildeNode(new AtomNode()), null, true,  true,  false)).andnot(walkSeq(t.child(0)));
133         if (head.equals("Range")) {
134             if (t.size()==2 && ">".equals(t.child(0).head())) return new char[] { CharAtom.left, CharAtom.left };
135             if (t.size()==2 && "<".equals(t.child(0).head())) return new char[] { CharAtom.right, CharAtom.right };
136             if (t.size()==1) return new char[] { unescape(t).charAt(0), unescape(t).charAt(0) };
137             return new char[] { unescape(t).charAt(0), unescape(t).charAt(1) };
138         }
139         if (head.equals("\"\"")) return "";
140         if (head.equals("\n"))   return "\n";
141         if (head.equals("\t"))   return "\t";
142         if (head.equals("\r"))   return "\r";
143         if (head.equals("SubGrammar")) return GrammarAST.buildFromAST(t.child(0), "s", resolver);
144         if (head.equals("NonTerminal"))
145             return new NonTerminalNode(walkString(t.child(0)),
146                                        (Seq[][])walkChildren(t.child(1)), false, null, false);
147         if (head.equals("Colons")) {
148             String tag = walkString(t.child(0));
149             Seq[][] seqs = (Seq[][])walk(t.child(1));
150             for(Seq[] seq : seqs)
151                 for(int i=0; i<seq.length; i++)
152                     seq[i] = seq[i].tag(tag);
153             return new NonTerminalNode(tag, seqs, false, null, false);
154         }
155         if (head.equals("#import")) {
156             if (resolver != null) {
157                 String fileName = (String)stringifyChildren(t.child(0));
158                 try {
159                     String newPrefix = t.size()<2 ? "" : (walkString(t.child(1))+".");
160                     InputStream fis = resolver.getImportStream(fileName);
161                     if (fis==null)
162                         throw new RuntimeException("unable to find #include file \""+fileName+"\"");
163                     Tree tr = new CharParser(getMetaGrammar()).parse(fis).expand1();
164                     return (GrammarNode)new GrammarAST(resolver, newPrefix).walk(tr);
165                 } catch (Exception e) {
166                     throw new RuntimeException("while parsing " + fileName, e);
167                 }
168             } else {
169                 throw new RuntimeException("no resolver given");
170             }
171         }
172         throw new RuntimeException("unknown head: \"" + head + "\" => " + (head.equals("...")));
173     }
174
175     
176     // Nodes //////////////////////////////////////////////////////////////////////////////
177
178     /** Root node of a grammar's AST; a set of named nonterminals */
179     private class GrammarNode extends HashMap<String,NonTerminalNode> {
180         public GrammarNode(NonTerminalNode[] nonterminals) {
181             for(NonTerminalNode nt : nonterminals) {
182                 if (nt==null) continue;
183                 if (this.get(nt.name)!=null)
184                     throw new RuntimeException("duplicate definition of nonterminal \""+nt.name+"\"");
185                 this.put(nt.name, nt);
186             }
187         }
188         public  GrammarNode(Object[] nt) { add(nt); }
189         private void add(Object o) {
190             if (o==null) return;
191             else if (o instanceof Object[]) for(Object o2 : (Object[])o) add(o2);
192             else if (o instanceof NonTerminalNode) {
193                 NonTerminalNode nt = (NonTerminalNode)o;
194                 if (this.get(nt.name)!=null)
195                     throw new RuntimeException("duplicate definition of nonterminal \""+nt.name+"\"");
196                 this.put(nt.name, nt);
197             }
198             else if (o instanceof GrammarNode)
199                 for(NonTerminalNode n : ((GrammarNode)o).values())
200                     add(n);
201         }
202         public String toString() {
203             String ret = "[ ";
204             for(NonTerminalNode nt : values()) ret += nt + ", ";
205             return ret + " ]";
206         }
207         public Union build(String rootNonterminal) {
208             Context cx = new Context(this);
209             Union u = null;
210             for(GrammarAST.NonTerminalNode nt : values())
211                 if (nt.name.equals(rootNonterminal))
212                     return (Union)cx.get(nt.name);
213             return null;
214         }
215     }
216
217     /** a node in the AST which is resolved into an Element */
218     private abstract class ElementNode {
219         public boolean isLifted() { return false; }
220         public boolean isDropped(Context cx) { return false; }
221         public Atom toAtom(Context cx) { throw new Error("can't convert a " + this.getClass().getName() + " to an atom: " + this); }
222         public abstract Element build(Context cx, NonTerminalNode cnt, boolean dropall);
223     }
224
225     /** a union, produced by a ( .. | .. | .. ) construct */
226     private class UnionNode extends ElementNode {
227
228         /** each component of a union is a sequence */
229         public Seq[][] sequences;
230
231         /** if the union is a NonTerminal specified as Foo*=..., this is true */
232         public boolean rep;
233
234         /** if the union is a NonTerminal specified as Foo* /ws=..., then this is "ws" */
235         public String  sep = null;
236
237         public UnionNode(Seq seq) { this(new Seq[][] { new Seq[] { seq } }); }
238         public UnionNode(Seq[][] sequences) { this(sequences, false, null); }
239         public UnionNode(Seq[][] sequences, boolean rep, String sep) {
240             this.sequences = sequences;
241             this.rep = rep;
242             this.sep = sep;
243         }
244         public boolean isDropped(Context cx) {
245             for(Seq[] seqs : sequences)
246                 for(Seq seq : seqs)
247                     if (!seq.isDropped(cx))
248                         return false;
249             return true;
250         }
251         public Atom toAtom(Context cx) {
252             Atom ret = null;
253             for(Seq[] ss : sequences)
254                 for(Seq s : ss)
255                     ret = ret==null ? s.toAtom(cx) : (Atom)ret.union(s.toAtom(cx));
256             return ret;
257         }
258         public Element build(Context cx, NonTerminalNode cnt, boolean dropall) {
259             return buildIntoPreallocatedUnion(cx, cnt, dropall, new Union(null, false)); }
260         public Element buildIntoPreallocatedUnion(Context cx, NonTerminalNode cnt, boolean dropall, Union u) {
261             Union urep = null;
262             if (rep) {
263                 urep = new Union(null, false);
264                 urep.add(Sequence.create(cnt.name, new Element[0]));
265                 urep.add(sep==null
266                          ? Sequence.create(new Element[] { u }, 0)
267                          : Sequence.create(new Element[] { cx.get(sep), u }, 1));
268             }
269             HashSet<Sequence> bad2 = new HashSet<Sequence>();
270             for(int i=0; i<sequences.length; i++) {
271                 Seq[] group = sequences[i];
272                 Union u2 = new Union(null, false);
273                 if (sequences.length==1) u2 = u;
274                 for(int j=0; j<group.length; j++)
275                     if (!rep)
276                         group[j].build(cx, u2, cnt, dropall);
277                     else {
278                         Union u3 = new Union(null, false);
279                         group[j].build(cx, u3, cnt, dropall);
280                         Sequence s = Sequence.create(cnt.name,
281                                                      new Element[] { u3, urep },
282                                                      new boolean[] { false, false },
283                                                      new boolean[] { false, true});
284                         u2.add(s);
285                     }
286                 if (sequences.length==1) break;
287                 Sequence seq = Sequence.create(u2);
288                 for(Sequence s : bad2) seq = seq.andnot(s);
289                 u.add(seq);
290                 bad2.add(Sequence.create(u2));
291             }
292             return u;
293         }
294     }
295
296     /** a NonTerminal is always a union at the top level */
297     private class NonTerminalNode extends UnionNode {
298         public boolean alwaysDrop;
299         public String  name = null;
300         public boolean isDropped(Context cx) { return alwaysDrop; }
301         public NonTerminalNode(String name, Seq[][] sequences, boolean rep, String sep, boolean alwaysDrop) {
302             super(sequences, rep, sep==null?null:(prefix + sep));
303             this.name = prefix + name;
304             this.alwaysDrop = alwaysDrop;
305         }
306         public Element build(Context cx, NonTerminalNode cnt, boolean dropall) { return cx.get(name); }
307     }
308
309     /** a sequence */
310     private class Seq {
311         /** elements of the sequence */
312         ElementNode[] elements;
313         /** follow-set, if explicit */
314         ElementNode follow;
315         /** tag to add when building the AST */
316         String tag = null;
317         /** positive conjuncts */
318         HashSet<Seq> and = new HashSet<Seq>();
319         /** negative conjuncts */
320         HashSet<Seq> not = new HashSet<Seq>();
321         public boolean alwaysDrop = false;
322         public boolean isDropped(Context cx) {
323             if (alwaysDrop) return true;
324             if (tag!=null) return false;
325             for(int i=0; i<elements.length; i++)
326                 if (!elements[i].isDropped(cx) || ((elements[i] instanceof LiteralNode) && ((LiteralNode)elements[i]).caret))
327                     return false;
328             return true;
329         }
330         public Seq(ElementNode e) { this(new ElementNode[] { e }); }
331         public Seq(ElementNode[] elements) { this(elements, true); }
332         public Seq(ElementNode[] el, boolean check) {
333             this.elements = new ElementNode[el.length];
334             System.arraycopy(el, 0, elements, 0, el.length);
335             for(int i=0; i<elements.length; i++) {
336                 if (elements[i]==null)
337                     throw new RuntimeException();
338             }
339             // FIXME: this whole mechanism is sketchy
340             if (check)
341                 for(int i=0; i<elements.length; i++) {
342                     if ((elements[i] instanceof ReferenceNode) && ((ReferenceNode)elements[i]).parenthesized) {
343                         ReferenceNode rn = (ReferenceNode)elements[i];
344                         ElementNode replace = null;
345                         for(int j=0; j<elements.length; j++) {
346                             if (!(elements[j] instanceof ReferenceNode)) continue;
347                             ReferenceNode rn2 = (ReferenceNode)elements[j];
348                             if (rn2.nonTerminal.equals(rn.nonTerminal) && !rn2.parenthesized) {
349                                 if (replace == null) {
350                                     replace = new UnionNode(new Seq(rn2).andnot(new Seq(elements, false)));
351                                 }
352                                 elements[j] = replace;
353                             }
354                         }
355                     }
356                 }
357         }
358         public Atom toAtom(Context cx) {
359             if (elements.length != 1)
360                 throw new Error("you attempted to use ->, **, ++, or a similar character-class"+
361                                 " operator on a [potentially] multicharacter production");
362             return elements[0].toAtom(cx);
363         }
364         public Seq tag(String tag) { this.tag = tag; return this; }
365         public Seq follow(ElementNode follow) { this.follow = follow; return this; }
366         public Seq and(Seq s) { and.add(s); s.alwaysDrop = true; return this; }
367         public Seq andnot(Seq s) { not.add(s); s.alwaysDrop = true; return this; }
368         public Seq separate(ElementNode sep) {
369             ElementNode[] elements = new ElementNode[this.elements.length * 2 - 1];
370             for(int i=0; i<this.elements.length; i++) {
371                 elements[i*2] = this.elements[i];
372                 if (i<this.elements.length-1)
373                     elements[i*2+1] = new DropNode(sep);
374             }
375             this.elements = elements;
376             return this;
377         }
378         public Sequence build(Context cx, Union u, NonTerminalNode cnt, boolean dropall) {
379             Sequence ret = build0(cx, cnt, dropall);
380             for(Seq s : and) ret = ret.and(s.build(cx, null, cnt, true));
381             for(Seq s : not) ret = ret.andnot(s.build(cx, null, cnt, true));
382             if (u!=null) u.add(ret);
383             return ret;
384         }
385         public Sequence build0(Context cx, NonTerminalNode cnt, boolean dropall) {
386             boolean[] drops = new boolean[elements.length];
387             Element[] els = new Element[elements.length];
388             dropall |= isDropped(cx);
389             for(int i=0; i<elements.length; i++) {
390                 if (dropall) drops[i] = true;
391                 else         drops[i] = elements[i].isDropped(cx);
392                 if (elements[i] instanceof LiteralNode && ((LiteralNode)elements[i]).caret) {
393                     if (tag != null) throw new RuntimeException("cannot have multiple tags in a sequence: " + this);
394                     tag = ((LiteralNode)elements[i]).getLiteralTag();
395                 }
396             }
397             Sequence ret = null;
398             int idx = -1;
399             boolean multiNonDrop = false;
400             for(int i=0; i<drops.length; i++)
401                 if (!drops[i])
402                     if (idx==-1) idx = i;
403                     else multiNonDrop = true;
404             for(int i=0; i<elements.length; i++) {
405                 if (!multiNonDrop && i==idx && tag!=null && elements[i] instanceof RepeatNode) {
406                     els[i] = ((RepeatNode)elements[i]).build(cx, cnt, dropall, tag);
407                     tag = null;
408                 } else
409                     els[i] = elements[i].build(cx, cnt, dropall);
410             }
411             if (tag==null && multiNonDrop)
412                 throw new RuntimeException("multiple non-dropped elements in sequence: " + Sequence.create("", els));
413             boolean[] lifts = new boolean[elements.length];
414             for(int i=0; i<elements.length; i++)
415                 lifts[i] = elements[i].isLifted();
416             if (!multiNonDrop) {
417                 if (idx == -1) 
418                     ret = tag==null
419                         ? Sequence.create(illegalTag, els)
420                         : Sequence.create(tag, els, drops, lifts);
421                 else if (tag==null) ret = Sequence.create(els, idx);
422                 else ret = Sequence.create(tag, els, drops, lifts);
423             }
424             if (multiNonDrop)
425                 ret = Sequence.create(tag, els, drops, lifts);
426             if (this.follow != null)
427                 ret = ret.followedBy(this.follow.toAtom(cx));
428             return ret;
429         }
430     }
431
432     /** reference to a NonTerminal by name */
433     private class ReferenceNode extends ElementNode {
434         public String nonTerminal;
435         public boolean parenthesized;
436         public ReferenceNode() { }
437         public ReferenceNode(String nonTerminal) { this(nonTerminal, false); }
438         public ReferenceNode(String nonTerminal, boolean parenthesized) {
439             this.nonTerminal = nonTerminal.indexOf('.')==-1 ? (prefix + nonTerminal) : nonTerminal;
440             this.parenthesized = parenthesized;
441         }
442         public NonTerminalNode resolve(Context cx) {
443             NonTerminalNode ret = cx.grammar.get(nonTerminal);
444             if (ret==null) throw new RuntimeException("undefined nonterminal: " + nonTerminal);
445             return ret;
446         }
447         public Atom toAtom(Context cx) {
448             ElementNode ret = cx.grammar.get(nonTerminal);
449             if (ret == null) throw new RuntimeException("unknown nonterminal \""+nonTerminal+"\"");
450             return ret.toAtom(cx);
451         }
452         public boolean isDropped(Context cx) { return resolve(cx).isDropped(cx); }
453         public Element build(Context cx, NonTerminalNode cnt, boolean dropall) {
454             Element ret = cx.get(nonTerminal);
455             if (ret == null) throw new RuntimeException("unknown nonterminal \""+nonTerminal+"\"");
456             return ret;
457         }
458     }
459
460     /** a literal string */
461     private class LiteralNode extends ElementNode {
462         private String string;
463         private final String thePrefix = prefix;
464         private boolean caret;
465         public LiteralNode(String string) { this(string, false); }
466         public LiteralNode(String string, boolean caret) {
467             this.string = string;
468             this.caret = caret;
469         }
470         public String getLiteralTag() { return caret ? thePrefix+string : null; }
471         public String toString() { return "\""+string+"\""; }
472         public boolean isDropped(Context cx) { return true; }
473         public Atom toAtom(Context cx) {
474             if (string.length()!=1) return super.toAtom(cx);
475             Range.Set set = new Range.Set();
476             set.add(string.charAt(0), string.charAt(0));
477             return CharAtom.set(set);
478         }
479         public Element build(Context cx, NonTerminalNode cnt, boolean dropall) { return CharAtom.string(string); }
480     }
481
482     /** an atom (usually a character class) */
483     private class AtomNode extends ElementNode {
484         char[][] ranges;
485         public AtomNode() { this(new char[0][]); }
486         public AtomNode(char[][] ranges) { this.ranges = ranges; }
487         public AtomNode(char[] range) { this.ranges = new char[][] { range }; }
488         public Element build(Context cx, NonTerminalNode cnt, boolean dropall) { return toAtom(cx); }
489         public Atom toAtom(Context cx) {
490             Range.Set set = new Range.Set();
491             for(char[] r : ranges) set.add(r[0], r[1]);
492             return CharAtom.set(set);
493         }
494     }
495
496     /** a repetition */
497     private class RepeatNode extends ElementNode {
498         public ElementNode e, sep;
499         public final boolean zero, many, max;
500         public RepeatNode(ElementNode e, ElementNode sep, boolean zero, boolean many, boolean max) {
501             this.e = e; this.sep = sep; this.zero = zero; this.many = many; this.max = max;
502         }
503         public Atom toAtom(Context cx) { return sep==null ? e.toAtom(cx) : super.toAtom(cx); }
504         public boolean isDropped(Context cx) { return e.isDropped(cx); }
505         public Element build(Context cx, NonTerminalNode cnt, boolean dropall) {
506             Element ret = build(cx, cnt, dropall, illegalTag);
507             String must = "must be tagged unless they appear within a dropped expression or their contents are dropped: ";
508             if (!dropall && !isDropped(cx) && !e.isDropped(cx))
509                 if (!many)      throw new RuntimeException("options (?) " + must + ret);
510                 else if (zero)  throw new RuntimeException("zero-or-more repetitions (*) " + must + ret);
511                 else            throw new RuntimeException("one-or-more repetitions (+) " + must + ret);
512             return ret;
513         }
514         public Element build(Context cx, NonTerminalNode cnt, boolean dropall, Object repeatTag) {
515             return (!max)
516                 ? Repeat.repeat(e.build(cx, null, dropall), zero, many, sep==null ? null : sep.build(cx, null, dropall), repeatTag)
517                 : sep==null
518                 ? Repeat.repeatMaximal(e.toAtom(cx), zero, many, repeatTag)
519                 : Repeat.repeatMaximal(e.build(cx, null, dropall), zero, many, sep.toAtom(cx), repeatTag);
520         }
521     }
522
523     /** helper class for syntactic constructs that wrap another construct */
524     private abstract class ElementNodeWrapper extends ElementNode {
525         protected ElementNode _e;
526         public ElementNodeWrapper(ElementNode e) { this._e = e; }
527         public boolean isDropped(Context cx) { return _e.isDropped(cx); }
528         public Atom toAtom(Context cx) { return _e.toAtom(cx); }
529         public Element build(Context cx, NonTerminalNode cnt, boolean dropall) { return _e.build(cx, cnt, dropall); }
530     }
531
532     /** a backtick node indicating that, when building the AST, the node's children should be inserted here */
533     private class BacktickNode extends ElementNodeWrapper {
534         public BacktickNode(ElementNode e) { super(e); }
535         public boolean isLifted() { return true; }
536     }
537
538     /** negation */
539     private class TildeNode extends ElementNodeWrapper {
540         public TildeNode(ElementNode e) { super(e); }
541         public Atom toAtom(Context cx) { return (Atom)((Topology<Character>)_e.toAtom(cx).complement()); }
542         public Element build(Context cx, NonTerminalNode cnt, boolean dropall) { return toAtom(cx); }
543     }
544
545     private class DropNode extends ElementNodeWrapper {
546         public DropNode(ElementNode e) { super(e); }
547         public boolean isDropped(Context cx) { return true; }
548     }
549
550     /** provides a label on the fields of a Seq */
551     private class LabelNode extends ElementNodeWrapper {
552         public final String label;
553         public LabelNode(String label, ElementNode e) { super(e); this.label = label; }
554     }
555
556     //////////////////////////////////////////////////////////////////////////////
557
558     public class Context {
559         public HashMap<String,Union> map = new HashMap<String,Union>();
560         public GrammarNode grammar;
561         public Context(Tree t) { }
562         public Context(GrammarNode g) { this.grammar = g; }
563         public Union build() {
564             Union ret = null;
565             for(NonTerminalNode nt : grammar.values()) {
566                 Union u = get(nt.name);
567                 if ("s".equals(nt.name))
568                     ret = u;
569             }
570             return ret;
571         }
572         public Union peek(String name) { return map.get(name); }
573         public void  put(String name, Union u) { map.put(name, u); }
574         public Union get(String name) {
575             Union ret = map.get(name);
576             if (ret != null) return ret;
577             NonTerminalNode nt = grammar.get(name);
578             if (nt==null) {
579                 throw new Error("warning could not find " + name);
580             } else {
581                 ret = new Union(name, false);
582                 map.put(name, ret);
583                 nt.buildIntoPreallocatedUnion(this, nt, nt.isDropped(this), ret);
584             }
585             return ret;
586         }
587
588     }
589
590 }