comparison src/data.cc @ 1363:ed5757e3333b

[project @ 1995-09-05 23:26:59 by jwe]
author jwe
date Tue, 05 Sep 1995 23:26:59 +0000
parents 19c10b8657d5
children 6550c74777b9
comparison
equal deleted inserted replaced
1362:f9745982c987 1363:ed5757e3333b
753 if (nargin == 2) 753 if (nargin == 2)
754 { 754 {
755 retval = 0.0; 755 retval = 0.0;
756 if (args(0).is_map () && args(1).is_string ()) 756 if (args(0).is_map () && args(1).is_string ())
757 { 757 {
758 char *s = args(1).string_value (); 758 const char *s = args(1).string_value ();
759 tree_constant tmp = args(0).lookup_map_element (s, 0, 1); 759 tree_constant tmp = args(0).lookup_map_element (s, 0, 1);
760 retval = (double) tmp.is_defined (); 760 retval = (double) tmp.is_defined ();
761 } 761 }
762 } 762 }
763 else 763 else