klam 0.0.2 → 0.0.3

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 4771dd4730c8a1d51d856e142bd5cf4565623996
+  data.tar.gz: 4d3745f65978183e00d3ad3f1682cec74f4b5efc
+SHA512:
+  metadata.gz: 951c7347c2c432a9f39bfd6ab8f24ee782b1a2b42e82e1dbd1c394a84d86300e99892cc0d4bae7400ae74ae77183ecb294d87f62b1605cbf66b32b2217250e08
+  data.tar.gz: 4acc417beb7d6f3cec557493a5f92a88d29776689c444860a91922840ec2d91b1bd4b3336cd082808ed62b8cb37db15ae2ac8267156cf9ad80d318897b017bb9

data/HISTORY.asciidoc

@@ -0,0 +1,18 @@
+Relase History
+==============
+
+v0.0.3 -- January 28, 2015
+--------------------------
+New Features
+~~~~~~~~~~~~
+* Added `rb-const` and `rb-send` primitives
+
+v0.0.2 -- January 7, 2015
+-------------------------
+Bug Fixes
+~~~~~~~~~
+* Added bounds checking for absvectors
+
+v0.0.1 -- January 3, 2015
+-------------------------
+Initial Release

data/PROGRESS.asciidoc

@@ -92,6 +92,9 @@ Primitive Functions of Kl]:
 Ruby Interoperation
 ~~~~~~~~~~~~~~~~~~~
 * Invoking Kl functions from Ruby
+* Invoking Ruby methods from Kl
+** Without blocks
+* Dereferencing Ruby constances from Kl
 * Ruby \<\-> Kl converters
 ** Array \<\-> List
 
@@ -100,6 +103,5 @@ Not Yet Implemented
 
 Ruby Interoperation
 ~~~~~~~~~~~~~~~~~~~
-* Invoking Ruby functions from Kl
-* Ruby \<\-> Kl converters
-** Array \<\-> Absvector
+* Invoking Ruby methods from Kl
+** With blocks

data/lib/klam/compilation_stages/convert_partial_applications_to_lambdas.rb

@@ -11,7 +11,7 @@ module Klam
             end
 
             rator_arity = arity(rator)
-            if rator_arity == -1 || rator_arity == rands.length
+            if rator_arity < 0 || rator_arity == rands.length
               converted_rands.unshift(rator)
             elsif rator_arity > rands.length
               # Partial application

data/lib/klam/compilation_stages/emit_ruby.rb

@@ -101,9 +101,9 @@ module Klam
         rands_rb = rands.map { |rand| emit_ruby(rand) }
 
         if rator.kind_of?(Symbol)
-          # Application of a function defined in the environment. At this point
-          # partial application and currying has been taken care of, so a
-          # simple send suffices.
+          # Application of a function defined in the environment. At this
+          # point partial application and currying have been taken care of,
+          # so a simple send suffices.
           render_string('__send__($1)', [rator_rb] + rands_rb)
         else
           render_string('__apply($1)', [rator_rb] + rands_rb)

data/lib/klam/compiler.rb

@@ -22,6 +22,7 @@ module Klam
     def initialize(environment)
       @environment = environment
       @generator = Klam::VariableGenerator.new
+      @ruby_interop_syntax_enabled = false
     end
 
     def compile(kl)
@@ -41,6 +42,18 @@ module Klam
       apply_stages(stages, kl)
     end
 
+    def enable_ruby_interop_syntax!
+      @ruby_interop_syntax_enabled = true
+    end
+
+    def disable_ruby_interop_syntax!
+      @ruby_interop_syntax_enabled = false
+    end
+
+    def ruby_interop_syntax_enabled?
+      @ruby_interop_syntax_enabled
+    end
+
   private
 
     def apply_stages(stages, kl)

data/lib/klam/environment.rb

@@ -11,6 +11,7 @@ module Klam
     include ::Klam::Primitives::Streams
     include ::Klam::Primitives::Time
     include ::Klam::Primitives::Arithmetic
+    include ::Klam::Primitives::Interop
 
     def initialize
       # The global assignments namespace. Errors are thrown here in the
@@ -29,6 +30,8 @@ module Klam
       # methods.
       @eigenclass = class << self; self; end
 
+      @compiler = ::Klam::Compiler.new(self)
+
       # The open primitive depends on having *home-directory* assigned.
       set(:"*home-directory*", ::Dir.pwd)
     end

data/lib/klam/primitives/generic_functions.rb

@@ -8,8 +8,7 @@ module Klam
       remove_method :equal
 
       def eval_kl(form)
-        compiler = Klam::Compiler.new(self)
-        code = compiler.compile(form)
+        code = @compiler.compile(form)
         instance_eval code
       end
       alias_method :"eval-kl", :eval_kl

data/lib/klam/primitives/interop.rb

