diff options
| author | Björn Gustavsson <[email protected]> | 2016-05-19 13:12:02 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2016-05-19 13:12:02 +0200 |
| commit | 37b60d5b365e814c83974cdac0f1eed04dab0ad3 (patch) | |
| tree | 1f9f05a79dfd18035a857b4fac3c75e17d542c6a | |
| parent | 2212ff88eb1eb973c9150ea294fc6226d4fc9a10 (diff) | |
| parent | d6f5a1d972b76335613ac4ec83d8de8ca1aa7260 (diff) | |
| download | otp-37b60d5b365e814c83974cdac0f1eed04dab0ad3.tar.gz otp-37b60d5b365e814c83974cdac0f1eed04dab0ad3.tar.bz2 otp-37b60d5b365e814c83974cdac0f1eed04dab0ad3.zip | |
Merge branch 'mururu/eunit/debugvalall/PR-1024/OTP-13612'
* mururu/eunit/debugvalall/PR-1024/OTP-13612:
eunit: Add ?debugValAll macro
| -rw-r--r-- | lib/eunit/doc/overview.edoc | 2 | ||||
| -rw-r--r-- | lib/eunit/include/eunit.hrl | 8 |
2 files changed, 10 insertions, 0 deletions
diff --git a/lib/eunit/doc/overview.edoc b/lib/eunit/doc/overview.edoc index 12ea02f442..ca7ffb83a4 100644 --- a/lib/eunit/doc/overview.edoc +++ b/lib/eunit/doc/overview.edoc @@ -693,6 +693,8 @@ it like `debugMsg'. The result is always `ok'.</dd> shown truncated.) The result is always the value of `Expr', so this macro can be wrapped around any expression to display its value when the code is compiled with debugging enabled.</dd> +<dt>`debugValAll(Expr)'</dt> +<dd>This is almost same as `debugVal(Expr)`, but doesn't truncate terms to print.</dd> <dt>`debugTime(Text,Expr)'</dt> <dd>Prints `Text' and the wall clock time for evaluation of `Expr'. The result is always the value of `Expr', so this macro can be wrapped diff --git a/lib/eunit/include/eunit.hrl b/lib/eunit/include/eunit.hrl index 8f678b0290..b6dbe2d706 100644 --- a/lib/eunit/include/eunit.hrl +++ b/lib/eunit/include/eunit.hrl @@ -212,6 +212,7 @@ -define(debugHere, ok). -define(debugFmt(S, As), ok). -define(debugVal(E), (E)). +-define(debugValAll(E), (E)). -define(debugTime(S, E), (E)). -else. -define(debugMsg(S), @@ -229,6 +230,13 @@ __V end)(E)) end). +-define(debugValAll(E), + begin + ((fun (__V) -> + ?debugFmt(<<"~ts = ~tp">>, [(??E), __V]), + __V + end)(E)) + end). -define(debugTime(S, E), begin ((fun () -> |