Mercurial > hg > octave-lyh

diff src/syscalls.cc @ 6545:7cf7e248cb71

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-04-19 16:53:15 by jwe]
author jwe
date Thu, 19 Apr 2007 16:53:15 +0000
parents aa2837cae002
children 49724abe1236
line wrap: on
line diff
--- a/src/syscalls.cc
+++ b/src/syscalls.cc
@@ -363,6 +363,7 @@
 %!  done = false;
 %!  str = {};
 %!  idx = 0;
+%!  errs = 0;
 %!  do
 %!     if (!isunix())
 %!       errno (0);
@@ -374,10 +375,13 @@
 %!     elseif (errno () == EAGAIN)
 %!       fclear (out);
 %!       sleep (0.1);
+%!       if (++errs == 100)
+%!         done = true;
+%!       endif
 %!     else
 %!       done = true;
 %!     endif
-%!   until (done)
+%!  until (done)
 %!  fclose (out);
 %!  if (isunix())
 %!    assert(str,{"these\n","strings\n","some\n","are\n"})