Mercurial > octave-nkf
comparison liboctave/mach-info.cc @ 5015:6d481b6e349e
[project @ 2004-09-22 02:18:13 by jwe]
author | jwe |
---|---|
date | Wed, 22 Sep 2004 02:18:13 +0000 |
parents | c430e537efad |
children | 23b37da9fd5b |
comparison
equal
deleted
inserted
replaced
5014:fd5871c5f85b | 5015:6d481b6e349e |
---|---|
199 oct_mach_info::string_to_float_format (const std::string& s) | 199 oct_mach_info::string_to_float_format (const std::string& s) |
200 { | 200 { |
201 oct_mach_info::float_format retval = oct_mach_info::flt_fmt_unknown; | 201 oct_mach_info::float_format retval = oct_mach_info::flt_fmt_unknown; |
202 | 202 |
203 if (s == "native" || s == "n") | 203 if (s == "native" || s == "n") |
204 retval = oct_mach_info::flt_fmt_native; | 204 retval = oct_mach_info::native_float_format (); |
205 else if (s == "ieee-be" || s == "b") | 205 else if (s == "ieee-be" || s == "b") |
206 retval = oct_mach_info::flt_fmt_ieee_big_endian; | 206 retval = oct_mach_info::flt_fmt_ieee_big_endian; |
207 else if (s == "ieee-le" || s == "l") | 207 else if (s == "ieee-le" || s == "l") |
208 retval = oct_mach_info::flt_fmt_ieee_little_endian; | 208 retval = oct_mach_info::flt_fmt_ieee_little_endian; |
209 else if (s == "vaxd" || s == "d") | 209 else if (s == "vaxd" || s == "d") |
226 { | 226 { |
227 std::string retval = "unknown"; | 227 std::string retval = "unknown"; |
228 | 228 |
229 switch (flt_fmt) | 229 switch (flt_fmt) |
230 { | 230 { |
231 case flt_fmt_native: | |
232 retval = "native"; | |
233 break; | |
234 | |
235 case flt_fmt_ieee_big_endian: | 231 case flt_fmt_ieee_big_endian: |
236 retval = "ieee_big_endian"; | 232 retval = "ieee_big_endian"; |
237 break; | 233 break; |
238 | 234 |
239 case flt_fmt_ieee_little_endian: | 235 case flt_fmt_ieee_little_endian: |