@@ -0,0 +1,30 @@
+module Klam
+  module Primitives
+    # Primitives for interoperation with the host Ruby environment.
+    # These are not official KLambda primitives.
+    module Interop
+      def rb_send(obj, method_name, *args)
+        obj.send(method_name, *args)
+      end
+      alias_method :"rb-send", :rb_send
+      remove_method :rb_send
+
+      if RUBY_VERSION < '2.'
+        def rb_const(name)
+          parts = name.to_s.split('::')
+          parts.shift if parts.first.empty?
+          parts.reduce(::Module) do |m, x|
+            m.const_get(x)
+          end
+        end
+      else
+        def rb_const(name)
+          ::Module.const_get(name)
+        end
+      end
+
+      alias_method :"rb-const", :rb_const
+      remove_method :rb_const
+    end
+  end
+end

data/lib/klam/version.rb

@@ -1,3 +1,3 @@
 module Klam
-  VERSION = '0.0.2'
+  VERSION = '0.0.3'
 end

data/spec/functional/extensions/interop_spec.rb

@@ -0,0 +1,15 @@
+require 'spec_helper'
+
+describe 'extension: Ruby interop primitives', :type => :functional do
+  describe 'rb-send' do
+    it 'invokes a method on a Ruby object, passing the provided args' do
+      expect_kl('(rb-send "def" prepend "abc")').to eq('abcdef')
+    end
+  end
+
+  describe 'rb-const' do
+    it 'looks up the named constant in the Ruby environment' do
+      expect_kl('(rb-const "::Math::PI")').to eq(Math::PI)
+    end
+  end
+end

metadata

@@ -1,102 +1,93 @@
 --- !ruby/object:Gem::Specification
 name: klam
 version: !ruby/object:Gem::Version
-  version: 0.0.2
-  prerelease: 
+  version: 0.0.3
 platform: ruby
 authors:
 - Greg Spurrier
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-01-07 00:00:00.000000000 Z
+date: 2015-01-28 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rake
   requirement: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ~>
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '10.4'
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '10.4'
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ~>
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '10.4'
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '10.4'
 - !ruby/object:Gem::Dependency
   name: rspec
   requirement: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ~>
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '3.1'
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: 3.1.0
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ~>
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '3.1'
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: 3.1.0
 - !ruby/object:Gem::Dependency
   name: rspec-autotest
   requirement: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ~>
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '1.0'
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: 1.0.0
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ~>
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '1.0'
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: 1.0.0
 - !ruby/object:Gem::Dependency
   name: ZenTest
   requirement: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ~>
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '4.11'
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '4.11'
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
-    none: false
     requirements:
-    - - ~>
+    - - "~>"
       - !ruby/object:Gem::Version
         version: '4.11'
-    - - ! '>='
+    - - ">="
       - !ruby/object:Gem::Version
         version: '4.11'
 description: Klam is a Ruby implementation of Kl, the small Lisp on top of which the
@@ -107,10 +98,11 @@ executables: []
 extensions: []
 extra_rdoc_files: []
 files:
-- .gitignore
-- .rspec
-- .travis.yml
+- ".gitignore"
+- ".rspec"
+- ".travis.yml"
 - Gemfile
+- HISTORY.asciidoc
 - LICENSE.txt
 - PROGRESS.asciidoc
 - README.asciidoc
@@ -144,6 +136,7 @@ files:
 - lib/klam/primitives/boolean_operations.rb
 - lib/klam/primitives/error_handling.rb
 - lib/klam/primitives/generic_functions.rb
+- lib/klam/primitives/interop.rb
 - lib/klam/primitives/lists.rb
 - lib/klam/primitives/streams.rb
 - lib/klam/primitives/strings.rb
@@ -158,6 +151,7 @@ files:
 - spec/functional/application_spec.rb
 - spec/functional/atoms_spec.rb
 - spec/functional/extensions/do_spec.rb
+- spec/functional/extensions/interop_spec.rb
 - spec/functional/primitives/assignments_spec.rb
 - spec/functional/primitives/boolean_operations_spec.rb
 - spec/functional/primitives/error_handling_spec.rb
@@ -185,32 +179,32 @@ files:
 homepage: https://github.com/gregspurrier/klam
 licenses:
 - MIT
+metadata: {}
 post_install_message: 
 rdoc_options: []
 require_paths:
 - lib
 required_ruby_version: !ruby/object:Gem::Requirement
-  none: false
   requirements:
-  - - ! '>='
+  - - ">="
     - !ruby/object:Gem::Version
       version: 1.9.3
 required_rubygems_version: !ruby/object:Gem::Requirement
-  none: false
   requirements:
-  - - ! '>='
+  - - ">="
     - !ruby/object:Gem::Version
       version: '0'
 requirements: []
 rubyforge_project: 
-rubygems_version: 1.8.23
+rubygems_version: 2.4.5
 signing_key: 
-specification_version: 3
+specification_version: 4
 summary: Klam is a Ruby implementation of the Kl.
 test_files:
 - spec/functional/application_spec.rb
 - spec/functional/atoms_spec.rb
 - spec/functional/extensions/do_spec.rb
+- spec/functional/extensions/interop_spec.rb
 - spec/functional/primitives/assignments_spec.rb
 - spec/functional/primitives/boolean_operations_spec.rb
 - spec/functional/primitives/error_handling_spec.rb