aboutsummaryrefslogtreecommitdiffstats
path: root/calc.erl
diff options
context:
space:
mode:
authorAlexander Sulfrian <alexander@sulfrian.net>2010-10-12 07:49:36 +0200
committerAlexander Sulfrian <alexander@sulfrian.net>2010-10-12 07:49:36 +0200
commit466cff95509b577b480eb91ba794e79e754dc01e (patch)
tree296e99a5d0fe399e14fd94cf8d9f8ee4198d11e0 /calc.erl
parent9091d4c10224efdb95f052dbb6ed07aef761f4d7 (diff)
downloaderlang-466cff95509b577b480eb91ba794e79e754dc01e.tar.gz
erlang-466cff95509b577b480eb91ba794e79e754dc01e.tar.xz
erlang-466cff95509b577b480eb91ba794e79e754dc01e.zip
generating another error
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 04ac38f..4869104 100644
--- a/calc.erl
+++ b/calc.erl
@@ -17,6 +17,8 @@ num(Input, Num) ->
%% bracket := [-] ( '(' sum '}' | num )
bracket([$-|Input]) ->
case bracket(Input) of
+ {ok, {Tail, []}} ->
+ {error, {expected_number, {before, Tail}}};
{ok, {Tail, Result}} ->
{ok, {Tail, -1 * Result}};
{error, Why} ->