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