Mercurial > hg > octave-jordi

comparison liboctave/data-conv.cc @ 3238:041ea33fbbf4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1999-03-26 17:48:16 by jwe]
author jwe
date Fri, 26 Mar 1999 17:48:35 +0000
parents 0d640dc625c7
children fa7d8036d12a
comparison
equal deleted inserted replaced
3237:737b219ab65a 3238:041ea33fbbf4
93 retval = dt_long; 93 retval = dt_long;
94 else 94 else
95 (*current_liboctave_error_handler) 95 (*current_liboctave_error_handler)
96 ("unable to find matching native data type for %s", s.c_str ()); 96 ("unable to find matching native data type for %s", s.c_str ());
97 } 97 }
98 else if (s == "uint16")
99 {
100 if (sizeof (unsigned short) == 2)
101 retval = dt_ushort;
102 else if (sizeof (unsigned int) == 2)
103 retval = dt_uint;
104 else
105 (*current_liboctave_error_handler)
106 ("unable to find matching native data type for %s", s.c_str ());
107 }
108 else if (s == "uint32")
109 {
110 if (sizeof (unsigned int) == 4)
111 retval = dt_uint;
112 else if (sizeof (unsigned long) == 4)
113 retval = dt_ulong;
114 else
115 (*current_liboctave_error_handler)
116 ("unable to find matching native data type for %s", s.c_str ());
117 }
98 else 118 else
99 (*current_liboctave_error_handler) ("invalid data type specified"); 119 (*current_liboctave_error_handler) ("invalid data type specified");
100 120
101 return retval; 121 return retval;
102 } 122 }