Config example parser

djspiewak · Jul 1, 2009 · 7c9569b · 7c9569b
1 parent f182db9
commit 7c9569b
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 3 deletions.
diff --git a/examples/buildfile b/examples/buildfile
@@ -28,7 +28,7 @@ define 'examples', :layout => layout do
     trace cp
 
 	start = Time.now
-    system JAVA_HOME + '/bin/java', '-cp', cp, classname, *Dir.glob("input/#{name.downcase}/*")
+    sh JAVA_HOME + '/bin/java', '-cp', cp, classname, *Dir.glob("input/#{name.downcase}/*")
 
 	puts "Total run time: #{Time.now - start} seconds"
 	puts '---------------------------------------'
@@ -51,5 +51,9 @@ define 'examples', :layout => layout do
     run_eg.call 'Paren'
   end
 
+  task :conf => :compile do
+    run_eg.call 'Config'
+  end
+
   task :run => [:arithmetic, :miniml, :lambdacalc, :paren]
 end
diff --git a/examples/src/conf/ConfigParser.scala → examples/src/config/ConfigParser.scala b/examples/src/conf/ConfigParser.scala → examples/src/config/ConfigParser.scala
@@ -1,4 +1,4 @@
-package conf
+package config
 
 import scala.io.Source
 import edu.uwm.cs.gll._
@@ -10,7 +10,7 @@ import edu.uwm.cs.gll._
  * possible results into a single map.  This illustrates a practical
  * advantage to ambiguous parsing.
  */
-object ConfigParser extends RegexParsers {
+object ConfigParser extends common.Example[Map[String, String]] with RegexParsers {
 
   class ConfigException(failures: List[Failure]) extends RuntimeException("Failed to parse config file")
 
@@ -43,6 +43,12 @@ object ConfigParser extends RegexParsers {
     }
   }
 
+  def handleSuccesses(forest: List[Map[String, String]]) {
+    for ((key, value) <- forest.foldLeft(Map[String, String]()) { _ ++ _ }) {
+      println("  " + key + " -> " + value)
+    }
+  }
+
   // %%
 
   override val whitespace = """[ \t]+"""r  // process newlines separately