From d61edeb7473237c97df58409d32b710c0fabcf82 Mon Sep 17 00:00:00 2001 From: Alexander Sulfrian Date: Mon, 11 Oct 2010 20:22:35 +0200 Subject: added possibility to add spaces before the ^ operator --- calc.erl | 2 ++ 1 file changed, 2 insertions(+) (limited to 'calc.erl') 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) -> -- cgit v1.2.3