Mercurial > octave-nkf

diff src/variables.cc @ 2978:49de01238638

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1997-05-15 21:13:42 by jwe]
author jwe
date Thu, 15 May 1997 21:13:43 +0000
parents b9c107cbe388
children aa9d0c0e0458
line wrap: on
line diff
--- a/src/variables.cc	Thu May 15 20:46:34 1997 +0000
+++ b/src/variables.cc	Thu May 15 21:13:43 1997 +0000
@@ -1469,10 +1469,13 @@
 {
   static symbol_record *sr = global_sym_tab->lookup ("ans", true);
 
-  sr->define (val);
+  if (val.is_defined ())
+    {
+      sr->define (val);
 
-  if (print)
-    val.print_with_name (octave_stdout, "ans");
+      if (print)
+	val.print_with_name (octave_stdout, "ans");
+    }
 }
 
 void