diff options
| author | Hans Bolinder <[email protected]> | 2013-01-08 13:37:23 +0100 |
|---|---|---|
| committer | Hans Bolinder <[email protected]> | 2013-01-25 12:54:27 +0100 |
| commit | 788ddf07630d84085d2e6cfc803d432a4e8c8325 (patch) | |
| tree | 84011f22a57956b871cd06be21d66bf3447556b5 /lib/stdlib/src/io_lib_fread.erl | |
| parent | ec8343bec35fcb941712a22cc0b150c5d24be2df (diff) | |
| download | otp-788ddf07630d84085d2e6cfc803d432a4e8c8325.tar.gz otp-788ddf07630d84085d2e6cfc803d432a4e8c8325.tar.bz2 otp-788ddf07630d84085d2e6cfc803d432a4e8c8325.zip | |
[stdlib] Fix a contract bug
Also minor corrections of the docs of io(3)
Diffstat (limited to 'lib/stdlib/src/io_lib_fread.erl')
| -rw-r--r-- | lib/stdlib/src/io_lib_fread.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/stdlib/src/io_lib_fread.erl b/lib/stdlib/src/io_lib_fread.erl index 84d4b8bba0..92a34995b8 100644 --- a/lib/stdlib/src/io_lib_fread.erl +++ b/lib/stdlib/src/io_lib_fread.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1996-2011. All Rights Reserved. +%% Copyright Ericsson AB 1996-2013. 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 @@ -22,7 +22,7 @@ -export([fread/2,fread/3]). --import(lists, [reverse/1,reverse/2]). +-import(lists, [reverse/1]). -define(is_whitespace(C), ((C) =:= $\s orelse (C) =:= $\t @@ -43,7 +43,7 @@ | {'done', Result, LeftOverChars :: string()}, Result :: {'ok', InputList :: io_lib:chars()} | 'eof' - | {'error', What :: io_lib:fread_error()}. + | {'error', {'read', What :: io_lib:fread_error()}}. fread([], Chars, Format) -> %%io:format("FREAD: ~w `~s'~n", [Format,Chars]), |