set throw() to follow ISO recommendations
This commit is contained in:
@@ -63,7 +63,7 @@
|
|||||||
|
|
||||||
option(W, O) :-
|
option(W, O) :-
|
||||||
( member(W, O) -> true
|
( member(W, O) -> true
|
||||||
; throw(not_found_error(W, O))).
|
; throw(error(unknown_opt_error(W, O), option/2)).
|
||||||
|
|
||||||
|
|
||||||
option_extends([], Opt, Opt).
|
option_extends([], Opt, Opt).
|
||||||
|
|||||||
Reference in New Issue
Block a user