ceml 0.7.13 → 0.8.0

data/lib/ceml/lang/tt/casting.rb

@@ -0,0 +1,432 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module CEML
+module Casting
+  include Treetop::Runtime
+
+  def root
+    @root ||= :casting_statement
+  end
+
+  include Lexer
+
+  module CastingStatement0
+    def stanza_marker
+      elements[0]
+    end
+
+    def ws
+      elements[2]
+    end
+
+    def roles
+      elements[3]
+    end
+
+    def modifiers
+      elements[4]
+    end
+  end
+
+  def _nt_casting_statement
+    start_index = index
+    if node_cache[:casting_statement].has_key?(index)
+      cached = node_cache[:casting_statement][index]
+      if cached
+        cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    r2 = _nt_stanza_marker
+    if r2
+      r1 = r2
+    else
+      r1 = instantiate_node(SyntaxNode,input, index...index)
+    end
+    s0 << r1
+    if r1
+      i3 = index
+      if has_terminal?('gather', false, index)
+        r4 = instantiate_node(SyntaxNode,input, index...(index + 6))
+        @index += 6
+      else
+        terminal_parse_failure('gather')
+        r4 = nil
+      end
+      if r4
+        r3 = r4
+      else
+        if has_terminal?('await', false, index)
+          r5 = instantiate_node(SyntaxNode,input, index...(index + 5))
+          @index += 5
+        else
+          terminal_parse_failure('await')
+          r5 = nil
+        end
+        if r5
+          r3 = r5
+        else
+          if has_terminal?('nab', false, index)
+            r6 = instantiate_node(SyntaxNode,input, index...(index + 3))
+            @index += 3
+          else
+            terminal_parse_failure('nab')
+            r6 = nil
+          end
+          if r6
+            r3 = r6
+          else
+            if has_terminal?('accept', false, index)
+              r7 = instantiate_node(SyntaxNode,input, index...(index + 6))
+              @index += 6
+            else
+              terminal_parse_failure('accept')
+              r7 = nil
+            end
+            if r7
+              r3 = r7
+            else
+              @index = i3
+              r3 = nil
+            end
+          end
+        end
+      end
+      s0 << r3
+      if r3
+        r8 = _nt_ws
+        s0 << r8
+        if r8
+          r9 = _nt_roles
+          s0 << r9
+          if r9
+            s10, i10 = [], index
+            loop do
+              r11 = _nt_modifier_phrase
+              if r11
+                s10 << r11
+              else
+                break
+              end
+            end
+            r10 = instantiate_node(SyntaxNode,input, i10...index, s10)
+            s0 << r10
+          end
+        end
+      end
+    end
+    if s0.last
+      r0 = instantiate_node(CastingStatement,input, i0...index, s0)
+      r0.extend(CastingStatement0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:casting_statement][start_index] = r0
+
+    r0
+  end
+
+  module StanzaMarker0
+    def name
+      elements[1]
+    end
+
+    def nl
+      elements[3]
+    end
+  end
+
+  def _nt_stanza_marker
+    start_index = index
+    if node_cache[:stanza_marker].has_key?(index)
+      cached = node_cache[:stanza_marker][index]
+      if cached
+        cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    if has_terminal?('(', false, index)
+      r1 = instantiate_node(SyntaxNode,input, index...(index + 1))
+      @index += 1
+    else
+      terminal_parse_failure('(')
+      r1 = nil
+    end
+    s0 << r1
+    if r1
+      r2 = _nt_id
+      s0 << r2
+      if r2
+        if has_terminal?(')', false, index)
+          r3 = instantiate_node(SyntaxNode,input, index...(index + 1))
+          @index += 1
+        else
+          terminal_parse_failure(')')
+          r3 = nil
+        end
+        s0 << r3
+        if r3
+          r4 = _nt_nl
+          s0 << r4
+        end
+      end
+    end
+    if s0.last
+      r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+      r0.extend(StanzaMarker0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:stanza_marker][start_index] = r0
+
+    r0
+  end
+
+  def _nt_modifier_phrase
+    start_index = index
+    if node_cache[:modifier_phrase].has_key?(index)
+      cached = node_cache[:modifier_phrase][index]
+      if cached
+        cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0 = index
+    r1 = _nt_over_phrase
+    if r1
+      r0 = r1
+    else
+      r2 = _nt_within_phrase
+      if r2
+        r0 = r2
+      else
+        r3 = _nt_with_matching_phrase
+        if r3
+          r0 = r3
+        else
+          @index = i0
+          r0 = nil
+        end
+      end
+    end
+
+    node_cache[:modifier_phrase][start_index] = r0
+
+    r0
+  end
+
+  module OverPhrase0
+    def ws1
+      elements[0]
+    end
+
+    def ws2
+      elements[2]
+    end
+
+    def duration
+      elements[3]
+    end
+  end
+
+  def _nt_over_phrase
+    start_index = index
+    if node_cache[:over_phrase].has_key?(index)
+      cached = node_cache[:over_phrase][index]
+      if cached
+        cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    r1 = _nt_ws
+    s0 << r1
+    if r1
+      if has_terminal?('over', false, index)
+        r2 = instantiate_node(SyntaxNode,input, index...(index + 4))
+        @index += 4
+      else
+        terminal_parse_failure('over')
+        r2 = nil
+      end
+      s0 << r2
+      if r2
+        r3 = _nt_ws
+        s0 << r3
+        if r3
+          r4 = _nt_duration
+          s0 << r4
+        end
+      end
+    end
+    if s0.last
+      r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+      r0.extend(OverPhrase0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:over_phrase][start_index] = r0
+
+    r0
+  end
+
+  module WithinPhrase0
+    def ws1
+      elements[0]
+    end
+
+    def ws2
+      elements[2]
+    end
+
+    def distance
+      elements[3]
+    end
+  end
+
+  def _nt_within_phrase
+    start_index = index
+    if node_cache[:within_phrase].has_key?(index)
+      cached = node_cache[:within_phrase][index]
+      if cached
+        cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    r1 = _nt_ws
+    s0 << r1
+    if r1
+      if has_terminal?('within', false, index)
+        r2 = instantiate_node(SyntaxNode,input, index...(index + 6))
+        @index += 6
+      else
+        terminal_parse_failure('within')
+        r2 = nil
+      end
+      s0 << r2
+      if r2
+        r3 = _nt_ws
+        s0 << r3
+        if r3
+          r4 = _nt_distance
+          s0 << r4
+        end
+      end
+    end
+    if s0.last
+      r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+      r0.extend(WithinPhrase0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:within_phrase][start_index] = r0
+
+    r0
+  end
+
+  module WithMatchingPhrase0
+    def ws1
+      elements[0]
+    end
+
+    def ws2
+      elements[2]
+    end
+
+    def ws3
+      elements[4]
+    end
+
+    def thing
+      elements[5]
+    end
+  end
+
+  def _nt_with_matching_phrase
+    start_index = index
+    if node_cache[:with_matching_phrase].has_key?(index)
+      cached = node_cache[:with_matching_phrase][index]
+      if cached
+        cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    r1 = _nt_ws
+    s0 << r1
+    if r1
+      if has_terminal?('with', false, index)
+        r2 = instantiate_node(SyntaxNode,input, index...(index + 4))
+        @index += 4
+      else
+        terminal_parse_failure('with')
+        r2 = nil
+      end
+      s0 << r2
+      if r2
+        r3 = _nt_ws
+        s0 << r3
+        if r3
+          if has_terminal?('matching', false, index)
+            r4 = instantiate_node(SyntaxNode,input, index...(index + 8))
+            @index += 8
+          else
+            terminal_parse_failure('matching')
+            r4 = nil
+          end
+          s0 << r4
+          if r4
+            r5 = _nt_ws
+            s0 << r5
+            if r5
+              r6 = _nt_id
+              s0 << r6
+            end
+          end
+        end
+      end
+    end
+    if s0.last
+      r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+      r0.extend(WithMatchingPhrase0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:with_matching_phrase][start_index] = r0
+
+    r0
+  end
+
+end
+
+class CastingParser < Treetop::Runtime::CompiledParser
+  include Casting
+end
+
+end

data/lib/ceml/lang/tt/casting.treetop

@@ -0,0 +1,29 @@
+module CEML
+grammar Casting
+    include Lexer
+
+    rule casting_statement
+      stanza_marker:stanza_marker? ('gather' / 'await' / 'nab' / 'accept') ws roles modifiers:modifier_phrase* <CastingStatement>
+    end
+
+    rule stanza_marker
+      '(' name:id ')' nl
+    end
+
+    rule modifier_phrase
+      over_phrase / within_phrase / with_matching_phrase
+    end
+
+    rule over_phrase
+        ws 'over' ws duration
+    end
+
+    rule within_phrase
+        ws 'within' ws distance
+    end
+
+    rule with_matching_phrase
+        ws 'with' ws 'matching' ws thing:id
+    end
+end
+end