diff options
author | Niclas Axelsson <[email protected]> | 2011-03-11 12:06:29 +0100 |
---|---|---|
committer | Niclas Axelsson <[email protected]> | 2011-03-11 12:09:56 +0100 |
commit | cdc5de779b4d1007a961d8f99c9280c460142777 (patch) | |
tree | 6daeaf9840a08e4e1130c59c989975e54a305c67 /lib/kernel/src/disk_log_1.erl | |
parent | c114083eeae4b98f30a6b2091e6839aee7573ddc (diff) | |
parent | 1dbdec773861869b8b3b0c8bb5ccb92bf6cc84c5 (diff) | |
download | otp-cdc5de779b4d1007a961d8f99c9280c460142777.tar.gz otp-cdc5de779b4d1007a961d8f99c9280c460142777.tar.bz2 otp-cdc5de779b4d1007a961d8f99c9280c460142777.zip |
Merge branch 'ks/kernel-dialyzer-cleanups' into dev
* ks/kernel-dialyzer-cleanups:
Add spec for function that does not return
Strenghen spec
Introduce types to avoid duplication in specs
Add specs for functions that do not return
Add specs for behaviour callbacks
Simplify two specs
OTP-9127
Diffstat (limited to 'lib/kernel/src/disk_log_1.erl')
-rw-r--r-- | lib/kernel/src/disk_log_1.erl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/kernel/src/disk_log_1.erl b/lib/kernel/src/disk_log_1.erl index 8ccdb88d12..266df84a03 100644 --- a/lib/kernel/src/disk_log_1.erl +++ b/lib/kernel/src/disk_log_1.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1997-2010. All Rights Reserved. +%% Copyright Ericsson AB 1997-2011. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -581,11 +581,13 @@ done_scan(In, Out, OutName, FName, RecoveredTerms, BadChars) -> file:delete(OutName), throw(Error) end. - + +-spec repair_err(file:io_device(), #cache{}, file:filename(), + file:filename(), {'error', file:posix()}) -> no_return(). repair_err(In, Out, OutName, ErrFileName, Error) -> file:close(In), catch fclose(Out, OutName), - % OutName is often the culprit, try to remove it anyway... + %% OutName is often the culprit, try to remove it anyway... file:delete(OutName), file_error(ErrFileName, Error). |