aboutsummaryrefslogtreecommitdiffstats
path: root/lib/percept
diff options
context:
space:
mode:
authorRickard Green <[email protected]>2016-08-24 15:57:53 +0200
committerRickard Green <[email protected]>2016-08-25 17:37:44 +0200
commit5e57b3faccba1ae66ebd40fed23f5770eee71b04 (patch)
treeb7eb1632247fa179bd852177f4c02980d5571a6a /lib/percept
parentfc85e401ee279cc3b69635a71ffa93544ce5b99d (diff)
downloadotp-5e57b3faccba1ae66ebd40fed23f5770eee71b04.tar.gz
otp-5e57b3faccba1ae66ebd40fed23f5770eee71b04.tar.bz2
otp-5e57b3faccba1ae66ebd40fed23f5770eee71b04.zip
Replace usage of deprecated time units
Diffstat (limited to 'lib/percept')
-rw-r--r--lib/percept/src/percept.app.src2
-rw-r--r--lib/percept/src/percept.erl4
-rw-r--r--lib/percept/test/percept_SUITE.erl8
3 files changed, 7 insertions, 7 deletions
diff --git a/lib/percept/src/percept.app.src b/lib/percept/src/percept.app.src
index 1749730f97..ab0d9a4d90 100644
--- a/lib/percept/src/percept.app.src
+++ b/lib/percept/src/percept.app.src
@@ -38,7 +38,7 @@
{applications, [kernel,stdlib]},
{env,[]},
{runtime_dependencies, ["stdlib-2.0","runtime_tools-1.8.14","kernel-3.0",
- "inets-5.10","erts-6.0"]}
+ "inets-5.10","erts-9.0"]}
]}.
diff --git a/lib/percept/src/percept.erl b/lib/percept/src/percept.erl
index 046e0b7518..25c6ae19b1 100644
--- a/lib/percept/src/percept.erl
+++ b/lib/percept/src/percept.erl
@@ -217,7 +217,7 @@ stop_webserver(Port) ->
parse_and_insert(Filename, DB) ->
io:format("Parsing: ~p ~n", [Filename]),
- T0 = erlang:monotonic_time(milli_seconds),
+ T0 = erlang:monotonic_time(millisecond),
Pid = dbg:trace_client(file, Filename, mk_trace_parser(self())),
Ref = erlang:monitor(process, Pid),
parse_and_insert_loop(Filename, Pid, Ref, DB, T0).
@@ -230,7 +230,7 @@ parse_and_insert_loop(Filename, Pid, Ref, DB, T0) ->
{parse_complete, {Pid, Count}} ->
receive {'DOWN', Ref, process, Pid, normal} -> ok after 0 -> ok end,
DB ! {action, consolidate},
- T1 = erlang:monotonic_time(milli_seconds),
+ T1 = erlang:monotonic_time(millisecond),
io:format("Parsed ~w entries in ~w ms.~n", [Count, T1 - T0]),
io:format(" ~p created processes.~n", [length(percept_db:select({information, procs}))]),
io:format(" ~p opened ports.~n", [length(percept_db:select({information, ports}))]),
diff --git a/lib/percept/test/percept_SUITE.erl b/lib/percept/test/percept_SUITE.erl
index fbc77302ae..2be8b70e0d 100644
--- a/lib/percept/test/percept_SUITE.erl
+++ b/lib/percept/test/percept_SUITE.erl
@@ -79,9 +79,9 @@ analyze(Config) when is_list(Config) ->
Begin = processes(),
Path = proplists:get_value(data_dir, Config),
File = filename:join([Path,"profile_test.dat"]),
- T0 = erlang:monotonic_time(milli_seconds),
+ T0 = erlang:monotonic_time(millisecond),
ok = percept:analyze(File),
- T1 = erlang:monotonic_time(milli_seconds),
+ T1 = erlang:monotonic_time(millisecond),
io:format("percept:analyze/1 took ~w ms.~n", [T1 - T0]),
{stopped, _} = percept_db:stop(),
print_remainers(remainers(Begin, processes())),
@@ -92,9 +92,9 @@ analyze_dist(Config) when is_list(Config) ->
Begin = processes(),
Path = proplists:get_value(data_dir, Config),
File = filename:join([Path,"ipc-dist.dat"]),
- T0 = erlang:monotonic_time(milli_seconds),
+ T0 = erlang:monotonic_time(millisecond),
ok = percept:analyze(File),
- T1 = erlang:monotonic_time(milli_seconds),
+ T1 = erlang:monotonic_time(millisecond),
io:format("percept:analyze/1 took ~w ms.~n", [T1 - T0]),
{stopped, _} = percept_db:stop(),
print_remainers(remainers(Begin, processes())),