gistfile1.scala

// vim:set noet sw=3 ts=3 sts=3

import scala.util.parsing.combinator._
import java.io.FileReader

class XselfParser extends RegexParsers {
	def expression: Parser[Any] = opt("(")~rep(identifier)~opt(")")
	def identifier: Parser[Any] = rep("""[a-zA-Z0-9]""".r | symbol)
	def symbol:     Parser[Any] = "~" | "!" | "@" | "$" | "%" | "^" | "&" | "*" | "-" | "_" | "=" | "+" | "|" | ":" | "<" | ">" | "/" | "?"
}

object Xself extends XselfParser {
	def main(args: Array[String]) {
		val reader = new FileReader(args(0))
		println(parseAll(expression, reader))
	}
}