github.com/mikpe.pdp10-tools
1
0
Fork 0
mirror of https://github.com/mikpe/pdp10-tools.git synced 2026-01-23 19:08:00 +00:00
Code Issues Projects Releases Wiki Activity

pdp10_stdio.erl: correct return value in fopen failure case

Browse Source
This commit is contained in:
Mikael Pettersson 2019-07-03 17:22:42 +02:00
parent 512f2e452d
commit cc709a7e1c
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
erlang/apps/lib/src/pdp10_stdio.erl
View File

@ -166,7 +166,9 @@ do_init({ok, {IoDev, Read, Write}}) ->
, write = Write
, iodir = seek
}};
do_init({error, _Reason} = Error) -> Error.
do_init({error, Reason}) ->
%% FIXME: this still seems to generate crash reports
{stop, Reason}.
handle_call(Req, _From, State) ->
case Req of