summaryrefslogtreecommitdiff
path: root/src/ejabberd_sql_pt.erl
diff options
context:
space:
mode:
authorAlexey Shchepin <alexey@process-one.net>2016-02-11 20:01:32 +0300
committerAlexey Shchepin <alexey@process-one.net>2016-03-01 22:50:07 +0300
commit437e768e4a990a4ea2057a36329170c934ffecf8 (patch)
treec9440638c15d1b08e3a79f00720cd9d8a8b8556d /src/ejabberd_sql_pt.erl
parentSupport for run-time SQL queries selection depending on DBMS version (diff)
Better error handling in ejabberd_sql_pt
Diffstat (limited to '')
-rw-r--r--src/ejabberd_sql_pt.erl14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/ejabberd_sql_pt.erl b/src/ejabberd_sql_pt.erl
index f9701a0b..23fc263b 100644
--- a/src/ejabberd_sql_pt.erl
+++ b/src/ejabberd_sql_pt.erl
@@ -177,8 +177,8 @@ parse_name(S, State) ->
parse_name(S, [], State).
parse_name([], Acc, State) ->
- % todo
- error;
+ throw({error, State#state.loc,
+ "expected ')', found end of string"});
parse_name([$), T | S], Acc, State) ->
Type =
case T of
@@ -186,13 +186,13 @@ parse_name([$), T | S], Acc, State) ->
$s -> string;
$b -> boolean;
_ ->
- % todo
- error
+ throw({error, State#state.loc,
+ ["unknown type specifier '", T, "'"]})
end,
{lists:reverse(Acc), Type, S, State};
-parse_name([$) | _], Acc, State) ->
- % todo
- error;
+parse_name([$)], Acc, State) ->
+ throw({error, State#state.loc,
+ "expected type specifier, found end of string"});
parse_name([C | S], Acc, State) ->
parse_name(S, [C | Acc], State).