myco 0.1.4 → 0.1.5

data/lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Processor.my.rb

@@ -0,0 +1,339 @@
+
+::Myco::Component.new([::Myco::FileToplevel], ::Myco.cscope.for_method_definition, __FILE__, __LINE__)
+.tap { |__c__| __c__.__last__ = __c__.component_eval {(::Myco.cscope.for_method_definition.const_set(:Processor, ::Myco::Component.new([::Myco.find_constant(:BasicObject)], ::Myco.cscope.for_method_definition, __FILE__, __LINE__)
+.tap { |__c__| __c__.__last__ = __c__.component_eval {(
+  declare_meme(:string, [[:var, []]], nil, ::Myco.cscope.dup) { |*| ("")}
+  declare_meme(:capture_items, [[:var, []]], nil, ::Myco.cscope.dup) { |*| ([])}
+  declare_meme(:builder, [[:var, []]], nil, ::Myco.cscope.dup) { |*| (nil)}
+  declare_meme(:process, [], nil, ::Myco.cscope.dup) { |*| (
+    self.setup
+    self.process_each
+    self.validate_state
+    self.final_captures
+  )}
+  ::Myco.cscope.for_method_definition.const_set(:Token, ::Myco::Component.new([::Myco.find_constant(:BasicObject)], ::Myco.cscope.for_method_definition, __FILE__, __LINE__)
+  .tap { |__c__| __c__.__last__ = __c__.component_eval {(
+    declare_meme(:type, [[:var, []]], nil, ::Myco.cscope.dup) { |*| nil}
+    declare_meme(:text, [[:var, []]], nil, ::Myco.cscope.dup) { |*| nil}
+    declare_meme(:row, [[:var, []]], nil, ::Myco.cscope.dup) { |*| nil}
+    declare_meme(:col, [[:var, []]], nil, ::Myco.cscope.dup) { |*| nil}
+    declare_meme(:inspect, [], nil, ::Myco.cscope.dup) { |*| ([
+      self.type,
+      self.text,
+      self.row,
+      self.col
+    ].inspect)}
+    declare_meme(:to_s, [], nil, ::Myco.cscope.dup) { |*| ([
+      self.type,
+      self.text,
+      self.row,
+      self.col
+    ].inspect)}
+    declare_meme(:line, [], nil, ::Myco.cscope.dup) { |*| (self.row)}
+    declare_meme(:sym, [], nil, ::Myco.cscope.dup) { |*| (self.text.to_sym)}
+    declare_meme(:float, [], nil, ::Myco.cscope.dup) { |*| (self.text.to_f)}
+    declare_meme(:integer, [], nil, ::Myco.cscope.dup) { |base=0| (self.text.to_inum(
+      base,
+      true
+    ))}
+  )}})
+  .tap { |__c__| __c__.__name__ = :Token }
+  declare_meme(:reduction_env, [[:var, []]], nil, ::Myco.cscope.dup) { |*| (::Myco::Component.new([::Myco.find_constant(:Patterns)::Reduction::Environment], ::Myco.cscope.for_method_definition, __FILE__, __LINE__)
+  .tap { |__c__| __c__.__last__ = __c__.component_eval {nil}}.instance)}
+  declare_meme(:reduction_env_cscope, [[:var, []]], nil, ::Myco.cscope.dup) { |*| (::Rubinius::ConstantScope.new(::Myco.find_constant(:Patterns)::Reduction::Environment))}
+  declare_meme(:cidx_stack, [[:var, []]], nil, ::Myco.cscope.dup) { |*| ([])}
+  declare_meme(:sidx_stack, [[:var, []]], nil, ::Myco.cscope.dup) { |*| ([])}
+  declare_meme(:tidx_stack, [[:var, []]], nil, ::Myco.cscope.dup) { |*| ([])}
+  declare_meme(:midx_stack, [[:var, []]], nil, ::Myco.cscope.dup) { |*| ([])}
+  declare_meme(:ridx_stack, [[:var, []]], nil, ::Myco.cscope.dup) { |*| ([])}
+  declare_meme(:capt_stack, [[:var, []]], nil, ::Myco.cscope.dup) { |*| ([])}
+  declare_meme(:line_map_for, [[:memoize, []]], nil, ::Myco.cscope.dup) { |string| (
+    idx_hash = ::Hash.new
+    idx_hash.__send__(
+      :[]=,
+      0,
+      0
+    )
+    count = 0
+    idx = 0
+    self.loop { || (
+      idx = string.index(
+        "\n",
+        idx.__send__(
+          :+,
+          1
+        )
+      )
+      ::Myco.branch_op(:"||", idx) {self.__send__(:break)}
+      count = count.__send__(
+        :+,
+        1
+      )
+      idx_hash.__send__(
+        :[]=,
+        idx,
+        count
+      )
+    )}
+    idx_hash
+  )}
+  declare_meme(:position_of, [], nil, ::Myco.cscope.dup) { |idx, string| (
+    nl_idx = ::Myco.branch_op(:"||", string.rindex(
+      "\n",
+      idx
+    )) {0}
+    row = self.line_map_for(string).fetch(nl_idx).__send__(
+      :+,
+      1
+    )
+    col = idx.__send__(
+      :-,
+      nl_idx
+    )
+    [
+      row,
+      col
+    ]
+  )}
+  declare_meme(:push_layer, [], nil, ::Myco.cscope.dup) { |*| (self.capt_stack.push(::Hash.new))}
+  declare_meme(:pop_layer, [], nil, ::Myco.cscope.dup) { |*| (self.capt_stack.pop)}
+  declare_meme(:setup, [], nil, ::Myco.cscope.dup) { |*| (self.push_layer)}
+  declare_meme(:final_captures, [], nil, ::Myco.cscope.dup) { |*| (self.pop_layer.select { |k, v| (k.__send__(
+    :is_a?,
+    ::Symbol
+  ))}.map { |k, v| ([
+    k,
+    v.last
+  ])}.to_h)}
+  declare_meme(:process_each, [], nil, ::Myco.cscope.dup) { |*| (self.capture_items.each { |idx, metadata| (
+    type = metadata.__send__(
+      :[],
+      0
+    )
+    captargs = ::Myco.branch_op(:"||", metadata.__send__(
+      :[],
+      1
+    )) {[]}
+    self.send(
+      type,
+      idx,
+      *captargs
+    )
+  )})}
+  declare_meme(:validate_state, [], nil, ::Myco.cscope.dup) { |*| (
+    ::Myco.branch_op(:"||", self.cidx_stack.__send__(:empty?)) {self.raise("unbalanced cidx_stack: #{self.cidx_stack}")}
+    ::Myco.branch_op(:"||", self.sidx_stack.__send__(:empty?)) {self.raise("unbalanced sidx_stack: #{self.sidx_stack}")}
+    ::Myco.branch_op(:"||", self.tidx_stack.__send__(:empty?)) {self.raise("unbalanced tidx_stack: #{self.tidx_stack}")}
+    ::Myco.branch_op(:"||", self.midx_stack.__send__(:empty?)) {self.raise("unbalanced midx_stack: #{self.midx_stack}")}
+    ::Myco.branch_op(:"||", self.ridx_stack.__send__(:empty?)) {self.raise("unbalanced ridx_stack: #{self.ridx_stack}")}
+  )}
+  declare_meme(:c_start, [], nil, ::Myco.cscope.dup) { |idx| (self.cidx_stack.push(idx))}
+  declare_meme(:c_end, [], nil, ::Myco.cscope.dup) { |idx, name| (
+    captures = self.capt_stack.last
+    start_idx = self.cidx_stack.pop
+    use_reduction = false
+    value = captures.__send__(
+      :[],
+      idx
+    )
+    ::Myco.branch_op(:"&?", value) {(
+      loc = value.first
+      value = value.last
+      ::Myco.branch_op(:"??", ::Myco.branch_op(:"&?", ::Myco.branch_op(:"&&", loc.first.__send__(
+        :>=,
+        start_idx
+      )) {loc.last.__send__(
+        :<=,
+        idx
+      )}) {use_reduction = true}) {value = nil}
+    )}
+    ::Myco.branch_op(:"&&", ::Myco.branch_op(:"&&", use_reduction.__send__(:!)) {start_idx.__send__(
+      :==,
+      idx
+    ).__send__(:!)}) {value = self.string.slice(
+      start_idx,
+      idx.__send__(
+        :-,
+        start_idx
+      )
+    )}
+    store_value = [
+      [
+        start_idx,
+        idx
+      ],
+      value
+    ]
+    captures.store(
+      idx,
+      store_value
+    )
+    captures.store(
+      name,
+      store_value
+    )
+  )}
+  declare_meme(:s_start, [], nil, ::Myco.cscope.dup) { |idx| (self.sidx_stack.push(idx))}
+  declare_meme(:s_end, [], nil, ::Myco.cscope.dup) { |idx, name| (
+    captures = self.capt_stack.last
+    start_idx = self.sidx_stack.pop
+    value = self.string.slice(
+      start_idx,
+      idx.__send__(
+        :-,
+        start_idx
+      )
+    )
+    store_value = [
+      [
+        start_idx,
+        idx
+      ],
+      value
+    ]
+    captures.store(
+      idx,
+      store_value
+    )
+    captures.store(
+      name,
+      store_value
+    )
+  )}
+  declare_meme(:t_start, [], nil, ::Myco.cscope.dup) { |idx| (self.tidx_stack.push(idx))}
+  declare_meme(:t_end, [], nil, ::Myco.cscope.dup) { |idx, name| (
+    captures = self.capt_stack.last
+    start_idx = self.tidx_stack.pop
+    pos = self.position_of(
+      start_idx,
+      self.string
+    )
+    value = ::Myco.find_constant(:Token).new({
+      :type => name,
+      :text => self.string.slice(
+        start_idx,
+        idx.__send__(
+          :-,
+          start_idx
+        )
+      ),
+      :row => pos.first,
+      :col => pos.last
+    })
+    store_value = [
+      [
+        start_idx,
+        idx
+      ],
+      value
+    ]
+    captures.store(
+      idx,
+      store_value
+    )
+    captures.store(
+      name,
+      store_value
+    )
+  )}
+  declare_meme(:m_start, [], nil, ::Myco.cscope.dup) { |idx| (
+    self.midx_stack.push(idx)
+    self.c_start(idx)
+  )}
+  declare_meme(:m_split, [], nil, ::Myco.cscope.dup) { |idx, name| (
+    self.c_end(
+      idx,
+      name
+    )
+    self.c_start(idx)
+  )}
+  declare_meme(:m_end, [], nil, ::Myco.cscope.dup) { |idx, name| (
+    captures = self.capt_stack.last
+    start_idx = self.midx_stack.pop
+    self.cidx_stack.pop
+    value = []
+    captures.each { |k, v| (::Myco.branch_op(:"&&", ::Myco.branch_op(:"&&", ::Myco.branch_op(:"&&", k.__send__(
+      :is_a?,
+      ::Fixnum
+    )) {k.__send__(
+      :<=,
+      idx
+    )}) {k.__send__(
+      :>,
+      start_idx
+    )}) {(
+      loc = v.first
+      ::Myco.branch_op(:"&&", loc.first.__send__(
+        :>=,
+        start_idx
+      )) {value.push(v.last)}
+    )})}
+    ::Myco.branch_op(:"&&", ::Myco.branch_op(:"&&", value.__send__(:empty?)) {start_idx.__send__(
+      :==,
+      idx
+    ).__send__(:!)}) {value = self.string.slice(
+      start_idx,
+      idx.__send__(
+        :-,
+        start_idx
+      )
+    )}
+    store_value = [
+      [
+        start_idx,
+        idx
+      ],
+      value
+    ]
+    captures.store(
+      idx,
+      store_value
+    )
+    captures.store(
+      name,
+      store_value
+    )
+  )}
+  declare_meme(:r_start, [], nil, ::Myco.cscope.dup) { |idx| ((
+    self.push_layer
+    self.ridx_stack.push(idx)
+  ))}
+  declare_meme(:r_end, [], nil, ::Myco.cscope.dup) { |idx, code, *args| (
+    captures = self.pop_layer
+    start_idx = self.ridx_stack.pop
+    code.__send__(
+      :scope=,
+      self.reduction_env_cscope
+    )
+    self.reduction_env.__send__(
+      :builder=,
+      self.builder
+    )
+    self.reduction_env.__send__(
+      :captures=,
+      captures.map { |k, v| ([
+        k,
+        v.last
+      ])}.to_h
+    )
+    value = code.invoke(
+      code.name,
+      ::Myco.find_constant(:Patterns)::Reduction::Environment,
+      self.reduction_env,
+      [],
+      nil
+    )
+    store_value = [
+      [
+        start_idx,
+        idx
+      ],
+      value
+    ]
+    self.capt_stack.last.store(
+      idx,
+      store_value
+    )
+  )}
+)}})
+.tap { |__c__| __c__.__name__ = :Processor })}}.instance

