pure 0.1.0 → 0.2.0

data/spec/worker_spec.rb

@@ -0,0 +1,89 @@
+require File.dirname(__FILE__) + '/pure_spec_base'
+
+require 'thread'
+
+def create_worker
+  memo = Array.new
+  mutex = Mutex.new
+
+  worker = Class.new do
+    define_method :define_function_begin do |pure_mod, num_parallel|
+      memo.push [:begin, pure_mod, num_parallel]
+    end
+
+    define_method :define_function do |*args|
+      lambda { |*a|
+        mutex.synchronize {
+          memo.push args
+        }
+      }
+    end
+
+    define_method :define_function_end do
+      memo.push :end
+    end
+
+    def num_parallel
+      3
+    end
+  end
+
+  mod = pure do
+    def f(x)
+      33
+    end
+    def x
+      9
+    end
+  end
+
+  [worker, mod, memo]
+end
+
+def check_function_specs(mod, memo, num_parallel)
+  memo[0].should eql([:begin, mod, num_parallel])
+  memo[1].should eql(:end)
+
+  memo[2].should be_a(Array)
+  memo[2].size.should eql(1)
+  memo[2][0].should be_a(Hash)
+
+  memo[3].should be_a(Array)
+  memo[3].size.should eql(1)
+  memo[3][0].should be_a(Hash)
+
+  names = [memo[2][0][:name], memo[3][0][:name]]
+  names.map { |t| t.to_s }.sort.should eql(["f", "x"])
+  f_index = 2 + names.index(:f)
+  x_index = 2 + names.index(:x)
+
+  memo[x_index][0][:origin].should eql(:def)
+  memo[x_index][0][:name].should eql(:x)
+  memo[x_index][0][:args].should eql([])
+
+  memo[f_index][0][:origin].should eql(:def)
+  memo[f_index][0][:name].should eql(:f)
+  memo[f_index][0][:args].should eql([:x])
+end
+
+describe "worker" do
+  it "should be given function specs" do
+    worker, mod, memo = create_worker
+    Pure.worker.object_id.should_not eql(worker.object_id)
+    mod.compute(worker).f
+    Pure.worker.object_id.should_not eql(worker.object_id)
+    check_function_specs(mod, memo, nil)
+  end
+
+  it "should be given num_parallel hint" do
+    worker, mod, memo = create_worker
+    previous = Pure.worker
+    Pure.worker = worker
+    begin
+      mod.compute(11).f
+      check_function_specs(mod, memo, 11)
+    ensure
+      Pure.worker = previous
+    end
+  end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: pure
 version: !ruby/object:Gem::Version 
-  version: 0.1.0
+  version: 0.2.0
 platform: ruby
 authors: 
 - James M. Lawrence
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2009-05-21 00:00:00 -04:00
+date: 2009-10-22 00:00:00 -04:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -20,9 +20,39 @@ dependencies:
     requirements: 
     - - ">="
       - !ruby/object:Gem::Version 
-        version: 0.7.6
+        version: 1.0.0
     version: 
-description: +Pure+ is an importation of the pure functional paradigm into Ruby.
+- !ruby/object:Gem::Dependency 
+  name: ruby_parser
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 2.0.4
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: ruby2ruby
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.2.2
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.2.6
+    version: 
+description: Pure imports aspects of the pure functional paradigm into Ruby.
 email: 
 - quixoticsycophant@gmail.com
 executables: []
@@ -33,37 +63,63 @@ extra_rdoc_files:
 - README.rdoc
 files: 
 - CHANGES.rdoc
-- MANIFEST
 - README.rdoc
 - Rakefile
 - devel/jumpstart.rb
-- devel/jumpstart/lazy_attribute.rb
-- devel/jumpstart/ruby.rb
-- devel/jumpstart/simple_installer.rb
 - install.rb
 - lib/pure.rb
-- lib/pure/pure_private/creator.rb
-- lib/pure/pure_private/driver.rb
-- lib/pure/pure_private/error.rb
-- lib/pure/pure_private/extractor.rb
-- lib/pure/pure_private/extractor_ripper.rb
-- lib/pure/pure_private/extractor_ruby_parser.rb
-- lib/pure/pure_private/function_database.rb
-- lib/pure/pure_private/singleton_features.rb
-- lib/pure/pure_private/util.rb
-- spec/basic_spec.rb
-- spec/combine_spec.rb
-- spec/common.rb
-- spec/error_spec.rb
-- spec/fun_spec.rb
-- spec/lazy_spec.rb
+- lib/pure/bundled_parsers.rb
+- lib/pure/bundled_plugin.rb
+- lib/pure/compiler/ruby_parser.rb
+- lib/pure/delegate.rb
+- lib/pure/driver.rb
+- lib/pure/dsl.rb
+- lib/pure/dsl_definition.rb
+- lib/pure/error.rb
+- lib/pure/extracted_functions.rb
+- lib/pure/extractor.rb
+- lib/pure/names.rb
+- lib/pure/native_worker.rb
+- lib/pure/parser/impl/base_parser.rb
+- lib/pure/parser/impl/internal.rb
+- lib/pure/parser/impl/ripper.rb
+- lib/pure/parser/impl/ruby_parser.rb
+- lib/pure/parser/internal.rb
+- lib/pure/parser/ripper.rb
+- lib/pure/parser/ruby_parser.rb
+- lib/pure/pure.rb
+- lib/pure/pure_module.rb
+- lib/pure/util.rb
+- lib/pure/version.rb
+- spec/compiler_ruby_parser_spec.rb
+- spec/compute_overrides_spec.rb
+- spec/compute_spec.rb
+- spec/compute_thread_spec.rb
+- spec/compute_timed_spec.rb
+- spec/delegate_spec.rb
+- spec/fstat_example.rb
+- spec/parser_sexp_spec.rb
 - spec/parser_spec.rb
