parse.java

package vitry.prelude;

import org.antlr.runtime.*;

import vitry.runtime.*;
import vitry.runtime.error.*;
import vitry.runtime.parse.*;

public class parse extends StandardFunction
    {
        private VitryRuntime rt;

        public parse(VitryRuntime rt) {
            super(1, rt.getPrelude());
            this.rt = rt;
        }

        public Object apply(Object a) {
            VitryLexer lexer = new VitryLexer();
            lexer.setCharStream(new ANTLRStringStream(a.toString()));

            VitryParser parser = new VitryParser(new CommonTokenStream(lexer));
            parser.setTreeAdaptor(new VitryTreeAdaptor());

            try {
                return parser.expr().getTree();
            } catch (RecognitionException e) {
                throw new ParseError("Could not read " + a.toString());
            }   
        }
    }