From: adam Date: Mon, 26 Mar 2007 07:12:37 +0000 (-0400) Subject: clean up HaskellHelper X-Git-Url: http://git.megacz.com/?p=sbp.git;a=commitdiff_plain;h=bc150ec13ece2f6c8fb47cf5b81f2b01fce9c0a6 clean up HaskellHelper darcs-hash:20070326071237-5007d-03522ba7e32c2f633139a1186f28907721312b93.gz --- diff --git a/src/edu/berkeley/sbp/misc/HaskellHelper.java b/src/edu/berkeley/sbp/misc/HaskellHelper.java index e544441..d5a3eae 100644 --- a/src/edu/berkeley/sbp/misc/HaskellHelper.java +++ b/src/edu/berkeley/sbp/misc/HaskellHelper.java @@ -10,64 +10,12 @@ import edu.berkeley.sbp.tib.*; import java.io.*; public class HaskellHelper { - - public static void main(String[] argv) throws Throwable { - help(argv[0], argv[1]); - } + public static void main(String[] argv) throws Throwable { help(argv[0], argv[1]); } public static boolean isNull(Object o) { return o==null; } - public static Tree help0(String grammarFile, String targetFile) throws Throwable { - try { - Tree res = new CharParser(MetaGrammar.newInstance()).parse(new FileInputStream(grammarFile)).expand1(); - Union meta = Grammar.create(res, "s" /*, - new Grammar.Bindings() { - public Sequence createSequence(Production p) { - Element[] els = p.elements; - if (p.tag != null) - return Sequence.create(p.tag, p.elements, p.drops, false); - int idx = -1; - for(int i=0; i res = new CharParser(MetaGrammar.newInstance()).parse(new FileInputStream(grammarFile)).expand1(); - Union meta = Grammar.create(res, "s" /*, - new Grammar.Bindings() { - public Sequence createSequence(Production p) { - Element[] els = p.elements; - if (p.tag != null && !"".equals(p.tag)) - return Sequence.create(p.tag, p.elements, p.drops, false); - int idx = -1; - for(int i=0; i