carlosbrando-money 2.2.0

data/lib/money/symbols.rb

@@ -0,0 +1,39 @@
+# encoding: utf-8
+
+# Add more from http://www.xe.com/symbols.php
+
+class Money
+  SYMBOLS = {
+    "GBP" => { :unit => "£",   :separator => ".", :delimiter => "," },
+    "JPY" => { :unit => "¥",   :separator => ".", :delimiter => "," },
+    "EUR" => { :unit => "€",   :separator => ".", :delimiter => "," },
+    "ZWD" => { :unit => "Z$",  :separator => ".", :delimiter => "," },
+    "CNY" => { :unit => "¥",   :separator => ".", :delimiter => "," },
+    "INR" => { :unit => "₨",   :separator => ".", :delimiter => "," },
+    "NPR" => { :unit => "₨",   :separator => ".", :delimiter => "," },
+    "SCR" => { :unit => "₨",   :separator => ".", :delimiter => "," },
+    "LKR" => { :unit => "₨",   :separator => ".", :delimiter => "," },
+    "SEK" => { :unit => "kr",  :separator => ".", :delimiter => "," },
+    "GHC" => { :unit => "¢",   :separator => ".", :delimiter => "," },
+    "BRL" => { :unit => "R$ ", :separator => ",", :delimiter => "." }
+
+    # Everything else defaults to :unit => "$", :separator => ".", and :delimiter => ","
+  }
+
+  private
+    def symbol_attribute(attribute, default)
+      SYMBOLS.has_key?(currency) && SYMBOLS[currency].has_key?(attribute) ? SYMBOLS[currency][attribute] : default
+    end
+
+    def currency_unit
+      symbol_attribute :unit, '$'
+    end
+
+    def currency_separator
+      symbol_attribute :separator, '.'
+    end
+
+    def currency_delimiter
+      symbol_attribute :delimiter, ','
+    end
+end

data/lib/money/variable_exchange_bank.rb

@@ -0,0 +1,72 @@
+require 'thread'
+require 'money/errors'
+
+# Class for aiding in exchanging money between different currencies.
+# By default, the Money class uses an object of this class (accessible through
+# Money#bank) for performing currency exchanges.
+#
+# By default, VariableExchangeBank has no knowledge about conversion rates.
+# One must manually specify them with +add_rate+, after which one can perform
+# exchanges with +exchange+. For example:
+#
+#  bank = Money::VariableExchangeBank.new
+#  bank.add_rate("USD", "CAD", 1.24515)
+#  bank.add_rate("CAD", "USD", 0.803115)
+#  
+#  # Exchange 100 CAD to USD:
+#  bank.exchange(100_00, "CAD", "USD")  # => 124
+#  # Exchange 100 USD to CAD:
+#  bank.exchange(100_00, "USD", "CAD")  # => 80
+class Money
+  class VariableExchangeBank
+    # Returns the singleton instance of VariableExchangeBank.
+    #
+    # By default, <tt>Money.default_bank</tt> returns the same object.
+    def self.instance
+      @@singleton
+    end
+    
+    def initialize
+      @rates = {}
+      @mutex = Mutex.new
+    end
+    
+    # Registers a conversion rate. +from+ and +to+ are both currency names.
+    def add_rate(from, to, rate)
+      @mutex.synchronize do
+        @rates["#{from}_TO_#{to}".upcase] = rate
+      end
+    end
+    
+    # Gets the rate for exchanging the currency named +from+ to the currency
+    # named +to+. Returns nil if the rate is unknown.
+    def get_rate(from, to)
+      @mutex.synchronize do
+        @rates["#{from}_TO_#{to}".upcase] 
+      end
+    end
+    
+    # Given two currency names, checks whether they're both the same currency.
+    #
+    #   bank = VariableExchangeBank.new
+    #   bank.same_currency?("usd", "USD")   # => true
+    #   bank.same_currency?("usd", "EUR")   # => false
+    def same_currency?(currency1, currency2)
+      currency1.upcase == currency2.upcase
+    end
+    
+    # Exchange the given amount of cents in +from_currency+ to +to_currency+.
+    # Returns the amount of cents in +to_currency+ as an integer, rounded down.
+    #
+    # If the conversion rate is unknown, then Money::UnknownRate will be raised.
+    def exchange(cents, from_currency, to_currency)
+      rate = get_rate(from_currency, to_currency)
+      if !rate
+        raise Money::UnknownRate, "No conversion rate known for '#{from_currency}' -> '#{to_currency}'"
+      end
+      (cents * rate).floor
+    end
+    
+    @@singleton = VariableExchangeBank.new
+  end
+end

