diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2012-07-17 12:24:29 +0200 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2012-07-19 20:22:53 +0200 |
| commit | 5ba4cddd7192e190f5d6f615e600912ac3ed7720 (patch) | |
| tree | 364e59b94c23fe2bb3641f4eb5738ec9e59d859b /erts/preloaded/src/prim_file.erl | |
| parent | 0348e26ea7b6522f4a324bc5010c36b40adf0ed4 (diff) | |
| download | otp-5ba4cddd7192e190f5d6f615e600912ac3ed7720.tar.gz otp-5ba4cddd7192e190f5d6f615e600912ac3ed7720.tar.bz2 otp-5ba4cddd7192e190f5d6f615e600912ac3ed7720.zip | |
erts: Remove VxWorks from preloaded
Diffstat (limited to 'erts/preloaded/src/prim_file.erl')
| -rw-r--r-- | erts/preloaded/src/prim_file.erl | 20 |
1 files changed, 1 insertions, 19 deletions
diff --git a/erts/preloaded/src/prim_file.erl b/erts/preloaded/src/prim_file.erl index d66f0e09cc..401b5e8611 100644 --- a/erts/preloaded/src/prim_file.erl +++ b/erts/preloaded/src/prim_file.erl @@ -674,25 +674,7 @@ set_cwd(Dir) -> set_cwd(Port, Dir) when is_port(Port) -> set_cwd_int(Port, Dir). -set_cwd_int(Port, Dir0) -> - Dir = - (catch - case os:type() of - vxworks -> - %% chdir on vxworks doesn't support - %% relative paths - %% must call get_cwd from here and use - %% absname/2, since - %% absname/1 uses file:get_cwd ... - case get_cwd_int(Port, 0) of - {ok, AbsPath} -> - filename:absname(Dir0, AbsPath); - _Badcwd -> - Dir0 - end; - _Else -> - Dir0 - end), +set_cwd_int(Port, Dir) -> %% Dir is now either a string or an EXIT tuple. %% An EXIT tuple will fail in the following catch. drv_command(Port, [?FILE_CHDIR, pathname(Dir)]). |