diff options
| author | Sverker Eriksson <[email protected]> | 2019-02-20 16:06:03 +0100 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2019-02-20 16:06:03 +0100 |
| commit | 1937c8e3f7860ff3dfbeb6d25dd434fcd3102ba8 (patch) | |
| tree | 22b78ac4084d91a1baa661e54e654dc285a3a9ed /erts/emulator/test/nif_SUITE.erl | |
| parent | 9197f6ea9af095eebbbf42e4ceca5ef762467276 (diff) | |
| download | otp-1937c8e3f7860ff3dfbeb6d25dd434fcd3102ba8.tar.gz otp-1937c8e3f7860ff3dfbeb6d25dd434fcd3102ba8.tar.bz2 otp-1937c8e3f7860ff3dfbeb6d25dd434fcd3102ba8.zip | |
erts: Add enif_compare_pids
as a macro wrappper around enif_compare
Diffstat (limited to 'erts/emulator/test/nif_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/nif_SUITE.erl | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/erts/emulator/test/nif_SUITE.erl b/erts/emulator/test/nif_SUITE.erl index c2d368bb72..4a0ad9c1d5 100644 --- a/erts/emulator/test/nif_SUITE.erl +++ b/erts/emulator/test/nif_SUITE.erl @@ -3381,11 +3381,18 @@ pid(Config) -> undefined = make_pid_nif(UndefPid), 0 = send_term(UndefPid, message), + Other = spawn(fun() -> ok end), + {true,OtherNifPid} = get_local_pid_nif(Other), + Cmp = compare_pids_nif(ErlNifPid, OtherNifPid), + true = if Cmp < 0 -> Self < Other; + Cmp > 0 -> Self > Other + end, + 0 = compare_pids_nif(ErlNifPid, ErlNifPid), + {false, _} = get_local_pid_nif(undefined), ok. - id(I) -> I. %% The NIFs: @@ -3498,6 +3505,7 @@ get_local_pid_nif(_) -> ?nif_stub. make_pid_nif(_) -> ?nif_stub. set_pid_undefined_nif() -> ?nif_stub. is_pid_undefined_nif(_) -> ?nif_stub. +compare_pids_nif(_, _) -> ?nif_stub. nif_stub_error(Line) -> exit({nif_not_loaded,module,?MODULE,line,Line}). |