diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-09-16 08:12:48 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-09-16 08:12:48 (GMT) |
| commit | 95cf33f6e21f0c86c39afead3d80dc11f9906ce2 (patch) | |
| tree | b28a3a30c684e4377f39e18d3b4689891cab876b /tests/binary.test | |
| parent | 54394200f4d991ccb32e922bb7353702761be5c1 (diff) | |
| parent | 329d21be60a1bdc13412ea27da64c5e267038a3c (diff) | |
| download | tcl-95cf33f6e21f0c86c39afead3d80dc11f9906ce2.zip tcl-95cf33f6e21f0c86c39afead3d80dc11f9906ce2.tar.gz tcl-95cf33f6e21f0c86c39afead3d80dc11f9906ce2.tar.bz2 | |
merge trunk to feature branch
Diffstat (limited to 'tests/binary.test')
| -rw-r--r-- | tests/binary.test | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/tests/binary.test b/tests/binary.test index 8b2880b..6c00508 100644 --- a/tests/binary.test +++ b/tests/binary.test @@ -2381,6 +2381,23 @@ test binary-63.4 {NaN} ieeeFloatingPoint { format 0x%016lx [expr {$w & 0xfff3ffffffffffff}] } 0x7ff3123456789abc +# Make sure TclParseNumber() rejects invalid nan-hex formats [Bug 3402540] +test binary-63.5 {NaN} -constraints ieeeFloatingPoint -body { + binary format q Nan( +} -returnCodes error -match glob -result {expected floating-point number*} +test binary-63.6 {NaN} -constraints ieeeFloatingPoint -body { + binary format q Nan() +} -returnCodes error -match glob -result {expected floating-point number*} +test binary-63.7 {NaN} -constraints ieeeFloatingPoint -body { + binary format q Nan(g) +} -returnCodes error -match glob -result {expected floating-point number*} +test binary-63.8 {NaN} -constraints ieeeFloatingPoint -body { + binary format q Nan(1,2) +} -returnCodes error -match glob -result {expected floating-point number*} +test binary-63.9 {NaN} -constraints ieeeFloatingPoint -body { + binary format q Nan(1234567890abcd) +} -returnCodes error -match glob -result {expected floating-point number*} + test binary-64.1 {NaN} -constraints ieeeFloatingPoint -body { binary scan [binary format w 0x7ff8000000000000] q d set d |
