aboutsummaryrefslogtreecommitdiffstats
path: root/lib/tools
diff options
context:
space:
mode:
authorHenrik Nord <henrik@erlang.org>2011-04-01 15:11:41 +0200
committerHenrik Nord <henrik@erlang.org>2011-04-01 15:16:52 +0200
commit5d3c00624934c700c4fa13044e6de3bfe08d2d50 (patch)
tree65e3befbf94b8002b8c00f7b78cb4a16d2393e34 /lib/tools
parentefd032654990280daee58463b3208ef843008a2a (diff)
parent5e9d05198cd00f74b99f697eb022ae0b2f31f136 (diff)
downloadotp-5d3c00624934c700c4fa13044e6de3bfe08d2d50.tar.gz
otp-5d3c00624934c700c4fa13044e6de3bfe08d2d50.tar.bz2
otp-5d3c00624934c700c4fa13044e6de3bfe08d2d50.zip
Merge branch 'sb/make-files-like-erlc' into dev
* sb/make-files-like-erlc: Change make:files to behave more like erlc OTP-9179
Diffstat (limited to 'lib/tools')
-rw-r--r--lib/tools/src/make.erl15
1 files changed, 1 insertions, 14 deletions
diff --git a/lib/tools/src/make.erl b/lib/tools/src/make.erl
index 77c354651b..e78e2a43a4 100644
--- a/lib/tools/src/make.erl
+++ b/lib/tools/src/make.erl
@@ -222,12 +222,7 @@ recompilep(File, NoExec, Load, Opts) ->
recompilep1(File, NoExec, Load, Opts, ObjFile) ->
{ok, Erl} = file:read_file_info(lists:append(File, ".erl")),
{ok, Obj} = file:read_file_info(ObjFile),
- case {readable(Erl), writable(Obj)} of
- {true, true} ->
- recompilep1(Erl, Obj, File, NoExec, Load, Opts);
- _ ->
- error
- end.
+ recompilep1(Erl, Obj, File, NoExec, Load, Opts).
recompilep1(#file_info{mtime=Te},
#file_info{mtime=To}, File, NoExec, Load, Opts) when Te>To ->
@@ -277,14 +272,6 @@ exists(File) ->
false
end.
-readable(#file_info{access=read_write}) -> true;
-readable(#file_info{access=read}) -> true;
-readable(_) -> false.
-
-writable(#file_info{access=read_write}) -> true;
-writable(#file_info{access=write}) -> true;
-writable(_) -> false.
-
coerce_2_list(X) when is_atom(X) ->
atom_to_list(X);
coerce_2_list(X) ->