functionalist 0.0.1

checksums.yaml

@@ -0,0 +1,15 @@
+---
+!binary "U0hBMQ==":
+  metadata.gz: !binary |-
+    ZjFjNmY2Y2FmMDJjZTVmMmVlZmZiM2NhZDhkYjE1M2IxOGE5NWFmNg==
+  data.tar.gz: !binary |-
+    Zjc0OGY0YmY0Njg5MWIyMmE1YjYyNmRlNTNlZmIwZjA2YjZkMjU3MQ==
+SHA512:
+  metadata.gz: !binary |-
+    MTEwOTk3ZWE0ODgwNmIzYWQ0Y2MwZDBkZjIzOWIyN2U5YjFhZDAyNGUxOWE4
+    ZTZhMzcxMGQyYzhlMmVjZDUwM2ZjYzE2MTc4ZTk2OWMxY2NjY2Q5ZTc5Mjk3
+    ZGU2N2EyMmRmNjY0MzFhNWIwZWRlYzU5YTNhYzQyMGZhNWUyNzI=
+  data.tar.gz: !binary |-
+    MGFhMjQ2YzBlYTkwNjMyNTdkYWI0YzU4NTMxMGYyOGU4NDUxNGU3NDMwOGQy
+    NDdiZDA4Y2E1ODFmMDk3MDMxYmYyM2M3YjlkYTk0ODJmMTU2ZDY4N2U0YmQ5
+    MzJiZWYwOTVlY2YyYWYyNzAyODc4NzkzMDEyZjYwMDZlMThjMWQ=

data/CHANGELOG.md

@@ -0,0 +1,5 @@
+## Functionalist 0.0.1 (Sep 08, 2014) ##
+
+* No changes.
+
+

data/MIT-LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2014 Miguel Regedor
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/lib/core_ext/kernel.rb

@@ -0,0 +1,8 @@
+module Kernel
+  protected
+
+  def point_free
+    Functionalist::PointFree::Expression.new
+  end
+  
+end

data/lib/core_ext/string.rb

@@ -0,0 +1,55 @@
+class String
+
+  OPERATOR_AFTER = ' < '
+
+  def r(receiver)
+    @point_free_receiver = receiver
+  end
+
+
+  def args(*array)
+    @point_free_args = array
+  end
+
+
+  def to_proc
+    parse_expression(self)
+    expression.to_proc
+  end
+
+
+  private
+
+  def expression
+    @expression ||= Functionalist::PointFree::Expression.new
+  end
+
+  def parse_expression(exp)
+    # carimbar
+    exp.strip.split(OPERATOR_AFTER).reverse.each do |sub_exp|
+      # descarimbar
+      next if parse_functionalist_method(expression, sub_exp)
+
+      _, receiver_string, method_name, args_string = /(\w*\.)?(\w+)(\(.*\))?/.match(sub_exp).to_a
+      parse_receiver expression, receiver_string
+      parse_args expression, args_string
+      expression.send method_name
+    end
+  end
+
+
+  def parse_receiver(expression, receiver_string)
+    expression.point_free_reciever(receiver_string) if receiver_string
+  end
+
+
+  def parse_args(expression, args_string)
+    expression.point_free_inject_args(args_string) if args_string
+  end
+
+  def parse_functionalist_method(expression, exp)
+
+  end
+
+
+end

data/lib/functionalist.rb

@@ -0,0 +1,10 @@
+$: << File.expand_path(File.dirname(__FILE__))
+
+require 'functionalist/version'
+require 'functionalist/point_free'
+require 'functionalist/point_free/operator'
+require 'functionalist/point_free/expression'
+
+require 'core_ext/kernel'
+#require 'core_ext/string'
+

data/lib/functionalist/point_free.rb

@@ -0,0 +1 @@
+module PointFree ; end

data/lib/functionalist/point_free/expression.rb

@@ -0,0 +1,39 @@
+module Functionalist
+  module PointFree
+   class Expression 
+
+     undef_method(*(instance_methods.map(&:to_sym) - [:__id__, :__send__, :object_id]))
+
+
+     def initialize
+       @methods = []
+     end
+
+     #def _(reciever)
+     #  self.functionalist_point_free_change_reciever(reciever)
+     #end
+
+
+     def method_missing(*method_and_args, &block)
+       @methods << [method_and_args, block] unless method_and_args == [:respond_to?, :to_proc]
+       self
+     end
+
+
+     def to_proc
+       lambda do |obj|
+         reciever, value = @methods.inject(obj) do |left, right|
+           Functionalist::PointFree::Operator.caculate(left, right)
+         end
+         reciever
+       end
+     end
+
+     def queue 
+      @methods
+    end
+
+   end
+  end
+end
+

data/lib/functionalist/point_free/operator.rb

@@ -0,0 +1,40 @@
+module Functionalist
+  module PointFree
+    module Operator
+
+      def self.caculate(left, right)
+        receiver, value        = left
+        method_and_args, block = right
+	      #puts "#{reciever.inspect} >> ##{method_and_args}"
+
+        a = case method_and_args.first
+        when :point_free_itself
+          left
+
+        when :point_free_map
+          [receiver.map(&method_and_args[1]), nil]
+
+        when :point_free_split
+          [method_and_args[1..-1].map {|x| x.to_proc.call(receiver)}, nil]
+
+        when :point_free_change_receiver
+          [method_and_args[1],receiver]
+
+        when :point_free_inject_args
+          #[method_and_args[1],receiver]
+
+        else #:point_free_concatenate
+          method_and_args = [method_and_args[0]] + [value] if value
+
+          [receiver.send(*method_and_args, &block), nil]
+
+        end
+
+         #puts a.inspect ;puts
+	       return a
+      end
+
+    end
+  end
+end
+

data/lib/functionalist/point_free/string_extensions.rb

@@ -0,0 +1,31 @@
+module StringExtensions
+
+  OPERATOR_AFTER = ' < '
+
+  def r(receiver)
+    @point_free_receiver = receiver
+  end
+
+  def args(*args)
+    @point_free_args = args
+  end
+
+
+  def point
+
+  def to_proc
+    self.strip.split(OPERATOR_AFTER).reverse.each do |node|
+      parse node
+
+
+    end
+  end
+
+
+  private
+
+  def expression
+    @@expression ||= Functionalist::PointFree::Expression.new
+  end
+
+end

data/lib/functionalist/version.rb

@@ -0,0 +1,5 @@
+module Functionalist
+
+  VERSION = '0.0.1'
+
+end

metadata

@@ -0,0 +1,67 @@
+--- !ruby/object:Gem::Specification
+name: functionalist
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Miguel Regedor
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-09-07 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: minitest-colorize
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: The beauty of functional programing in ruby!
+email: miguelregedor@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- CHANGELOG.md
+- MIT-LICENSE
+- lib/core_ext/kernel.rb
+- lib/core_ext/string.rb
+- lib/functionalist.rb
+- lib/functionalist/point_free.rb
+- lib/functionalist/point_free/expression.rb
+- lib/functionalist/point_free/operator.rb
+- lib/functionalist/point_free/string_extensions.rb
+- lib/functionalist/version.rb
+homepage: http://rubygems.org/gems/functionalist
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: 1.9.3
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.1
+signing_key: 
+specification_version: 4
+summary: The beauty of functional programing in ruby!
+test_files: []