summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPaul J. Davis <paul.joseph.davis@gmail.com>2017-07-14 11:27:06 -0500
committerPaul J. Davis <paul.joseph.davis@gmail.com>2017-07-14 11:27:06 -0500
commit7948db13c4e94a5163168c99b27aec0aa1e00074 (patch)
treeb5b4a45ce60d01329b05b19bcccf7460f62ff2d8
parenta866f6c873f73d1d67a2610fb8651c215c983c74 (diff)
downloadcouchdb-674-log-monitors-for-compaction-daemon-test.tar.gz
TMP: Add debug logging for failed assertion674-log-monitors-for-compaction-daemon-test
-rw-r--r--src/couch/test/couchdb_compaction_daemon_tests.erl7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/couch/test/couchdb_compaction_daemon_tests.erl b/src/couch/test/couchdb_compaction_daemon_tests.erl
index 908f1d330..856a53d05 100644
--- a/src/couch/test/couchdb_compaction_daemon_tests.erl
+++ b/src/couch/test/couchdb_compaction_daemon_tests.erl
@@ -293,6 +293,13 @@ is_idle(DbName) ->
{ok, Db} = couch_db:open_int(DbName, [?ADMIN_CTX]),
Monitors = couch_db:monitored_by(Db),
ok = couch_db:close(Db),
+ Others = [M || M <- Monitors, M /= self()],
+ if Others == [] -> ok; true ->
+ lists:foreach(fun(Other) ->
+ Args = [Other, process_info(Other)],
+ couch_log:error("XKCD: MONITORED BY ~p :: ~p", Args)
+ end, Others)
+ end,
not lists:any(fun(M) -> M /= self() end, Monitors).
with_config_change(_DbName, Fun) ->