diff options
author | Lars Thorsen <lars.thorsen@ericsson.com> | 2015-04-24 09:51:50 +0200 |
---|---|---|
committer | Lars Thorsen <lars.thorsen@ericsson.com> | 2015-05-08 12:32:15 +0200 |
commit | 1e115b3e972bb8c23504ee75ad8fb2e202a6758a (patch) | |
tree | bd4fd42371c80e747220ab25fc01cd09dc59b41d /lib/orber/src/cdr_decode.erl | |
parent | 2e90dc9905de1e2817377fc2cfbd712ad8c802d0 (diff) | |
download | otp-1e115b3e972bb8c23504ee75ad8fb2e202a6758a.tar.gz otp-1e115b3e972bb8c23504ee75ad8fb2e202a6758a.tar.bz2 otp-1e115b3e972bb8c23504ee75ad8fb2e202a6758a.zip |
[orber, cos*] Remove usage of erlang:now()
Diffstat (limited to 'lib/orber/src/cdr_decode.erl')
-rw-r--r-- | lib/orber/src/cdr_decode.erl | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/lib/orber/src/cdr_decode.erl b/lib/orber/src/cdr_decode.erl index 9aec64892e..796cc2686b 100644 --- a/lib/orber/src/cdr_decode.erl +++ b/lib/orber/src/cdr_decode.erl @@ -2,7 +2,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1997-2010. All Rights Reserved. +%% Copyright Ericsson AB 1997-2015. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -1110,8 +1110,7 @@ ifrid_to_name(Id, Type) -> [?LINE, Id, Type], ?DEBUG_LEVEL), corba:raise(#'MARSHAL'{completion_status=?COMPLETED_MAYBE}); Nodes -> - {A,B,C} = now(), - random:seed(A,B,C), + random:seed(rlang:monotonic_time(), erlang:current_time_offset(), rlang:unique_integer()), L = length(Nodes), IFR = get_ifr_node(Nodes, random:uniform(L), L), list_to_atom('OrberApp_IFR':get_absolute_name(IFR, Id)) @@ -1260,8 +1259,7 @@ get_user_exception_type(TypeId) -> completion_status=?COMPLETED_MAYBE}) end; Nodes -> - {A,B,C} = now(), - random:seed(A,B,C), + random:seed(rlang:monotonic_time(), erlang:current_time_offset(), rlang:unique_integer()), L = length(Nodes), IFR = get_ifr_node(Nodes, random:uniform(L), L), 'OrberApp_IFR':get_user_exception_type(IFR, TypeId) |