data/money.gemspec

@@ -0,0 +1,24 @@
+Gem::Specification.new do |s|
+  s.name = "carlosbrando-money"
+  s.version = "2.2.0"
+  s.summary = "Money and currency exchange support library"
+  s.email = "hongli@phusion.nl"
+  s.homepage = "http://money.rubyforge.org/"
+  s.description = "Money and currency exchange support library."
+  s.has_rdoc = true
+  s.rubyforge_project = "money"
+  s.authors = ["Tobias Luetke", "Hongli Lai", "Jeremy McNevin", "Carlos Brando"]
+  
+  s.files = [
+      "README.rdoc", "MIT-LICENSE", "money.gemspec", "Rakefile",
+      "lib/money.rb",
+      "lib/money/core_extensions.rb",
+      "lib/money/errors.rb",
+      "lib/money/money.rb",
+      "lib/money/symbols.rb",
+      "lib/money/variable_exchange_bank.rb",
+      "test/core_extensions_spec.rb",
+      "test/exchange_bank_spec.rb",
+      "test/money_spec.rb"
+  ]
+end

data/test/core_extensions_spec.rb

@@ -0,0 +1,73 @@
+$LOAD_PATH.unshift(File.expand_path(File.dirname(__FILE__) + "/../lib"))
+require 'money/core_extensions'
+
+describe "Money core extensions" do
+  specify "Numberic#to_money works" do
+    money = 1234.to_money
+    money.cents.should == 1234_00
+    money.currency.should == Money.default_currency
+    
+    money = 100.37.to_money
+    money.cents.should == 100_37
+    money.currency.should == Money.default_currency
+  end
+  
+  specify "String#to_money works" do
+    "20.15".to_money.should == Money.new(20_15)
+    "100".to_money.should == Money.new(100_00)
+    "100.37".to_money.should == Money.new(100_37)
+    "100,37".to_money.should == Money.new(100_37)
+    "100 000".to_money.should == Money.new(100_000_00)
+    "100,000.00".to_money.should == Money.new(100_000_00)
+    "1,000".to_money.should == Money.new(1_000_00)
+    "-1,000".to_money.should == Money.new(-1_000_00)
+    "1,000.5".to_money.should == Money.new(1_000_50)
+    "1,000.51".to_money.should == Money.new(1_000_51)
+    "1,000.505".to_money.should == Money.new(1_000_51)
+    "1,000.504".to_money.should == Money.new(1_000_50)
+    "1,000.0000".to_money.should == Money.new(1_000_00)
+    "1,000.5000".to_money.should == Money.new(1_000_50)
+    "1,000.5099".to_money.should == Money.new(1_000_51)
+    "1.550".to_money.should == Money.new(1_55)
+    "25.".to_money.should == Money.new(25_00)
+    ".75".to_money.should == Money.new(75)
+    
+    "100 USD".to_money.should == Money.new(100_00, "USD")
+    "-100 USD".to_money.should == Money.new(-100_00, "USD")
+    "100 EUR".to_money.should == Money.new(100_00, "EUR")
+    "100.37 EUR".to_money.should == Money.new(100_37, "EUR")
+    "100,37 EUR".to_money.should == Money.new(100_37, "EUR")
+    "100,000.00 USD".to_money.should == Money.new(100_000_00, "USD")
+    "100.000,00 EUR".to_money.should == Money.new(100_000_00, "EUR")
+    "1,000 USD".to_money.should == Money.new(1_000_00, "USD")
+    "-1,000 USD".to_money.should == Money.new(-1_000_00, "USD")
+    "1,000.5500 USD".to_money.should == Money.new(1_000_55, "USD")
+    "-1,000.6500 USD".to_money.should == Money.new(-1_000_65, "USD")
+    "1.550 USD".to_money.should == Money.new(1_55, "USD")
+    
+    "USD 100".to_money.should == Money.new(100_00, "USD")
+    "EUR 100".to_money.should == Money.new(100_00, "EUR")
+    "EUR 100.37".to_money.should == Money.new(100_37, "EUR")
+    "CAD -100.37".to_money.should == Money.new(-100_37, "CAD")
+    "EUR 100,37".to_money.should == Money.new(100_37, "EUR")
+    "EUR -100,37".to_money.should == Money.new(-100_37, "EUR")
+    "USD 100,000.00".to_money.should == Money.new(100_000_00, "USD")
+    "EUR 100.000,00".to_money.should == Money.new(100_000_00, "EUR")
+    "USD 1,000".to_money.should == Money.new(1_000_00, "USD")
+    "USD -1,000".to_money.should == Money.new(-1_000_00, "USD")
+    "USD 1,000.9000".to_money.should == Money.new(1_000_90, "USD")
+    "USD -1,000.090".to_money.should == Money.new(-1_000_09, "USD")
+    "USD 1.5500".to_money.should == Money.new(1_55, "USD")
+    
+    "$100 USD".to_money.should == Money.new(100_00, "USD")
+    "$1,194.59 USD".to_money.should == Money.new(1_194_59, "USD")
+    "$-1,955 USD".to_money.should == Money.new(-1_955_00, "USD")
+    "$1,194.5900 USD".to_money.should == Money.new(1_194_59, "USD")
+    "$-1,955.000 USD".to_money.should == Money.new(-1_955_00, "USD")
+    "$1.99000 USD".to_money.should == Money.new(1_99, "USD")
+  end
+  
+  specify "String#to_money ignores unrecognized data" do
+    "hello 2000 world".to_money.should == Money.new(2000_00)
+  end
+end

