Mercurial > octave-nkf

comparison src/ov-typeinfo.cc @ 4687:e95c86d48732

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-01-06 21:53:34 by jwe]
author jwe
date Tue, 06 Jan 2004 21:53:34 +0000
parents 2d237a76dbdd
children 35bfb4e0b96b
comparison
equal deleted inserted replaced
4686:c7ae43dfdea4 4687:e95c86d48732
146 { 146 {
147 return (instance_ok ()) 147 return (instance_ok ())
148 ? instance->do_register_widening_op (t, t_result, f) : false; 148 ? instance->do_register_widening_op (t, t_result, f) : false;
149 } 149 }
150 150
151 // XXX FIXME XXX -- we should also store all class names and provide a
152 // way to list them (calling class with nargin == 0?).
153
151 int 154 int
152 octave_value_typeinfo::do_register_type (const std::string& t_name, 155 octave_value_typeinfo::do_register_type (const std::string& t_name,
153 const std::string& c_name, 156 const std::string& c_name,
154 const octave_value& val) 157 const octave_value& val)
155 { 158 {
337 for (int i = 0; i < num_types; i++) 340 for (int i = 0; i < num_types; i++)
338 { 341 {
339 if (nm == types(i)) 342 if (nm == types(i))
340 { 343 {
341 retval = vals(i); 344 retval = vals(i);
345 retval.make_unique ();
342 break; 346 break;
343 } 347 }
344 } 348 }
345 349
346 return retval; 350 return retval;