# HG changeset patch
# User jwe
# Date 812689229 0
# Node ID c29439c3f3fab0107c91ea85ae7794e6d0284566
# Parent  a49a80c912db48893a1b0136bdbb69f5639be9de
[project @ 1995-10-03 02:57:35 by jwe]

diff --git a/src/variables.cc b/src/variables.cc
--- a/src/variables.cc
+++ b/src/variables.cc
@@ -890,13 +890,13 @@
 }
 
 // Look for the given name in the global symbol table.  If it refers
-// to a real scalar, place the value in d and return 0.  Otherwise,
-// return -1.
+// to a real scalar, place the value in d and return 1.  Otherwise,
+// return 0.
 
 int
 builtin_real_scalar_variable (const char *name, double& d)
 {
-  int status = -1;
+  int status = 0;
   symbol_record *sr = global_sym_tab->lookup (name, 0, 0);
 
   // It is a prorgramming error to look for builtins that aren't.
@@ -912,7 +912,7 @@
       if (! error_state && val.is_scalar_type ())
 	{
 	  d = val.double_value ();
-	  status = 0;
+	  status = 1;
 	}
     }
 
@@ -1673,13 +1673,13 @@
     "path to gnuplot binary");
 
 #ifdef GNUPLOT_HAS_MULTIPLOT
-  double gnuplot_has_multiplot = "true";
+  char *with_multiplot = "true";
 #else
-  double gnuplot_has_multiplot = "false";
+  char *with_multiplot = "false";
 #endif
 
   DEFVAR ("gnuplot_has_multiplot", SBV_gnuplot_has_multiplot,
-	  gnuplot_has_multiplot, 0, gnuplot_has_multiplot,
+	  with_multiplot, 0, gnuplot_has_multiplot,
     "true if gnuplot supports multiplot, false otherwise");
 
   DEFCONST ("i", SBV_i, Complex (0.0, 1.0), 1, 0,