Contents

###### #####   #### ######
  ##   ##     ##      ##
  ##   ####     ##    ##
  ##   ##        ##   ##
  ##   #####  ####    ##

require 'test/unit'
require 'mega/functor'

class TC_Functor < Test::Unit::TestCase

  def test_it
    f = Functor.new { |op, x| x.send(op, x) }
    assert_equal( 2, f + 1 ) #=> 2
    assert_equal( 4, f + 2 ) #=> 4
    assert_equal( 6, f + 3 ) #=> 6
    assert_equal( 1, f * 1 ) #=> 1
    assert_equal( 4, f * 2 ) #=> 4
    assert_equal( 9, f * 3 ) #=> 9
  end

end

Version data entries

1 entries across 1 versions & 1 rubygems

Version	Path
mega-0.3.1	test/tc_functor.rb