diff options
| author | Patrik Nyblom <[email protected]> | 2010-06-02 15:33:59 +0200 |
|---|---|---|
| committer | Patrik Nyblom <[email protected]> | 2010-06-02 16:47:30 +0200 |
| commit | 750f53bfa7bfd6258504d2f7c441a103d885cce5 (patch) | |
| tree | 460e078193ab951f06e4d6688adb94084ecb2d52 | |
| parent | 1b8f86d8314389bf6033d23d3e6d707514ba7612 (diff) | |
| download | otp-750f53bfa7bfd6258504d2f7c441a103d885cce5.tar.gz otp-750f53bfa7bfd6258504d2f7c441a103d885cce5.tar.bz2 otp-750f53bfa7bfd6258504d2f7c441a103d885cce5.zip | |
Make port_command/3 auto-imported
| -rw-r--r-- | erts/emulator/test/busy_port_SUITE.erl | 5 | ||||
| -rw-r--r-- | lib/stdlib/src/erl_internal.erl | 1 |
2 files changed, 3 insertions, 3 deletions
diff --git a/erts/emulator/test/busy_port_SUITE.erl b/erts/emulator/test/busy_port_SUITE.erl index 9b16170293..a43c679798 100644 --- a/erts/emulator/test/busy_port_SUITE.erl +++ b/erts/emulator/test/busy_port_SUITE.erl @@ -182,7 +182,7 @@ system_monitor(Config) when is_list(Config) -> ?line Master ! {Owner, {command, "u"}}, ?line {Busy,beta} = rec(Void), ?line Void = rec(Void), - ?line NewMonitor = erlang:system_monitor(OldMonitor), + ?line _NewMonitor = erlang:system_monitor(OldMonitor), ?line OldMonitor = erlang:system_monitor(), ?line OldMonitor = erlang:system_monitor(OldMonitor), %% @@ -361,7 +361,6 @@ soft_busy_driver(Config) when is_list(Config) -> hs_test(Config, false). hs_test(Config, HardBusy) when is_list(Config) -> - ?line Me = self(), ?line DrvName = case HardBusy of true -> 'hard_busy_drv'; false -> 'soft_busy_drv' @@ -479,7 +478,7 @@ hs_busy_pcmd(Prt, Opts, StartFun, EndFun) -> Tester ! {self(), doing_port_command}, Start = os:timestamp(), Res = try {return, - erlang:port_command(Prt, [], Opts)} + port_command(Prt, [], Opts)} catch Exception:Error -> {Exception, Error} end, End = os:timestamp(), diff --git a/lib/stdlib/src/erl_internal.erl b/lib/stdlib/src/erl_internal.erl index ed7e011c54..bf6e5bc5ca 100644 --- a/lib/stdlib/src/erl_internal.erl +++ b/lib/stdlib/src/erl_internal.erl @@ -312,6 +312,7 @@ bif(open_port, 2) -> true; bif(pid_to_list, 1) -> true; bif(port_close, 1) -> true; bif(port_command, 2) -> true; +bif(port_command, 3) -> true; bif(port_connect, 2) -> true; bif(port_control, 3) -> true; bif(pre_loaded, 0) -> true; |