Support exponential notation for Money.parse

Author: Nitrino

lib/money.ex

@@ -204,6 +204,12 @@ defmodule Money do
   defp prepare_parse_string(["9" | tail], delimiter, acc),
     do: prepare_parse_string(tail, delimiter, ["9" | acc])
 
+  defp prepare_parse_string(["e" | tail], delimiter, acc),
+    do: prepare_parse_string(tail, delimiter, ["e" | acc])
+
+  defp prepare_parse_string(["E" | tail], delimiter, acc),
+    do: prepare_parse_string(tail, delimiter, ["E" | acc])
+
   defp prepare_parse_string([delimiter | tail], delimiter, acc),
     do: prepare_parse_string(tail, delimiter, ["." | acc])
 

test/money_test.exs

@@ -38,6 +38,9 @@ defmodule MoneyTest do
     assert Money.parse("$- 1,000.00", :USD) == {:ok, usd(-100_000)}
     assert Money.parse("-1000.0", :USD) == {:ok, usd(-100_000)}
 
+    assert Money.parse("5.0e3", :USD) == {:ok, usd(500_000)}
+    assert Money.parse("500e-3", :USD) == {:ok, usd(50)}
+
     assert Money.parse(Decimal.from_float(-1000.0), :USD) == {:ok, usd(-100_000)}
     assert Money.parse(Decimal.from_float(4000.765), :USD) == {:ok, usd(4000_77)}