Mercurial > octave

diff src/sysdep.cc @ 3234:be8e0ba13644
[project @ 1999-01-29 03:52:30 by jwe]
author: jwe
date: Fri, 29 Jan 1999 03:52:33 +0000
parents: 38684be52a3e
children: 68259f410026
--- a/src/sysdep.cc	Wed Jan 27 20:23:46 1999 +0000
+++ b/src/sysdep.cc	Fri Jan 29 03:52:33 1999 +0000
@@ -75,6 +75,7 @@
 #include "input.h"
 #include "oct-obj.h"
 #include "ov.h"
+#include "pager.h"
 #include "sysdep.h"
 #include "toplev.h"
 #include "utils.h"
@@ -414,7 +415,10 @@
 	  if (xisnan (dval))
 	    warning ("pause: NaN is an invalid delay");
 	  else if (xisinf (dval))
-	    kbhit ();
+	    {
+	      flush_octave_stdout ();
+	      kbhit ();
+	    }
 	  else
 	    {
 	      int delay = NINT (dval);
@@ -424,7 +428,10 @@
 	}
     }
   else
-    kbhit ();
+    {
+      flush_octave_stdout ();
+      kbhit ();
+    }
 
   return retval;
 }