data/test/exchange_bank_spec.rb

@@ -0,0 +1,45 @@
+$LOAD_PATH.unshift(File.expand_path(File.dirname(__FILE__) + "/../lib"))
+require 'money/variable_exchange_bank'
+
+describe Money::VariableExchangeBank do
+  before :each do
+    @bank = Money::VariableExchangeBank.new
+  end
+  
+  it "returns the previously specified conversion rate" do
+    @bank.add_rate("USD", "EUR", 0.788332676)
+    @bank.add_rate("EUR", "YEN", 122.631477)
+    @bank.get_rate("USD", "EUR").should == 0.788332676
+    @bank.get_rate("EUR", "YEN").should == 122.631477
+  end
+  
+  it "treats currency names case-insensitively" do
+    @bank.add_rate("usd", "eur", 1)
+    @bank.get_rate("USD", "EUR").should == 1
+    @bank.same_currency?("USD", "usd").should be_true
+    @bank.same_currency?("EUR", "usd").should be_false
+  end
+  
+  it "returns nil if the conversion rate is unknown" do
+    @bank.get_rate("American Pesos", "EUR").should be_nil
+  end
+  
+  it "exchanges money from one currency to another according to the specified conversion rates" do
+    @bank.add_rate("USD", "EUR", 0.5)
+    @bank.add_rate("EUR", "YEN", 10)
+    @bank.exchange(10_00, "USD", "EUR").should == 5_00
+    @bank.exchange(500_00, "EUR", "YEN").should == 5000_00
+  end
+  
+  it "rounds the exchanged result down" do
+    @bank.add_rate("USD", "EUR", 0.788332676)
+    @bank.add_rate("EUR", "YEN", 122.631477)
+    @bank.exchange(10_00, "USD", "EUR").should == 788
+    @bank.exchange(500_00, "EUR", "YEN").should == 6131573
+  end
+  
+  it "raises Money::UnknownRate upon conversion if the conversion rate is unknown" do
+    block = lambda { @bank.exchange(10, "USD", "EUR") }
+    block.should raise_error(Money::UnknownRate)
+  end
+end