+- spec/pure_combine_spec.rb
+- spec/pure_def_spec.rb
+- spec/pure_define_method_spec.rb
+- spec/pure_eval_spec.rb
+- spec/pure_fun_spec.rb
+- spec/pure_nested_spec.rb
+- spec/pure_parser_spec.rb
+- spec/pure_spec.rb
+- spec/pure_spec_base.rb
+- spec/pure_splat_spec.rb
+- spec/pure_two_defs_spec.rb
+- spec/pure_worker_spec.rb
 - spec/readme_spec.rb
 - spec/splat_spec.rb
-- spec/subseqent_spec.rb
-- spec/timed_spec.rb
+- spec/worker_spec.rb
+- MANIFEST
 has_rdoc: true
 homepage: http://purefunctional.rubyforge.org
+licenses: []
+
 post_install_message: 
 rdoc_options: 
 - --main
@@ -73,43 +129,103 @@ rdoc_options:
 - --exclude
 - CHANGES.rdoc
 - --exclude
-- MANIFEST
-- --exclude
 - README.rdoc
 - --exclude
 - Rakefile
 - --exclude
 - devel/jumpstart.rb
 - --exclude
-- devel/jumpstart/lazy_attribute.rb
+- install.rb
 - --exclude
-- devel/jumpstart/ruby.rb
+- lib/pure.rb
 - --exclude
-- devel/jumpstart/simple_installer.rb
+- lib/pure/bundled_parsers.rb
 - --exclude
-- install.rb
+- lib/pure/bundled_plugin.rb
+- --exclude
+- lib/pure/compiler/ruby_parser.rb
 - --exclude
-- spec/basic_spec.rb
+- lib/pure/delegate.rb
 - --exclude
-- spec/combine_spec.rb
+- lib/pure/driver.rb
 - --exclude
-- spec/common.rb
+- lib/pure/error.rb
 - --exclude
-- spec/error_spec.rb
+- lib/pure/extracted_functions.rb
 - --exclude
-- spec/fun_spec.rb
+- lib/pure/extractor.rb
 - --exclude
-- spec/lazy_spec.rb
+- lib/pure/names.rb
+- --exclude
+- lib/pure/native_worker.rb
+- --exclude
+- lib/pure/parser/impl/base_parser.rb
+- --exclude
+- lib/pure/parser/impl/internal.rb
+- --exclude
+- lib/pure/parser/impl/ripper.rb
+- --exclude
+- lib/pure/parser/impl/ruby_parser.rb
+- --exclude
+- lib/pure/parser/internal.rb
+- --exclude
+- lib/pure/parser/ripper.rb
+- --exclude
+- lib/pure/parser/ruby_parser.rb
+- --exclude
+- lib/pure/util.rb
+- --exclude
+- lib/pure/version.rb
+- --exclude
+- spec/compiler_ruby_parser_spec.rb
+- --exclude
+- spec/compute_overrides_spec.rb
+- --exclude
+- spec/compute_spec.rb
+- --exclude
+- spec/compute_thread_spec.rb
+- --exclude
+- spec/compute_timed_spec.rb
+- --exclude
+- spec/delegate_spec.rb
+- --exclude
+- spec/fstat_example.rb
+- --exclude
+- spec/parser_sexp_spec.rb
 - --exclude
 - spec/parser_spec.rb
 - --exclude
+- spec/pure_combine_spec.rb
+- --exclude
+- spec/pure_def_spec.rb
+- --exclude
+- spec/pure_define_method_spec.rb
+- --exclude
+- spec/pure_eval_spec.rb
+- --exclude
+- spec/pure_fun_spec.rb
+- --exclude
+- spec/pure_nested_spec.rb
+- --exclude
+- spec/pure_parser_spec.rb
+- --exclude
+- spec/pure_spec.rb
+- --exclude
+- spec/pure_spec_base.rb
+- --exclude
+- spec/pure_splat_spec.rb
+- --exclude
+- spec/pure_two_defs_spec.rb
+- --exclude
+- spec/pure_worker_spec.rb
+- --exclude
 - spec/readme_spec.rb
 - --exclude
 - spec/splat_spec.rb
 - --exclude
