Mercurial > hg > octave-nkf

comparison liboctave/data-conv.cc @ 4970:25c2664861bc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-09-08 05:02:32 by jwe]
author jwe
date Wed, 08 Sep 2004 05:02:32 +0000
parents 44046bbaa52c
children 4c8a2e4e0717
comparison
equal deleted inserted replaced
4969:52f808101130 4970:25c2664861bc
233 if (sizeof (float) == sizeof (double)) 233 if (sizeof (float) == sizeof (double))
234 retval = dt_double; 234 retval = dt_double;
235 else 235 else
236 retval = dt_single; 236 retval = dt_single;
237 } 237 }
238 else if (s == "logical")
239 retval = dt_logical;
238 else 240 else
239 (*current_liboctave_error_handler) ("invalid data type specified"); 241 (*current_liboctave_error_handler) ("invalid data type specified");
240 242
241 if (retval == dt_unknown) 243 if (retval == dt_unknown)
242 (*current_liboctave_error_handler) 244 (*current_liboctave_error_handler)
444 retval = "unsigned long long"; 446 retval = "unsigned long long";
445 break; 447 break;
446 448
447 case oct_data_conv::dt_float: 449 case oct_data_conv::dt_float:
448 retval = "float"; 450 retval = "float";
451 break;
452
453 case oct_data_conv::dt_logical:
454 retval = "logical";
449 break; 455 break;
450 456
451 case oct_data_conv::dt_unknown: 457 case oct_data_conv::dt_unknown:
452 default: 458 default:
453 retval = "unknown"; 459 retval = "unknown";