gdl-parser 0.0.1 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34

#![feature(plugin, collections, str_char)]
#![plugin(peg_syntax_ext)]

extern crate rustc_serialize;

use gdl::program;

peg_file! gdl("grammar.rustpeg");

#[derive(Debug, Eq, PartialEq, RustcDecodable, RustcEncodable)]
pub struct Program {
    sexprs: Vec<SExpr>
}

#[derive(Debug, Eq, PartialEq, RustcDecodable, RustcEncodable)]
pub enum SExpr {
    Func(String, Vec<Term>),
    RuleOp(Vec<Term>)
}

#[derive(Debug, Eq, PartialEq, RustcDecodable, RustcEncodable)]
pub enum Term {
    Constant(String),
    Variable(String),
    ExprTerm(SExpr),
    Num(u8)
}

pub fn parse(s: &str) -> Program {
    match program(s) {
        Ok(p) => p,
        Err(e) => panic!("{}", e)
    }
}