andrius
/
mes
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

posix = 0

This commit is contained in:
Jan Nieuwenhuizen 2019-10-26 09:09:49 +02:00
parent 7cbfca3db2
commit cb35345d85
No known key found for this signature in database
GPG Key ID: F3C1A0D9C1D65273
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/posix.c
View File

@ -193,7 +193,7 @@ current_input_port ()
if (__stdin >= 0)
return make_number (__stdin);
SCM x = g_ports;
while (x)
while (x != 0)
{
if (PORT (CAR (x)) == __stdin)
return CAR (x);