Mercurial > hg > octave-nkf

diff src/syscalls.cc @ 2086:bfb775fb6fe8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-04-25 05:55:19 by jwe]
author jwe
date Thu, 25 Apr 1996 05:55:19 +0000
parents 452f63bfa60c
children 1300df4a33d6
line wrap: on
line diff
--- a/src/syscalls.cc
+++ b/src/syscalls.cc
@@ -312,7 +312,7 @@
   Like stat (NAME), but if NAME refers to a symbolic link, returns\n\
   information about the link itself, not the file that it points to.")
 {
-  tree_constant retval = -1.0;
+  octave_value retval = -1.0;
 
   if (args.length () == 1)
     {
@@ -323,7 +323,7 @@
 	  file_stat fs (fname, false);
 
 	  if (fs)
-	    retval = tree_constant (mk_stat_map (fs));
+	    retval = octave_value (mk_stat_map (fs));
 	}
     }
   else
@@ -374,7 +374,7 @@
 DEFUN (pipe, args, ,
   "[file_ids, status] = pipe (): create an interprocess channel")
 {
-  Octave_object retval (2, tree_constant (-1.0));
+  octave_value_list retval (2, octave_value (-1.0));
 
 #if defined (HAVE_PIPE)
   int nargin = args.length ();
@@ -434,7 +434,7 @@
 \n\
   If the file does not exist, -1 is returned.")
 {
-  tree_constant retval = -1.0;
+  octave_value retval = -1.0;
 
   if (args.length () == 1)
     {
@@ -445,7 +445,7 @@
 	  file_stat fs (fname);
 
 	  if (fs)
-	    retval = tree_constant (mk_stat_map (fs));
+	    retval = octave_value (mk_stat_map (fs));
 	}
     }
   else