dfg59-defmacro 0.0.2

data/History.txt

@@ -0,0 +1,12 @@
+=== 0.0.2 / 2008-06-11
+
+* 1 minor enhancement
+
+  * macros can be defined on objects or on main
+
+=== 0.0.1 / 2008-06-09
+
+* 1 major enhancement
+
+  * macros!
+

data/Manifest.txt

@@ -0,0 +1,8 @@
+History.txt
+Manifest.txt
+README.rdoc
+README.txt
+Rakefile
+lib/def_macro.rb
+lib/defmacro.rb
+test/test_def_macro.rb

data/README.rdoc

@@ -0,0 +1,70 @@
+= def_macro
+
+* http://github.com/dfg59/def_macro/tree/master
+
+== DESCRIPTION:
+
+Macros for ruby
+
+== FEATURES/PROBLEMS:
+
+* A few features, probably lots of problems
+
+== SYNOPSIS:
+
+  The classic with macro:
+
+  def_macro :with do |args,body|
+    eval args.first
+    eval body
+  end
+
+  with proc { a = 1; b = 2 } do
+    puts a + b
+  end                         # => 3
+
+  The classic loop macro:
+
+  def_macro :loop do |args,body|
+    (eval args.first).times do
+      eval body
+    end
+  end
+
+  loop 2 do
+    puts "hi"       
+  end                        # => "hi" "hi"      
+
+== REQUIREMENTS:
+
+* ruby2ruby 1.1.9 or later
+
+== INSTALL:
+
+* sudo gem install dfg59-def_macro --source=http://gems.github.com
+* sudo gem install defmacro
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008 Drew Olson
+
+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/Rakefile

@@ -0,0 +1,15 @@
+# -*- ruby -*-
+
+require 'rubygems'
+require 'hoe'
+require './lib/def_macro.rb'
+
+Hoe.new('defmacro', DefMacro::VERSION) do |p|
+  p.rubyforge_name = 'defmacro'
+  p.developer('Drew Olson', 'drew@drewolson.org')
+  p.extra_deps << ['ruby2ruby', '>= 1.1.9']
+  p.extra_deps << ['need', '>= 1.1.0']
+  p.remote_rdoc_dir = ''
+end
+
+# vim: syntax=Ruby

data/lib/def_macro.rb

@@ -0,0 +1,38 @@
+require 'rubygems'
+require 'ruby2ruby'
+
+module DefMacro
+  VERSION = "0.0.2"
+  
+  def self.cleanse_body(body)
+    body = body.split("\n")
+    if body.size > 1
+      body[1...-1].join("\n")
+    else
+      cleanse_arg(body.first)
+    end
+  end
+
+  def self.cleanse_arg(arg)
+    arg[/\{([^}]+)\}/,1]
+  end
+end
+
+class Object
+  def def_macro(name,&body)
+    context = (self.kind_of?(Class) ? self : self.class)
+    context.class_eval <<-EOS
+      def #{name}(*args,&block) 
+        mac_body = DefMacro.cleanse_body(block.to_ruby)
+        args.map! do |arg|
+          if arg.kind_of? Proc
+            DefMacro.cleanse_arg(arg.to_ruby)
+          else
+            arg.to_s
+          end
+        end
+        (eval "#{body.to_ruby}").call(args,mac_body)
+      end  
+    EOS
+  end
+end

data/lib/defmacro.rb

@@ -0,0 +1,3 @@
+require 'rubygems'
+require 'need'
+need { "def_macro" }

data/test/test_def_macro.rb

@@ -0,0 +1,36 @@
+require "test/unit"
+require 'rubygems'
+require 'need'
+need { "../lib/def_macro" }
+
+class Foo
+  def_macro :with do |args,body|
+    eval args.first
+    eval body
+  end
+end
+
+def_macro :with do |args,body|
+  eval args.first
+  eval body
+end
+
+class TestDefMacro < Test::Unit::TestCase
+  def test_with_macro_in_class_def
+    foo = Foo.new
+    
+    result = foo.with proc { a = 1; b = 3 } do
+      a + b
+    end
+    
+    assert_equal(4, result)
+  end
+  
+  def test_with_macro_in_main
+    result = with proc { a = 1; b = 3 } do
+      a + b
+    end
+    
+    assert_equal(4, result)
+  end
+end

metadata

@@ -0,0 +1,90 @@
+--- !ruby/object:Gem::Specification 
+name: dfg59-defmacro
+version: !ruby/object:Gem::Version 
+  version: 0.0.2
+platform: ruby
+authors: 
+- Drew Olson
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-06-11 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: ruby2ruby
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.1.9
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: need
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.1.0
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.5.3
+    version: 
+description: Macros for ruby
+email: 
+- drew@drewolson.org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- README.txt
+files: 
+- History.txt
+- Manifest.txt
+- README.rdoc
+- README.txt
+- Rakefile
+- lib/def_macro.rb
+- lib/defmacro.rb
+- test/test_def_macro.rb
+has_rdoc: true
+homepage: http://github.com/dfg59/def_macro/tree/master
+post_install_message: 
+rdoc_options: 
+- --main
+- README.txt
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: defmacro
+rubygems_version: 1.0.1
+signing_key: 
+specification_version: 2
+summary: Macros for ruby
+test_files: 
+- test/test_def_macro.rb