From a12ad74643bdb143b0811a65db9a7bbd8a7697de Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= <bjorn@erlang.org>
Date: Wed, 6 Feb 2013 15:00:27 +0100
Subject: compile: Eliminate warnings for unmatched return values

---
 lib/compiler/src/compile.erl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib/compiler')

diff --git a/lib/compiler/src/compile.erl b/lib/compiler/src/compile.erl
index d2baf51edd..497af2b52c 100644
--- a/lib/compiler/src/compile.erl
+++ b/lib/compiler/src/compile.erl
@@ -683,7 +683,7 @@ binary_passes() ->
 
 %% Remove the target file so we don't have an old one if the compilation fail.
 remove_file(St) ->
-    file:delete(St#compile.ofile),
+    _ = file:delete(St#compile.ofile),
     {ok,St}.
 
 -record(asm_module, {module,
@@ -1092,7 +1092,7 @@ makedep_output(#compile{code=Code,options=Opts,ofile=Ofile}=St) ->
 		io:fwrite(Output1, "~ts", [Code]),
 		%% Close the file if relevant.
 		if
-		    CloseOutput -> file:close(Output1);
+		    CloseOutput -> ok = file:close(Output1);
 		    true -> ok
 		end,
 		{ok,St}
@@ -1231,7 +1231,7 @@ encrypt(des3_cbc=Mode, {K1,K2,K3, IVec}, Bin0) ->
 
 random_bytes(N) ->
     {A,B,C} = now(),
-    random:seed(A, B, C),
+    _ = random:seed(A, B, C),
     random_bytes_1(N, []).
 
 random_bytes_1(0, Acc) -> Acc;
-- 
cgit v1.2.3