One Rule object stores all alternative patterns

lib/imbecile.rb

@@ -36,7 +36,7 @@ class Imbecile
 
   def initialize(input)
     @tokens = []
-    @rules = []
+    @rules = {}
     input = input.gsub("\r\n", "\n")
     while !input.empty?
       parse_grammar(input)
@@ -79,9 +79,10 @@ class Imbecile
       pattern = $1
       @tokens << Token.new(nil, pattern, @tokens.size)
     elsif input.slice!(/\A(\S+)\s*:\s*\[(.*?)\] <<\n(.*?)^>>\n/m)
-      rule_name, rule, code = $1, $2, $3
+      rule_name, components, code = $1, $2, $3
-      rule = rule.strip.split(/\s+/)
+      components = components.strip.split(/\s+/)
-      @rules << Rule.new(rule_name, rule, code)
+      @rules[rule_name] ||= Rule.new(rule_name)
+      @rules[rule_name].add_pattern(components, code)
     else
       if input.size > 25
         input = input.slice(0..20) + "..."
@@ -97,24 +98,24 @@ class Imbecile
       end
       token_names[token.name] = token
     end
-    rule_names = @rules.each_with_object({}) do |rule, rule_names|
+    @rules.each do |rule_name, rule|
-      if token_names.include?(rule.name)
+      if token_names.include?(rule_name)
-        raise Error.new("Rule name collides with token name #{rule.name}")
+        raise Error.new("Rule name collides with token name #{rule_name}")
       end
-      rule_names[rule.name] ||= []
-      rule_names[rule.name] << rule
     end
-    unless rule_names["Start"]
+    unless @rules["Start"]
       raise Error.new("Start rule not found")
     end
-    @rules.each do |rule|
+    @rules.each do |rule_name, rule|
-      rule.components.map! do |component|
+      rule.patterns.each do |pattern|
-        if token_names[component]
+        pattern.components.map! do |component|
-          token_names[component]
+          if token_names[component]
-        elsif rule_names[component]
+            token_names[component]
-          rule_names[component]
+          elsif @rules[component]
-        else
+            @rules[component]
-          raise Error.new("Symbol #{component} not found")
+          else
+            raise Error.new("Symbol #{component} not found")
+          end
         end
       end
     end

lib/imbecile/parser.rb

@@ -3,9 +3,8 @@ class Imbecile
   class Parser
 
     def initialize(tokens, rules)
-      start_rules = rules.select {|rule| rule.name == "Start"}
+      start_items = rules["Start"].patterns.map do |pattern|
-      start_items = start_rules.map do |rule|
+        Item.new(pattern, 0)
-        Item.new(rule, 0)
       end
       start_item_set = ItemSet.new(start_items)
       start_item_set.close!

lib/imbecile/parser/item.rb

@@ -3,24 +3,24 @@ class Imbecile
 
     class Item
 
-      attr_reader :rule
+      attr_reader :pattern
       attr_reader :position
 
-      def initialize(rule, position)
+      def initialize(pattern, position)
-        @rule = rule
+        @pattern = pattern
         @position = position
       end
 
       def next_component
-        @rule.components[@position]
+        @pattern.components[@position]
       end
 
       def hash
-        [@rule, @position].hash
+        [@pattern, @position].hash
       end
 
       def ==(other)
-        @rule == other.rule && @position == other.position
+        @pattern == other.pattern && @position == other.position
       end
 
       def eql?(other)
@@ -28,9 +28,9 @@ class Imbecile
       end
 
       def closed_items
-        if @rule.components[@position].is_a?(Array)
+        if @pattern.components[@position].is_a?(Rule)
-          @rule.components[@position].map do |rule|
+          @pattern.components[@position].patterns.map do |pattern|
-            Item.new(rule, 0)
+            Item.new(pattern, 0)
           end
         else
           []

lib/imbecile/rule.rb

@@ -2,16 +2,30 @@ class Imbecile
 
   class Rule
 
+    class Pattern
+
+      attr_reader :components
+
+      attr_reader :code
+
+      def initialize(components, code)
+        @components = components
+        @code = code
+      end
+
+    end
+
     attr_reader :name
 
-    attr_reader :components
+    attr_reader :patterns
 
-    attr_reader :code
+    def initialize(name)
-
-    def initialize(name, rule_components, code)
       @name = name
-      @components = rule_components
+      @patterns = []
-      @code = code
+    end
+
+    def add_pattern(components, code)
+      @patterns << Pattern.new(components, code)
     end
 
   end