comparison src/variables.cc @ 564:6e376eb337dd

[project @ 1994-07-26 00:56:24 by jwe]
author jwe
date Tue, 26 Jul 1994 00:56:24 +0000
parents 75a371805554
children 94fd73d1a0bc
comparison
equal deleted inserted replaced
563:6833834adca7 564:6e376eb337dd
435 435
436 DEFUN ("is_global", Fis_global, Sis_global, 2, 1, 436 DEFUN ("is_global", Fis_global, Sis_global, 2, 1,
437 "is_global (X): return 1 if the string X names a global variable\n\ 437 "is_global (X): return 1 if the string X names a global variable\n\
438 otherwise, return 0.") 438 otherwise, return 0.")
439 { 439 {
440 Octave_object retval (0.0); 440 Octave_object retval = 0.0;
441 441
442 int nargin = args.length (); 442 int nargin = args.length ();
443 443
444 if (nargin != 2 || ! args(1).is_string_type ()) 444 if (nargin != 2 || ! args(1).is_string_type ())
445 { 445 {