diff src/variables.cc @ 610:14b2a186a5c0

[project @ 1994-08-14 00:55:49 by jwe]
author jwe
date Sun, 14 Aug 1994 01:01:32 +0000
parents 4f65175911a6
children aecbe369233b
line wrap: on
line diff
--- a/src/variables.cc	Sun Aug 14 00:28:54 1994 +0000
+++ b/src/variables.cc	Sun Aug 14 01:01:32 1994 +0000
@@ -133,7 +133,7 @@
 {
   tree_fvc *ans = 0;
 
-  if (! arg.is_string_type ())
+  if (! arg.is_string ())
     {
       if (warn)
 	error ("%s: expecting function name as argument", warn_for);
@@ -186,7 +186,7 @@
 
   int nargin = args.length ();
 
-  if (nargin != 2 || ! args(1).is_string_type ())
+  if (nargin != 2 || ! args(1).is_string ())
     {
       print_usage ("is_global");
       return retval;
@@ -211,7 +211,7 @@
 
   int nargin = args.length ();
 
-  if (nargin != 2 || ! args(1).is_string_type ())
+  if (nargin != 2 || ! args(1).is_string ())
     {
       print_usage ("exist");
       return retval;
@@ -675,7 +675,7 @@
     {
       tree_constant val = defn->eval (0);
 
-      if (! error_state && val.is_string_type ())
+      if (! error_state && val.is_string ())
 	{
 	  char *s = val.string_value ();
 	  if (s)