diff options
| author | Björn Gustavsson <[email protected]> | 2012-05-11 15:57:50 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2012-06-28 11:29:47 +0200 |
| commit | 00d769bf3d35df706dbbb9155052183db3631475 (patch) | |
| tree | 55ab277fe23474eb084307fbe8b86de6d3b7f31d /erts/emulator/test/trace_local_SUITE.erl | |
| parent | bf5bf8b93dccca86c4775b21ee0db49eb6a3b133 (diff) | |
| download | otp-00d769bf3d35df706dbbb9155052183db3631475.tar.gz otp-00d769bf3d35df706dbbb9155052183db3631475.tar.bz2 otp-00d769bf3d35df706dbbb9155052183db3631475.zip | |
Strengthen trace test cases
Diffstat (limited to 'erts/emulator/test/trace_local_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/trace_local_SUITE.erl | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/erts/emulator/test/trace_local_SUITE.erl b/erts/emulator/test/trace_local_SUITE.erl index 556cf94f57..b238d5c630 100644 --- a/erts/emulator/test/trace_local_SUITE.erl +++ b/erts/emulator/test/trace_local_SUITE.erl @@ -90,7 +90,15 @@ end_per_testcase(_Case, Config) -> shutdown(), Dog=?config(watchdog, Config), test_server:timetrap_cancel(Dog), - ok. + + %% Reloading the module will clear all trace patterns, and + %% in a debug-compiled emulator run assertions of the counters + %% for the number of functions with breakpoints. + + c:l(?MODULE). + + + suite() -> [{ct_hooks,[ts_install_cth]}]. all() -> @@ -352,7 +360,8 @@ same(A, B) -> basic_test() -> ?line setup([call]), - ?line erlang:trace_pattern({?MODULE,'_','_'},[],[local]), + NumMatches = erlang:trace_pattern({?MODULE,'_','_'},[],[local]), + NumMatches = erlang:trace_pattern({?MODULE,'_','_'},[],[local]), ?line erlang:trace_pattern({?MODULE,slave,'_'},false,[local]), ?line [1,1,1,1] = apply_slave(?MODULE,exported_wrap,[1]), ?line ?CT(?MODULE,exported_wrap,[1]), |