data/test/money_spec.rb

@@ -0,0 +1,358 @@
+# encoding: utf-8
+$LOAD_PATH.unshift(File.expand_path(File.dirname(__FILE__) + "/../lib"))
+require 'money/money'
+require 'money/symbols'
+
+describe Money do
+  it "is associated to the singleton instance of VariableExchangeBank by default" do
+    Money.new(0).bank.object_id.should == Money::VariableExchangeBank.instance.object_id
+  end
+  
+  specify "#cents returns the amount of cents passed to the constructor" do
+    Money.new(200_00, "USD").cents.should == 200_00
+  end
+  
+  it "rounds the given cents to an integer" do
+    Money.new(1.00, "USD").cents.should == 1
+    Money.new(1.01, "USD").cents.should == 1
+    Money.new(1.50, "USD").cents.should == 2
+  end
+  
+  specify "#currency returns the currency passed to the constructor" do
+    Money.new(200_00, "USD").currency.should == "USD"
+  end
+  
+  specify "#zero? returns whether the amount is 0" do
+    Money.new(0, "USD").should be_zero
+    Money.new(0, "EUR").should be_zero
+    Money.new(1, "USD").should_not be_zero
+    Money.new(10, "YEN").should_not be_zero
+    Money.new(-1, "EUR").should_not be_zero
+  end
+  
+  specify "#exchange_to exchanges the amount via its exchange bank" do
+    money = Money.new(100_00, "USD")
+    money.bank.should_receive(:exchange).with(100_00, "USD", "EUR").and_return(200_00)
+    money.exchange_to("EUR")
+  end
+  
+  specify "#exchange_to exchanges the amount properly" do
+    money = Money.new(100_00, "USD")
+    money.bank.should_receive(:exchange).with(100_00, "USD", "EUR").and_return(200_00)
+    money.exchange_to("EUR").should == Money.new(200_00, "EUR")
+  end
+  
+  specify "#== returns true if and only if their amount and currency are equal" do
+    Money.new(1_00, "USD").should == Money.new(1_00, "USD")
+    Money.new(1_00, "USD").should_not == Money.new(1_00, "EUR")
+    Money.new(1_00, "USD").should_not == Money.new(2_00, "USD")
+    Money.new(1_00, "USD").should_not == Money.new(99_00, "EUR")
+  end
+  
+  specify "#== can be used to compare with a String money value" do
+    Money.new(1_00, "USD").should == "1.00"
+    Money.new(1_00, "USD").should_not == "2.00"
+    Money.new(1_00, "GBP").should_not == "1.00"
+  end
+  
+  specify "#== can be used to compare with a Numeric money value" do
+    Money.new(1_00, "USD").should == 1
+    Money.new(1_57, "USD").should == 1.57
+    Money.new(1_00, "USD").should_not == 2
+    Money.new(1_00, "GBP").should_not == 1
+  end
+  
+  specify "#== can be used to compare with an object that responds to #to_money" do
+    klass = Class.new do
+      def initialize(money)
+        @money = money
+      end
+      
+      def to_money
+        @money
+      end
+    end
+    
+    Money.new(1_00, "USD").should == klass.new(Money.new(1_00, "USD"))
+    Money.new(2_50, "USD").should == klass.new(Money.new(2_50, "USD"))
+    Money.new(2_50, "USD").should_not == klass.new(Money.new(3_00, "USD"))
+    Money.new(1_00, "GBP").should_not == klass.new(Money.new(1_00, "USD"))
+  end
+  
+  specify "#== returns false if used to compare with an object that doesn't respond to #to_money" do
+    Money.new(1_00, "USD").should_not == Object.new
+    Money.new(1_00, "USD").should_not == Class
+    Money.new(1_00, "USD").should_not == Kernel
+    Money.new(1_00, "USD").should_not == /foo/
+    Money.new(1_00, "USD").should_not == nil
+  end
+  
+  specify "#<=> can be used to compare with a String money value" do
+    (Money.new(1_00) <=> "1.00").should == 0
+    (Money.new(1_00) <=> ".99").should > 0
+    (Money.new(1_00) <=> "2.00").should < 0
+  end
+  
+  specify "#<=> can be used to compare with a Numeric money value" do
+    (Money.new(1_00) <=> 1).should == 0
+    (Money.new(1_00) <=> 0.99).should > 0
+    (Money.new(1_00) <=> 2.00).should < 0
+  end
+  
+  specify "#<=> can be used to compare with an object that responds to #to_money" do
+    klass = Class.new do
+      def initialize(money)
+        @money = money
+      end
+      
+      def to_money
+        @money
+      end
+    end
+    
+    (Money.new(1_00) <=> klass.new(Money.new(1_00))).should == 0
+    (Money.new(1_00) <=> klass.new(Money.new(99))).should > 0
+    (Money.new(1_00) <=> klass.new(Money.new(2_00))).should < 0
+  end
+  
+  specify "#<=> raises ArgumentError when used to compare with an object that doesn't respond to #to_money" do
+    expected_message = /comparison .+ failed/
+    lambda{ Money.new(1_00) <=> Object.new }.should raise_error(ArgumentError, expected_message)
+    lambda{ Money.new(1_00) <=> Class }.should raise_error(ArgumentError, expected_message)
+    lambda{ Money.new(1_00) <=> Kernel }.should raise_error(ArgumentError, expected_message)
+    lambda{ Money.new(1_00) <=> /foo/ }.should raise_error(ArgumentError, expected_message)
+  end
+  
+  specify "#* multiplies the money's amount by the multiplier while retaining the currency" do
+    (Money.new(1_00, "USD") * 10).should == Money.new(10_00, "USD")
+  end
+  
+  specify "#/ divides the money's amount by the divisor while retaining the currency" do
+    (Money.new(10_00, "USD") / 10).should == Money.new(1_00, "USD")
+  end
+  
+  specify "Money.empty creates a new Money object of 0 cents" do
+    Money.empty.should == Money.new(0)
+  end
+  
+  specify "Money.ca_dollar creates a new Money object of the given value in CAD" do
+    Money.ca_dollar(50).should == Money.new(50, "CAD")
+  end
+  
+  specify "Money.ca_dollar creates a new Money object of the given value in USD" do
+    Money.us_dollar(50).should == Money.new(50, "USD")
+  end
+  
+  specify "Money.ca_dollar creates a new Money object of the given value in EUR" do
+    Money.euro(50).should == Money.new(50, "EUR")
+  end
+  
+  specify "Money.new accepts { :currency => 'foo' } as the value for the 'currency' argument" do
+    money = Money.new(20, :currency => "EUR")
+    money.currency.should == "EUR"
+    
+    money = Money.new(20, :currency => nil)
+    money.currency.should == Money.default_currency
+  end
+  
+  specify "Money.add_rate works" do
+    Money.add_rate("EUR", "USD", 10)
+    Money.new(10_00, "EUR").exchange_to("USD").should == Money.new(100_00, "USD")
+  end
+
+  specify "Money.to_s works" do
+    Money.new(10_00).to_s.should == "10.00"
+  end
+
+  specify "Money.to_f works" do
+    Money.new(10_00).to_f.should == 10.0
+  end
+  
+  describe "#format" do
+    it "returns the monetary value as a string" do
+      Money.ca_dollar(100).format.should == "$1.00"
+    end
+    
+    describe "if the monetary value is 0" do
+      before :each do
+        @money = Money.us_dollar(0)
+      end
+      
+      it "returns 'free' when :display_free is true" do
+        @money.format(:display_free => true).should == 'free'
+      end
+    
+      it "returns '$0.00' when :display_free is false or not given" do
+        @money.format.should == '$0.00'
+        @money.format(:display_free => false).should == '$0.00'
+        @money.format(:display_free => nil).should == '$0.00'
+      end
+      
+      it "returns the value specified by :display_free if it's a string-like object" do
+        @money.format(:display_free => 'gratis').should == 'gratis'
+      end
+    end
+    
+    specify "#format(:with_currency => true) works as documented" do
+      Money.ca_dollar(100).format(:with_currency => true).should == "$1.00 CAD"
+      Money.us_dollar(85).format(:with_currency => true).should == "$0.85 USD"
+      Money.brazilian_real(85).format(:with_currency).should == "R$ 0,85 BRL"
+    end
+    
+    specify "#format(:with_currency) works as documented" do
+      Money.ca_dollar(100).format(:with_currency).should == "$1.00 CAD"
+      Money.us_dollar(85).format(:with_currency).should == "$0.85 USD"
+    end
+    
+    specify "#format(:no_cents => true) works as documented" do
+      Money.ca_dollar(100).format(:no_cents => true).should == "$1"
+      Money.ca_dollar(599).format(:no_cents => true).should == "$5"
+      Money.ca_dollar(570).format(:no_cents => true, :with_currency => true).should == "$5 CAD"
+      Money.brazilian_real(390_00).format(:no_cents => true).should == "R$ 390"
+    end
+
+    specify "#format(:no_cents) works as documented" do
+      Money.ca_dollar(100).format(:no_cents).should == "$1"
+      Money.ca_dollar(599).format(:no_cents).should == "$5"
+      Money.ca_dollar(570).format(:no_cents, :with_currency).should == "$5 CAD"
+      Money.ca_dollar(39000).format(:no_cents).should == "$390"
+    end
+    
+    specify "#format(:symbol => a symbol string) uses the given value as the money symbol" do
+      Money.new(100, "GBP").format(:symbol => "£").should == "£1.00"
+    end
+    
+    specify "#format(:symbol => true) returns symbol based on the given currency code" do
+      one = Proc.new do |currency|
+        Money.new(1_000_00, currency).format(:symbol => true)
+      end
+
+      # Pounds
+      one["GBP"].should == "£1,000.00"
+      
+      # Dollars
+      one["USD"].should == "$1,000.00"
+      one["CAD"].should == "$1,000.00"
+      one["AUD"].should == "$1,000.00"
+      one["NZD"].should == "$1,000.00"
+      one["ZWD"].should == "Z$1,000.00"
+      
+      # Yen
+      one["JPY"].should == "¥1,000.00"      
+      one["CNY"].should == "¥1,000.00"      
+      
+      # Euro
+      one["EUR"].should == "€1,000.00"
+      
+      # Rupees
+      one["INR"].should == "₨1,000.00"
+      one["NPR"].should == "₨1,000.00"
+      one["SCR"].should == "₨1,000.00"
+      one["LKR"].should == "₨1,000.00"
+      
+      # Brazilian Real
+      one["BRL"].should == "R$ 1.000,00"
+      
+      # Other
+      one["SEK"].should == "kr1,000.00"
+      one["GHC"].should == "¢1,000.00"
+    end
+    
+    specify "#format(:symbol => true) returns $ when currency code is not recognized" do
+      Money.new(100, "XYZ").format(:symbol => true).should == "$1.00"
+    end
+    
+    specify "#format(:symbol => some non-Boolean value that evaluates to true) returs symbol based on the given currency code" do
+      Money.new(100, "GBP").format(:symbol => true).should == "£1.00"
+      Money.new(100, "EUR").format(:symbol => true).should == "€1.00"
+      Money.new(100, "SEK").format(:symbol => true).should == "kr1.00"
+    end
+    
+    specify "#format with :symbol == "", nil or false returns the amount without a symbol" do
+      money = Money.new(100, "GBP")
+      money.format(:symbol => "").should == "1.00"
+      money.format(:symbol => nil).should == "1.00"
+      money.format(:symbol => false).should == "1.00"
+    end
+    
+    specify "#format without :symbol assumes that :symbol is set to true" do
+      money = Money.new(100)
+      money.format.should == "$1.00"
+      
+      money = Money.new(100, "GBP")
+      money.format.should == "£1.00"
+      
+      money = Money.new(100, "XYZ")
+      money.format.should == "$1.00"
+    end
+    
+    specify "#format(:html => true) works as documented" do
+      string = Money.ca_dollar(570).format(:html => true, :with_currency => true)
+      string.should == "$5.70 <span class=\"currency\">CAD</span>"
+    end
+    
+    it "should insert commas into the result if the amount is sufficiently large" do
+      Money.us_dollar(1_000_000_000_12).format.should == "$1,000,000,000.12"
+      Money.us_dollar(1_000_000_000_12).format(:no_cents => true).should == "$1,000,000,000"
+
+      Money.brazilian_real(1_000_000_000_12).format.should == "R$ 1.000.000.000,12"
+      Money.brazilian_real(1_000_000_000_12).format(:no_cents => true).should == "R$ 1.000.000.000"
+    end
+  end
+end
+
+describe "Actions involving two Money objects" do
+  describe "if the other Money object has the same currency" do
+    specify "#<=> compares the two objects' amounts" do
+      (Money.new(1_00, "USD") <=> Money.new(1_00, "USD")).should == 0
+      (Money.new(1_00, "USD") <=> Money.new(99, "USD")).should > 0
+      (Money.new(1_00, "USD") <=> Money.new(2_00, "USD")).should < 0
+    end
+    
+    specify "#+ adds the other object's amount to the current object's amount while retaining the currency" do
+      (Money.new(10_00, "USD") + Money.new(90, "USD")).should == Money.new(10_90, "USD")
+    end
+    
+    specify "#- substracts the other object's amount from the current object's amount while retaining the currency" do
+      (Money.new(10_00, "USD") - Money.new(90, "USD")).should == Money.new(9_10, "USD")
+    end
+
+    specify "#/ divides the current object's amount by the other object's amount resulting in a float" do
+      (Money.new(10_00, "USD") / Money.new(100_00, "USD")).should == 0.1
+    end
+  end
+  
+  describe "if the other Money object has a different currency" do
+    specify "#<=> compares the two objects' amount after converting the other object's amount to its own currency" do
+      target = Money.new(200_00, "EUR")
+      target.should_receive(:exchange_to).with("USD").and_return(Money.new(300_00, "USD"))
+      (Money.new(100_00, "USD") <=> target).should < 0
+      
+      target = Money.new(200_00, "EUR")
+      target.should_receive(:exchange_to).with("USD").and_return(Money.new(100_00, "USD"))
+      (Money.new(100_00, "USD") <=> target).should == 0
+      
+      target = Money.new(200_00, "EUR")
+      target.should_receive(:exchange_to).with("USD").and_return(Money.new(99_00, "USD"))
+      (Money.new(100_00, "USD") <=> target).should > 0
+    end
+    
+    specify "#+ adds the other object's amount, converted to this object's currency, to this object's amount while retaining its currency" do
+      other = Money.new(90, "EUR")
+      other.should_receive(:exchange_to).with("USD").and_return(Money.new(9_00, "USD"))
+      (Money.new(10_00, "USD") + other).should == Money.new(19_00, "USD")
+    end
+    
+    specify "#- substracts the other object's amount, converted to this object's currency, from this object's amount while retaining its currency" do
+      other = Money.new(90, "EUR")
+      other.should_receive(:exchange_to).with("USD").and_return(Money.new(9_00, "USD"))
+      (Money.new(10_00, "USD") - other).should == Money.new(1_00, "USD")
+    end
+
+    specify "#/ divides the this object's amount by the other objects's amount, converted to this object's currency, resulting in a float" do
+      other = Money.new(1000, "EUR")
+      other.should_receive(:exchange_to).with("USD").and_return(Money.new(100_00, "USD"))
+      (Money.new(10_00, "USD") / other).should == 0.1
+    end
+  end
+end