| # Reported 93/05/09 by Jim Wilson: IEEE single-precision FLT_MIN value gets |
| # assembled incorrectly. (Off by one ulp.) |
| |
| proc dotest {} { |
| set testname "IEEE FLT_MIN, single-precision" |
| set x 0 |
| gas_start "x930509a.s" "-al" |
| while 1 { |
| expect { |
| -re " 00008000\[ \]+.single" { pass $testname; set x 1 } |
| -re " 00800000\[ \]+.single" { pass $testname; set x 1 } |
| -re " 0080 0000\[ \]+.single" { pass $testname; set x 1 } |
| -re " ........ +.single" { fail $testname; set x 1 } |
| -re "\[^\n\]*\n" { } |
| timeout { perror "timeout\n"; break } |
| eof { break } |
| } |
| } |
| gas_finish |
| if !$x then { fail "$testname (listing didn't match)" } |
| } |
| |
| if ![istarget vax*-*-*] then { |
| dotest |
| } |