diff options
| author | Heinz N. Gies <heinz@licenser.net> | 2015-09-21 18:29:04 +0200 |
|---|---|---|
| committer | Heinz N. Gies <heinz@licenser.net> | 2015-09-21 18:29:04 +0200 |
| commit | 3ea484530f07bc8cc526084c882ee4749f2a2153 (patch) | |
| tree | 5544f34d308ddd28dd1771c3dc883b2726aae7c5 | |
| parent | bba67f8b211ebd1fc50f335bbaa3e69d0633fee1 (diff) | |
Formating for inproper list construction
| -rw-r--r-- | src/rebar_dialyzer_format.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/rebar_dialyzer_format.erl b/src/rebar_dialyzer_format.erl index e4c0183..d463958 100644 --- a/src/rebar_dialyzer_format.erl +++ b/src/rebar_dialyzer_format.erl @@ -100,7 +100,7 @@ message_to_string({fun_app_no_fun, [Op, Type, Arity]}) -> message_to_string({guard_fail, []}) -> ?BW "Clause guard cannot succeed.\n" ?R; message_to_string({guard_fail, [Arg1, Infix, Arg2]}) -> - format("Guard test ~s ~s ~s can never succeed\n", [Arg1, Infix, Arg2]); + format(?BW "Guard test "?R"~s ~s ~s"?BW" can never succeed\n", [Arg1, Infix, Arg2]); message_to_string({neg_guard_fail, [Arg1, Infix, Arg2]}) -> format("Guard test not(~s ~s ~s) can never succeed\n", [Arg1, Infix, Arg2]); @@ -112,8 +112,8 @@ message_to_string({guard_fail_pat, [Pat, Type]}) -> format("Clause guard cannot succeed. The ~s was matched" " against the type ~s\n", [Pat, Type]); message_to_string({improper_list_constr, [TlType]}) -> - format("Cons will produce an improper list" - " since its 2nd argument is ~s\n", [TlType]); + format(?BW "Cons will produce an improper list" + " since its "?NB"2"?R"nd"?BW" argument is"?R" ~s\n", [TlType]); message_to_string({no_return, [Type|Name]}) -> NameString = case Name of |