From 466cff95509b577b480eb91ba794e79e754dc01e Mon Sep 17 00:00:00 2001
From: Alexander Sulfrian <alexander@sulfrian.net>
Date: Tue, 12 Oct 2010 07:49:36 +0200
Subject: generating another error
---
calc.erl | 2 ++
1 file changed, 2 insertions(+)
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} ->
--
cgit v1.2.3