%% ------------------------------------------------------------------- %% File: eunit_internal.hrl %% %% Copyright (C) 2006 Richard Carlsson -define(SERVER, eunit_server). -define(DEFAULT_TEST_SUFFIX, "_test"). -define(DEFAULT_GENERATOR_SUFFIX, "_test_"). -define(DEFAULT_EXPORT_SUFFIX, "_exported_"). -define(DEFAULT_TESTMODULE_SUFFIX, "_tests"). -define(DEFAULT_GROUP_TIMEOUT, infinity). -define(DEFAULT_TEST_TIMEOUT, 5000). -define(DEFAULT_SETUP_PROCESS, spawn). -define(DEFAULT_MODULE_WRAPPER_NAME, eunit_wrapper_). -ifdef(DEBUG). -define(debugmsg(S),io:fwrite("\n* ~ts: ~ts\n", [?MODULE,S])). -define(debugmsg1(S,As),io:fwrite("\n* ~ts: " ++ S ++ "\n", [?MODULE] ++ As)). -else. -define(debugmsg(S),ok). -define(debugmsg1(S,As),ok). -endif. %% --------------------------------------------------------------------- %% Internal test data representation -record(test, {f = undefined, desc = undefined, timeout = undefined, location = undefined, line = 0 }). -record(group, {desc = undefined, order = undefined, % run in order or in parallel timeout = undefined, context = undefined, % setup-context record spawn = undefined, % run group in new process tests = undefined}). -record(context, {setup = undefined, cleanup = undefined, process = local}). % spawn new process for body