diff options
| author | Richard Carlsson <[email protected]> | 2016-05-19 21:07:14 +0200 |
|---|---|---|
| committer | Richard Carlsson <[email protected]> | 2016-05-20 09:07:15 +0200 |
| commit | 10e106229b5a2006f2e7cf337a048859011f8798 (patch) | |
| tree | 1e76b7182cbef40286f813cc3cdc3e58bdd14c49 /lib/eunit/include | |
| parent | 37b60d5b365e814c83974cdac0f1eed04dab0ad3 (diff) | |
| download | otp-10e106229b5a2006f2e7cf337a048859011f8798.tar.gz otp-10e106229b5a2006f2e7cf337a048859011f8798.tar.bz2 otp-10e106229b5a2006f2e7cf337a048859011f8798.zip | |
Replace suggested debugValAll/1 macro with debugVal/2
Also make the default depth for debugVal/1 possible to override
by defining the macro EUNIT_DEBUG_VAL_DEPTH.
Diffstat (limited to 'lib/eunit/include')
| -rw-r--r-- | lib/eunit/include/eunit.hrl | 16 |
1 files changed, 7 insertions, 9 deletions
diff --git a/lib/eunit/include/eunit.hrl b/lib/eunit/include/eunit.hrl index b6dbe2d706..7fd6c206a4 100644 --- a/lib/eunit/include/eunit.hrl +++ b/lib/eunit/include/eunit.hrl @@ -223,20 +223,18 @@ end). -define(debugHere, (?debugMsg("<-"))). -define(debugFmt(S, As), (?debugMsg(io_lib:format((S), (As))))). --define(debugVal(E), +-define(debugVal(E, D), begin ((fun (__V) -> - ?debugFmt(<<"~ts = ~tP">>, [(??E), __V, 15]), - __V - end)(E)) - end). --define(debugValAll(E), - begin - ((fun (__V) -> - ?debugFmt(<<"~ts = ~tp">>, [(??E), __V]), + ?debugFmt(<<"~ts = ~tP">>, + [(??E), __V, D]), __V end)(E)) end). +-ifndef(EUNIT_DEBUG_VAL_DEPTH). +-define(EUNIT_DEBUG_VAL_DEPTH, 15). +-endif. +-define(debugVal(E), ?debugVal(E, ?EUNIT_DEBUG_VAL_DEPTH)). -define(debugTime(S, E), begin ((fun () -> |