scheem parser 1.peg

start =
	expression
    
validchar
    = [0-9a-zA-Z_?!+\-=@#$%^&*/.]

_ =
	" "*

list
	= "(" _ expr: expression* _ ")" { return expr; }

// Expression is either an atom or a list of expressions surrounded by parens
expression
	= _ e:(atom / list) _ { return e; }

atom =
    chars:validchar+
        { return chars.join(""); }