diff options
-rw-r--r-- | plugins/asciidoc.mk | 4 | ||||
-rw-r--r-- | plugins/proper.mk | 4 | ||||
-rw-r--r-- | plugins/triq.mk | 4 |
3 files changed, 6 insertions, 6 deletions
diff --git a/plugins/asciidoc.mk b/plugins/asciidoc.mk index f4be7ff..778308b 100644 --- a/plugins/asciidoc.mk +++ b/plugins/asciidoc.mk @@ -57,8 +57,8 @@ try }) end || F <- [$(shell echo $(addprefix $(comma)\",$(addsuffix \",$1)) | sed 's/^.//')]], halt(0) -catch C:E -> - io:format("Exception ~p:~p~nStacktrace: ~p~n", [C, E, erlang:get_stacktrace()]), +catch C:E$(if $V,:S) -> + io:format("Exception: ~p:~p~n$(if $V,Stacktrace: ~p~n)", [C, E$(if $V,$(comma) S)]), halt(1) end. endef diff --git a/plugins/proper.mk b/plugins/proper.mk index 6262199..55a2788 100644 --- a/plugins/proper.mk +++ b/plugins/proper.mk @@ -37,8 +37,8 @@ define proper_check.erl end of true -> halt(0); _ -> halt(1) - catch error:undef -> - io:format("Undefined property or module?~n~p~n", [erlang:get_stacktrace()]), + catch error:undef$(if $V,:Stacktrace) -> + io:format("Undefined property or module?~n$(if $V,~p~n)", [$(if $V,Stacktrace)]), halt(0) end. endef diff --git a/plugins/triq.mk b/plugins/triq.mk index 8791e2c..6d41376 100644 --- a/plugins/triq.mk +++ b/plugins/triq.mk @@ -26,8 +26,8 @@ define triq_check.erl end of true -> halt(0); _ -> halt(1) - catch error:undef -> - io:format("Undefined property or module?~n~p~n", [erlang:get_stacktrace()]), + catch error:undef$(if $V,:Stacktrace) -> + io:format("Undefined property or module?~n$(if $V,~p~n)", [$(if $V,Stacktrace)]), halt(0) end. endef |