Mercurial > octave-nkf

diff src/oct-stream.h @ 11007:ffe58182db89

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/oct-stream.h (octave_base_stream::file_number): return 0, 1, and 2 for stdin, stdout, and stderr, -1 otherwise
author John W. Eaton <jwe@octave.org>
date Tue, 21 Sep 2010 03:51:02 -0400
parents 594adb99a25e
children fd0a3ac60b0e
line wrap: on
line diff
--- a/src/oct-stream.h	Tue Sep 21 03:35:46 2010 -0400
+++ b/src/oct-stream.h	Tue Sep 21 03:51:02 2010 -0400
@@ -383,7 +383,19 @@
         }
     }
 
-  virtual int file_number (void) const { return -1; }
+  virtual int file_number (void) const
+  {
+    // Kluge alert!
+
+    if (name () == "stdin")
+      return 0;
+    else if (name () == "stdout")
+      return 1;
+    else if (name () == "stderr")
+      return 2;
+    else
+      return -1;
+  }
 
   bool ok (void) const { return ! fail; }