-- spec/subseqent_spec.rb
+- spec/worker_spec.rb
 - --exclude
-- spec/timed_spec.rb
+- MANIFEST
 require_paths: 
 - lib
 required_ruby_version: !ruby/object:Gem::Requirement 
@@ -127,9 +243,9 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: purefunctional
-rubygems_version: 1.3.1
+rubygems_version: 1.3.5
 signing_key: 
-specification_version: 2
+specification_version: 3
 summary: Language-level support for automatic parallelism and lazy evaluation.
 test_files: []
 

data/devel/jumpstart/lazy_attribute.rb

@@ -1,38 +0,0 @@
-
-class Jumpstart
-  #
-  # Mixin for lazily-evaluated attributes.
-  #
-  module LazyAttribute
-    #
-    # &block is evaluated when this attribute is requested.  The same
-    # result is returned for subsequent calls until the attribute is
-    # assigned a different value.
-    #
-    def attribute(reader, &block)
-      writer = "#{reader}="
-
-      singleton = (class << self ; self ; end)
-
-      define_evaluated_reader = lambda { |value|
-        singleton.class_eval {
-          remove_method(reader)
-          define_method(reader) { value }
-        }
-      }
-
-      singleton.class_eval {
-        define_method(reader) {
-          value = block.call
-          define_evaluated_reader.call(value)
-          value
-        }
-          
-        define_method(writer) { |value|
-          define_evaluated_reader.call(value)
-          value
-        }
-      }
-    end
-  end
-end

data/devel/jumpstart/ruby.rb

@@ -1,44 +0,0 @@
-
-require 'rbconfig'
-
-class Jumpstart
-  module Ruby
-    EXECUTABLE = lambda {
-      name = File.join(
-        Config::CONFIG["bindir"],
-        Config::CONFIG["RUBY_INSTALL_NAME"]
-      )
-
-      if Config::CONFIG["host"] =~ %r!(mswin|cygwin|mingw)! and
-          File.basename(name) !~ %r!\.(exe|com|bat|cmd)\Z!i
-        name + Config::CONFIG["EXEEXT"]
-      else
-        name
-      end
-    }.call
-
-    class << self
-      def run(*args)
-        cmd = [EXECUTABLE, *args]
-        unless system(*cmd)
-          cmd_str = cmd.map { |t| "'#{t}'" }.join(", ")
-          raise "system(#{cmd_str}) failed with status #{$?.exitstatus}"
-        end
-      end
-      
-      def with_warnings(value = true)
-        previous = $VERBOSE
-        $VERBOSE = value
-        begin
-          yield
-        ensure
-          $VERBOSE = previous
-        end
-      end
-      
-      def no_warnings(&block)
-        with_warnings(false, &block)
-      end
-    end
-  end
-end

data/devel/jumpstart/simple_installer.rb

@@ -1,85 +0,0 @@
-
-require 'rbconfig'
-require 'fileutils'
-require 'find'
-
-class Jumpstart
-  class SimpleInstaller
-    def initialize
-      dest_root = Config::CONFIG["sitelibdir"]
-      sources = []
-      Find.find("./lib") { |source|
-        if install_file?(source)
-          sources << source
-        end
-      }
-      @spec = sources.inject(Array.new) { |acc, source|
-        if source == "./lib"
-          acc
-        else
-          dest = File.join(dest_root, source.sub(%r!\A\./lib!, ""))
-  
-          install = lambda {
-            if File.directory?(source)
-              unless File.directory?(dest)
-                puts "mkdir #{dest}"
-                FileUtils.mkdir(dest)
-              end
-            else
-              puts "install #{source} --> #{dest}"
-              FileUtils.install(source, dest)
-            end
-          }
-            
-          uninstall = lambda {
-            if File.directory?(source)
-              if File.directory?(dest)
-                puts "rmdir #{dest}"
-                FileUtils.rmdir(dest)
-              end
-            else
-              if File.file?(dest)
-                puts "rm #{dest}"
-                FileUtils.rm(dest)
-              end
-            end
-          }
-  
-          acc << {
-            :source => source,
-            :dest => dest,
-            :install => install,
-            :uninstall => uninstall,
-          }
-        end
-      }
-    end
-  
-    def install_file?(source)
-      File.directory?(source) or
-      (File.file?(source) and File.extname(source) == ".rb")
-    end
-
-    def install
-      @spec.each { |entry|
-        entry[:install].call
-      }
-    end
-  
-    def uninstall
-      @spec.reverse.each { |entry|
-        entry[:uninstall].call
-      }
-    end
-
-    def run(args = ARGV)
-      if args.empty?
-        install
-      elsif args.size == 1 and args.first == "--uninstall"
-        uninstall
-      else
-        raise "unrecognized arguments: #{args.inspect}"
-      end
-    end
-  end
-end