data/lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces.my

@@ -0,0 +1,15 @@
+
+import 'pegleromyces/Patterns.my'
+import 'pegleromyces/Constructions.my'
+
+import 'pegleromyces/Instructions.my'
+import 'pegleromyces/Machine.my'
+
+import 'pegleromyces/Processor.my'
+import 'pegleromyces/Builder.my'
+
+import 'pegleromyces/Grammar.my'
+import 'pegleromyces/Parser.my'
+
+import 'pegleromyces/BytecodeInstructions.my'
+import 'pegleromyces/BytecodeParser.my'

data/lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces.my.rb

@@ -0,0 +1,14 @@
+
+::Myco::Component.new([::Myco::FileToplevel], ::Myco.cscope.for_method_definition, __FILE__, __LINE__)
+.tap { |__c__| __c__.__last__ = __c__.component_eval {(
+  declare_meme(:"pegleromyces/Patterns.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+  declare_meme(:"pegleromyces/Constructions.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+  declare_meme(:"pegleromyces/Instructions.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+  declare_meme(:"pegleromyces/Machine.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+  declare_meme(:"pegleromyces/Processor.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+  declare_meme(:"pegleromyces/Builder.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+  declare_meme(:"pegleromyces/Grammar.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+  declare_meme(:"pegleromyces/Parser.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+  declare_meme(:"pegleromyces/BytecodeInstructions.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+  declare_meme(:"pegleromyces/BytecodeParser.my", [[:import, []]], nil, ::Myco.cscope.dup) { |*| nil}
+)}}.instance

data/lib/myco/code_tools.rb

@@ -2,4 +2,4 @@
 module ::CodeTools; end
 
 Myco.eval_file 'code_tools/AST.my'
-require_relative 'code_tools/parser'
+Myco.eval_file 'code_tools/Parser.my'

data/lib/myco/version.rb

@@ -1,6 +1,6 @@
 
 module Myco
-  MYCO_VERSION = '0.1.4'
+  MYCO_VERSION = '0.1.5'
   
   MYCO_REQUIRED_GEMS = [
     ['rubinius-toolset',   '~> 2.3'],

data/lib/myco.rb

@@ -2,6 +2,8 @@
 require_relative 'myco/version'
 Myco.activate_required_gems
 
+Myco::SingletonClass = Myco.singleton_class
+
 require_relative 'myco/code_loader'
 require_relative 'myco/eval'
 require_relative 'myco/misc'

metadata

@@ -1,16 +1,17 @@
 --- !ruby/object:Gem::Specification
 name: myco
 version: !ruby/object:Gem::Version
-  version: 0.1.4
+  version: 0.1.5
 platform: ruby
 authors:
 - Joe McIlvain
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-02-18 00:00:00.000000000 Z
+date: 2015-03-21 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
+  type: :runtime
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
@@ -23,8 +24,8 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '2.3'
-  type: :runtime
 - !ruby/object:Gem::Dependency
+  type: :runtime
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
@@ -37,22 +38,8 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '2.2'
-  type: :runtime
 - !ruby/object:Gem::Dependency
-  version_requirements: !ruby/object:Gem::Requirement
-    requirements:
-    - - "~>"
-      - !ruby/object:Gem::Version
-        version: '1.0'
-  name: kpeg
-  prerelease: false
-  requirement: !ruby/object:Gem::Requirement
-    requirements:
-    - - "~>"
-      - !ruby/object:Gem::Version
-        version: '1.0'
   type: :development
-- !ruby/object:Gem::Dependency
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
@@ -65,8 +52,8 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '1.6'
-  type: :development
 - !ruby/object:Gem::Dependency
+  type: :development
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
@@ -79,8 +66,8 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '10.3'
-  type: :development
 - !ruby/object:Gem::Dependency
+  type: :development
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
@@ -93,8 +80,8 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '0.9'
-  type: :development
 - !ruby/object:Gem::Dependency
+  type: :development
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
@@ -107,8 +94,8 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '1.4'
-  type: :development
 - !ruby/object:Gem::Dependency
+  type: :development
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
@@ -121,8 +108,8 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '3.0'
-  type: :development
 - !ruby/object:Gem::Dependency
+  type: :development
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
@@ -135,7 +122,6 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '1.3'
-  type: :development
 description: An experimental language on the Rubinius VM
 email: joe.eli.mac@gmail.com
 executables:
@@ -230,8 +216,40 @@ files:
 - lib/myco/code_tools/AST/ToRuby.my.rb
 - lib/myco/code_tools/AST/misc.my
 - lib/myco/code_tools/AST/misc.my.rb
-- lib/myco/code_tools/parser.rb
-- lib/myco/code_tools/parser/peg_parser.rb
+- lib/myco/code_tools/Parser.my
+- lib/myco/code_tools/Parser.my.rb
+- lib/myco/code_tools/parser/MycoBuilder.my
+- lib/myco/code_tools/parser/MycoBuilder.my.rb
+- lib/myco/code_tools/parser/MycoCharacterClasses.my
+- lib/myco/code_tools/parser/MycoCharacterClasses.my.rb
+- lib/myco/code_tools/parser/MycoGrammar.my
+- lib/myco/code_tools/parser/MycoGrammar.my.rb
+- lib/myco/code_tools/parser/MycoTokens.my
+- lib/myco/code_tools/parser/MycoTokens.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Builder.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Builder.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/BytecodeHelpers.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/BytecodeHelpers.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/BytecodeInstructions.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/BytecodeInstructions.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/BytecodeParser.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/BytecodeParser.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Constructions.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Constructions.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Grammar.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Grammar.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Instructions.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Instructions.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Machine.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Machine.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Parser.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Parser.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Patterns.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Patterns.my.rb
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Processor.my
+- lib/myco/code_tools/parser/pegleromyces/lib/pegleromyces/Processor.my.rb
 - lib/myco/command.my
 - lib/myco/command.my.rb
 - lib/myco/command/inoculate.my
@@ -282,3 +300,4 @@ signing_key:
 specification_version: 4
 summary: An experimental language on the Rubinius VM
 test_files: []
+has_rdoc: