Mercurial > octave-nkf
comparison liboctave/lo-ieee.cc @ 9591:264fb5520973
abort if floating point format is not recognized as IEEE
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Mon, 31 Aug 2009 19:29:48 -0400 |
parents | 160c564d5d25 |
children | 5828d64ca004 |
comparison
equal
deleted
inserted
replaced
9590:b18a50c56144 | 9591:264fb5520973 |
---|---|
155 break; | 155 break; |
156 | 156 |
157 case oct_mach_info::flt_fmt_cray: | 157 case oct_mach_info::flt_fmt_cray: |
158 case oct_mach_info::flt_fmt_vax_d: | 158 case oct_mach_info::flt_fmt_vax_d: |
159 case oct_mach_info::flt_fmt_vax_g: | 159 case oct_mach_info::flt_fmt_vax_g: |
160 break; | |
161 | |
162 default: | 160 default: |
163 // If the format is unknown, then you will probably not have a | 161 // If the format is unknown, then you will probably not have a |
164 // useful system, but we will just issue a warning and go on... | 162 // useful system, but we will just issue a warning and go on... |
165 (*current_liboctave_warning_handler) | 163 (*current_liboctave_error_handler) |
166 ("lo_ieee_init: unrecognized floating point format!"); | 164 ("lo_ieee_init: floating point format is not IEEE! Maybe DLAMCH is miscompiled, or you are using some strange system without IEEE floating point math?"); |
165 abort (); | |
167 } | 166 } |
168 } | 167 } |
169 | 168 |
170 /* | 169 /* |
171 ;;; Local Variables: *** | 170 ;;; Local Variables: *** |