aboutsummaryrefslogtreecommitdiffstats
path: root/calc.erl
diff options
context:
space:
mode:
authorAlexander Sulfrian <alexander@sulfrian.net>2010-10-11 20:22:35 +0200
committerAlexander Sulfrian <alexander@sulfrian.net>2010-10-11 20:22:35 +0200
commitd61edeb7473237c97df58409d32b710c0fabcf82 (patch)
treeaf9b4301908346fb9fe549ccae7392f36fe4c4c3 /calc.erl
parent8c8596c17a3c63347574f63c3f93de2b64669720 (diff)
downloaderlang-d61edeb7473237c97df58409d32b710c0fabcf82.tar.gz
erlang-d61edeb7473237c97df58409d32b710c0fabcf82.tar.xz
erlang-d61edeb7473237c97df58409d32b710c0fabcf82.zip
added possibility to add spaces before the ^ operator
Diffstat (limited to 'calc.erl')
-rw-r--r--calc.erl2
1 files changed, 2 insertions, 0 deletions
diff --git a/calc.erl b/calc.erl
index a24b915..7b7c56f 100644
--- a/calc.erl
+++ b/calc.erl
@@ -14,6 +14,8 @@ factor(Input, Number1) when is_integer(Number1) or is_float(Number1) ->
factor([], Number) ->
{[], Number}.
+factorExtended([$ |Tail], Result) ->
+ factorExtended(Tail, Result);
factorExtended([$^|Tail], Result) ->
factor(Tail, Result);
factorExtended(Tail, Result) ->