From 9c024d9d3bfcd6cee7c0a39492f7e1fd4f80192d Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Thu, 28 Jan 2021 10:38:44 +0000
Subject: Use "in" operator in stead of "lsearch -exact" when possible

---
 library/opt/optparse.tcl    | 2 +-
 library/tcltest/tcltest.tcl | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/library/opt/optparse.tcl b/library/opt/optparse.tcl
index 1639379..454b923 100644
--- a/library/opt/optparse.tcl
+++ b/library/opt/optparse.tcl
@@ -601,7 +601,7 @@ proc ::tcl::OptCheckType {arg type {typeArgs ""}} {
 	    return [expr {$arg ? 1 : 0}]
         }
         choice {
-            if {[lsearch -exact $typeArgs $arg] < 0} {
+            if {$arg ni $typeArgs} {
                 error "invalid choice"
             }
 	    return $arg
diff --git a/library/tcltest/tcltest.tcl b/library/tcltest/tcltest.tcl
index 7dc75d7..dedcd7a 100644
--- a/library/tcltest/tcltest.tcl
+++ b/library/tcltest/tcltest.tcl
@@ -642,7 +642,7 @@ namespace eval tcltest {
 
     proc IsVerbose {level} {
 	variable Option
-	return [expr {[lsearch -exact $Option(-verbose) $level] >= 0}]
+	return [expr {$level in $Option(-verbose)}]
     }
 
     # Default verbosity is to show bodies of failed tests
-- 
cgit v0.12


From 8d49123e73e1b0bbbf97cd212e88960772a9e166 Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Thu, 28 Jan 2021 10:42:05 +0000
Subject: Use {} braces in more "expr" expressions.

---
 tests/exec.test               |    2 +-
 tests/expr-old.test           |    8 +-
 tests/expr.test               |   18 +-
 tests/fileSystem.test         |    6 +-
 tests/fileSystemEncoding.test |    2 +-
 tests/foreach.test            |    2 +-
 tests/format.test             |   12 +-
 tests/httpold.test            |    4 +-
 tests/info.test               |    2 +-
 tests/io.test                 |   36 +-
 tests/lmap.test               |    8 +-
 tests/parse.test              |   18 +-
 tests/parseOld.test           |    4 +-
 tests/string.test             |   14 +-
 tests/util.test               | 1300 ++++++++++++++++++++---------------------
 15 files changed, 718 insertions(+), 718 deletions(-)

diff --git a/tests/exec.test b/tests/exec.test
index af7aae5..0f5db76 100644
--- a/tests/exec.test
+++ b/tests/exec.test
@@ -111,7 +111,7 @@ set path(sh2) [makeFile {
     exit
 } sh2]
 set path(sleep) [makeFile {
-    after [expr $argv*1000]
+    after [expr {$argv*1000}]
     exit
 } sleep]
 set path(exit) [makeFile {
diff --git a/tests/expr-old.test b/tests/expr-old.test
index 28ec346..6f85748 100644
--- a/tests/expr-old.test
+++ b/tests/expr-old.test
@@ -420,13 +420,13 @@ test expr-old-21.3 {parenthesization} {expr +(3-4)} -1
 
 # Embedded commands and variable names.
 
-set a 16 
-test expr-old-22.1 {embedded variables} {expr {2*$a}} 32 
+set a 16
+test expr-old-22.1 {embedded variables} {expr {2*$a}} 32
 test expr-old-22.2 {embedded variables} {
     set x -5
     set y 10
     expr {$x + $y}
-} {5} 
+} {5}
 test expr-old-22.3 {embedded variables} {
     set x "  -5"
     set y "  +10"
@@ -1120,7 +1120,7 @@ test expr-old-37.25 {Tcl_ExprDouble and NaN} \
     {ieeeFloatingPoint testexprdouble} {
 	list [catch {testexprdouble 0.0/0.0} result] $result
     } {1 {domain error: argument not in valid range}}
-    
+
 test expr-old-38.1 {Verify Tcl_ExprString's basic operation} -constraints {testexprstring} -body {
     list [testexprstring "1+4"] [testexprstring "2*3+4.2"] \
 	    [catch {testexprstring "1+"} msg] $msg
diff --git a/tests/expr.test b/tests/expr.test
index 37d8fe3..b81c4a7 100644
--- a/tests/expr.test
+++ b/tests/expr.test
@@ -19,7 +19,7 @@ if {"::tcltest" ni [namespace children]} {
 catch [list package require -exact Tcltest [info patchlevel]]
 
 testConstraint testmathfunctions [expr {
-    ([catch {expr T1()} msg] != 1) || ($msg ne {invalid command name "tcl::mathfunc::T1"})
+    ([catch {expr {T1()}} msg] != 1) || ($msg ne {invalid command name "tcl::mathfunc::T1"})
 }]
 
 # Determine if "long int" type is a 32 bit number and if the wide
@@ -1438,7 +1438,7 @@ test expr-23.74.3 {INST_EXPON: Bug 2798543} {
     expr {(-14)**17 == (-14)**65553}
 } 0
 
-	
+
 # Some compilers get this wrong; ensure that we work around it correctly
 test expr-24.1 {expr edge cases; shifting} {expr int(5)>>32} 0
 test expr-24.2 {expr edge cases; shifting} {expr int(5)>>63} 0
@@ -5786,7 +5786,7 @@ test expr-32.1 {expr mod basics} {
     0 1 0 3 3 \
     0 -1 0 -1 -2 \
     ]
-        
+
 test expr-32.2 {expr div basics} {
     set mod_nums [list \
         {-3 1} {-3 2} {-3 3} {-3 4} {-3 5} \
@@ -6794,7 +6794,7 @@ test expr-39.16 {Tcl_ExprLongObj handles overflows} \
 	list [catch {testexprlongobj 4294967296.} result] $result
     } \
     -result {1 {integer value too large to represent*}}
-    
+
 test expr-39.17 {Check that Tcl_ExprDoubleObj doesn't modify interpreter result if no error} testexprdoubleobj {
     testexprdoubleobj 4.+1.
 } {This is a result: 5.0}
@@ -6881,19 +6881,19 @@ test expr-41.13 {exponent overflow} {
 } 0.0
 test expr-41.14 {exponent overflow} {
     expr 100e-2147483651
-} 0.0 
+} 0.0
 test expr-41.15 {exponent overflow} {
     expr 1.0e-2147483648
-} 0.0 
+} 0.0
 test expr-41.16 {exponent overflow} {
     expr 1.0e-2147483649
-} 0.0 
+} 0.0
 test expr-41.17 {exponent overflow} {
     expr 1.23e-2147483646
 } 0.0
 test expr-41.18 {exponent overflow} {
     expr 1.23e-2147483647
-} 0.0 
+} 0.0
 
 test expr-41.19 {numSigDigs == 0} {
     expr 0e309
@@ -7269,7 +7269,7 @@ test expr-52.1 {
 	list [expr {$a eq {}}] [expr {$a < {}}] [expr {$a > {}}] [
 		string match {*no string representation*} [
 		::tcl::unsupported::representation $a]]
-} {0 0 1 1} 
+} {0 0 1 1}
 
 
 
diff --git a/tests/fileSystem.test b/tests/fileSystem.test
index 8af4f53..f363d86 100644
--- a/tests/fileSystem.test
+++ b/tests/fileSystem.test
@@ -153,7 +153,7 @@ test filesystem-1.10 {link normalisation: double link} -constraints {
 	[file normalize [file join dir2.link inside.file foo]]
 } -cleanup {
     file delete dir2.link
-} -result ok 
+} -result ok
 makeDirectory dir2.file
 test filesystem-1.11 {link normalisation: double link, back in tree} {unix hasLinks} {
     file link dir2.link dir.link
@@ -168,7 +168,7 @@ test filesystem-1.12 {file new native path} {} {
 	}
     }
     # If we reach here we've succeeded. We used to crash above.
-    expr 1
+    expr {1}
 } {1}
 test filesystem-1.13 {file normalisation} {win} {
     # This used to be broken
@@ -913,7 +913,7 @@ test filesystem-9.5 {path objects and file tail and object rep} -setup {
     }
     return $res
 } -cleanup {
-    file delete -force dgp 
+    file delete -force dgp
     cd $origdir
 } -result {test test}
 test filesystem-9.6 {path objects and file tail and object rep} win {
diff --git a/tests/fileSystemEncoding.test b/tests/fileSystemEncoding.test
index 40a0090..6561bef 100644
--- a/tests/fileSystemEncoding.test
+++ b/tests/fileSystemEncoding.test
@@ -42,7 +42,7 @@ namespace eval ::tcl::test::fileSystemEncoding {
 	set globbed [lindex [glob -directory $dir *] 0]
 	encoding system utf-8
 	set res [file exists $globbed]
-	encoding system iso8859-1 
+	encoding system iso8859-1
 	lappend res [file exists $globbed]
 	return $res
     } -cleanup {
diff --git a/tests/foreach.test b/tests/foreach.test
index cdbfc85..bb06b80 100644
--- a/tests/foreach.test
+++ b/tests/foreach.test
@@ -165,7 +165,7 @@ test foreach-4.1 {noncompiled foreach and shared variable or value list objects
     catch {unset x}
     foreach {12.0} {a b c} {
         set x 12.0
-        set x [expr $x + 1]
+        set x [expr {$x + 1}]
     }
     set x
 } 13.0
diff --git a/tests/format.test b/tests/format.test
index 11cb4b7..20006ef 100644
--- a/tests/format.test
+++ b/tests/format.test
@@ -460,7 +460,7 @@ test format-13.1 {tcl_precision fuzzy comparison} {
     set a 0.0000000000001
     set b 0.00000000000001
     set c 0.00000000000000001
-    set d [expr $a + $b + $c]
+    set d [expr {$a + $b + $c}]
     format {%0.10f %0.12f %0.15f %0.17f} $d $d $d $d
 } {0.0000000000 0.000000000000 0.000000000000110 0.00000000000011001}
 test format-13.2 {tcl_precision fuzzy comparison} {
@@ -471,7 +471,7 @@ test format-13.2 {tcl_precision fuzzy comparison} {
     set a 0.000000000001
     set b 0.000000000000005
     set c 0.0000000000000008
-    set d [expr $a + $b + $c]
+    set d [expr {$a + $b + $c}]
     format {%0.10f %0.12f %0.15f %0.17f} $d $d $d $d
 } {0.0000000000 0.000000000001 0.000000000001006 0.00000000000100580}
 test format-13.3 {tcl_precision fuzzy comparison} {
@@ -480,7 +480,7 @@ test format-13.3 {tcl_precision fuzzy comparison} {
     catch {unset c}
     set a 0.00000000000099
     set b 0.000000000000011
-    set c [expr $a + $b]
+    set c [expr {$a + $b}]
     format {%0.10f %0.12f %0.15f %0.17f} $c $c $c $c
 } {0.0000000000 0.000000000001 0.000000000001001 0.00000000000100100}
 test format-13.4 {tcl_precision fuzzy comparison} {
@@ -489,7 +489,7 @@ test format-13.4 {tcl_precision fuzzy comparison} {
     catch {unset c}
     set a 0.444444444444
     set b 0.33333333333333
-    set c [expr $a + $b]
+    set c [expr {$a + $b}]
     format {%0.10f %0.12f %0.15f %0.16f} $c $c $c $c
 } {0.7777777778 0.777777777777 0.777777777777330 0.7777777777773300}
 test format-13.5 {tcl_precision fuzzy comparison} {
@@ -498,7 +498,7 @@ test format-13.5 {tcl_precision fuzzy comparison} {
     catch {unset c}
     set a 0.444444444444
     set b 0.99999999999999
-    set c [expr $a + $b]
+    set c [expr {$a + $b}]
     format {%0.10f %0.12f %0.15f} $c $c $c
 } {1.4444444444 1.444444444444 1.444444444443990}
 
@@ -534,7 +534,7 @@ for {set i 0} {$i < 290} {incr i} {
     append b $a
 }
 for {set i 290} {$i < 400} {incr i} {
-    test format-16.[expr $i -289] {testing MAX_FLOAT_SIZE} {
+    test format-16.[expr {$i -289}] {testing MAX_FLOAT_SIZE} {
         format {%s} $b
     } $b
     append b "x"
diff --git a/tests/httpold.test b/tests/httpold.test
index e5d974c..67ab119 100644
--- a/tests/httpold.test
+++ b/tests/httpold.test
@@ -167,7 +167,7 @@ test httpold-4.1 {httpEvent} {
     set token [http_get $url]
     upvar #0 $token data
     array set meta $data(meta)
-    expr ($data(totalsize) == $meta(Content-Length))
+    expr {$data(totalsize) == $meta(Content-Length)}
 } 1
 
 test httpold-4.2 {httpEvent} {
@@ -204,7 +204,7 @@ test httpold-4.5 {httpEvent} {
     close $out
     upvar #0 $token data
     removeFile $testfile
-    expr $data(currentsize) == $data(totalsize)
+    expr {$data(currentsize) == $data(totalsize)}
 } 1
 
 test httpold-4.6 {httpEvent} {
diff --git a/tests/info.test b/tests/info.test
index fb9e0de..69be6a3 100644
--- a/tests/info.test
+++ b/tests/info.test
@@ -657,7 +657,7 @@ test info-19.6 {info vars: Bug 1072654} -setup {
 
 set functions {abs acos asin atan atan2 bool ceil cos cosh double entier exp floor fmod hypot int isqrt log log10 max min pow rand round sin sinh sqrt srand tan tanh wide}
 # Check whether the extra testing functions are defined...
-if {!([catch {expr T1()} msg] && ($msg eq {invalid command name "tcl::mathfunc::T1"}))} {
+if {!([catch {expr {T1()}} msg] && ($msg eq {invalid command name "tcl::mathfunc::T1"}))} {
     set functions "T1 T2 T3 $functions"  ;# A lazy way of prepending!
 }
 test info-20.1 {info functions option} {info functions sin} sin
diff --git a/tests/io.test b/tests/io.test
index 8bf3303..a86527b 100644
--- a/tests/io.test
+++ b/tests/io.test
@@ -1943,11 +1943,11 @@ test io-17.1 {GetChannelTable, DeleteChannelTable on std handles} {testchannel}
     eof stdin
     interp create x
     set l ""
-    lappend l [expr [testchannel refcount stdin] - $l1]
+    lappend l [expr {[testchannel refcount stdin] - $l1}]
     x eval {eof stdin}
-    lappend l [expr [testchannel refcount stdin] - $l1]
+    lappend l [expr {[testchannel refcount stdin] - $l1}]
     interp delete x
-    lappend l [expr [testchannel refcount stdin] - $l1]
+    lappend l [expr {[testchannel refcount stdin] - $l1}]
     set l
 } {0 1 0}
 test io-17.2 {GetChannelTable, DeleteChannelTable on std handles} {testchannel} {
@@ -1955,11 +1955,11 @@ test io-17.2 {GetChannelTable, DeleteChannelTable on std handles} {testchannel}
     eof stdin
     interp create x
     set l ""
-    lappend l [expr [testchannel refcount stdout] - $l1]
+    lappend l [expr {[testchannel refcount stdout] - $l1}]
     x eval {eof stdout}
-    lappend l [expr [testchannel refcount stdout] - $l1]
+    lappend l [expr {[testchannel refcount stdout] - $l1}]
     interp delete x
-    lappend l [expr [testchannel refcount stdout] - $l1]
+    lappend l [expr {[testchannel refcount stdout] - $l1}]
     set l
 } {0 1 0}
 test io-17.3 {GetChannelTable, DeleteChannelTable on std handles} {testchannel} {
@@ -1967,11 +1967,11 @@ test io-17.3 {GetChannelTable, DeleteChannelTable on std handles} {testchannel}
     eof stdin
     interp create x
     set l ""
-    lappend l [expr [testchannel refcount stderr] - $l1]
+    lappend l [expr {[testchannel refcount stderr] - $l1}]
     x eval {eof stderr}
-    lappend l [expr [testchannel refcount stderr] - $l1]
+    lappend l [expr {[testchannel refcount stderr] - $l1}]
     interp delete x
-    lappend l [expr [testchannel refcount stderr] - $l1]
+    lappend l [expr {[testchannel refcount stderr] - $l1}]
     set l
 } {0 1 0}
 
@@ -2161,7 +2161,7 @@ test io-26.1 {Tcl_GetChannelInstanceData} stdio {
     # Don't care what pid is (but must be a number), just want to exercise it.
 
     set f [open "|[list [interpreter] << exit]"]
-    expr [pid $f]
+    expr {[pid $f]}
     close $f
 } {}
 
@@ -3162,7 +3162,7 @@ test io-30.13 {Tcl_Write crlf on block boundary, Tcl_Read auto} {
     set c [read $f]
     close $f
     string length $c
-} [expr 700*15+1]
+} [expr {700*15+1}]
 test io-30.14 {Tcl_Write crlf on block boundary, Tcl_Read crlf} {
     file delete $path(test1)
     set f [open $path(test1) w]
@@ -3178,7 +3178,7 @@ test io-30.14 {Tcl_Write crlf on block boundary, Tcl_Read crlf} {
     set c [read $f]
     close $f
     string length $c
-} [expr 700*15+1]
+} [expr {700*15+1}]
 test io-30.15 {Tcl_Write mixed, Tcl_Read auto} {
     file delete $path(test1)
     set f [open $path(test1) w]
@@ -3996,7 +3996,7 @@ test io-31.31 {Tcl_Write crlf on block boundary, Tcl_Gets crlf} {
     }
     close $f
     string length $c
-} [expr 700*15+1]
+} [expr {700*15+1}]
 test io-31.32 {Tcl_Write crlf on block boundary, Tcl_Gets auto} {
     file delete $path(test1)
     set f [open $path(test1) w]
@@ -4015,7 +4015,7 @@ test io-31.32 {Tcl_Write crlf on block boundary, Tcl_Gets auto} {
     }
     close $f
     string length $c
-} [expr 700*15+1]
+} [expr {700*15+1}]
 
 # Test Tcl_Read and buffering.
 
@@ -5641,7 +5641,7 @@ test io-40.2 {POSIX open access modes: CREAT} {unix} {
     file delete $path(test3)
     set f [open $path(test3) {WRONLY CREAT} 0o600]
     file stat $path(test3) stats
-    set x [format "0o%o" [expr $stats(mode)&0o777]]
+    set x [format "0o%o" [expr {$stats(mode)&0o777}]]
     puts $f "line 1"
     close $f
     set f [open $path(test3) r]
@@ -5655,7 +5655,7 @@ test io-40.3 {POSIX open access modes: CREAT} {unix umask} {
     set f [open $path(test3) {WRONLY CREAT}]
     close $f
     file stat $path(test3) stats
-    format "0o%03o" [expr $stats(mode)&0o777]
+    format "0o%03o" [expr {$stats(mode)&0o777}]
 } [format "0o%03o" [expr {0o666 & ~ $umaskValue}]]
 test io-40.4 {POSIX open access modes: CREAT} {
     file delete $path(test3)
@@ -7093,7 +7093,7 @@ test io-52.6 {TclCopyChannel} {fcopy} {
     set f2 [open $path(test1) w]
     fconfigure $f1 -translation lf -blocking 0
     fconfigure $f2 -translation lf -blocking 0
-    set s0 [fcopy $f1 $f2 -size [expr [file size $thisScript] + 5]]
+    set s0 [fcopy $f1 $f2 -size [expr {[file size $thisScript] + 5}]]
     set result [list [fconfigure $f1 -blocking] [fconfigure $f2 -blocking]]
     close $f1
     close $f2
@@ -7589,7 +7589,7 @@ test io-53.7 {CopyData: Flooding fcopy from pipe} {stdio fcopy} {
     catch {close $in}
     close $out
     # -1=error 0=script error N=number of bytes
-    expr ($fcopyTestDone == 0) ? $fcopyTestCount : -1
+    expr {($fcopyTestDone == 0) ? $fcopyTestCount : -1}
 } {3450}
 test io-53.8 {CopyData: async callback and error handling, Bug 1932639} -setup {
     # copy progress callback. errors out intentionally
diff --git a/tests/lmap.test b/tests/lmap.test
index 432e195..d986ee2 100644
--- a/tests/lmap.test
+++ b/tests/lmap.test
@@ -220,10 +220,10 @@ test lmap-4.14 {lmap errors} -returnCodes error -body {
 } -result {list element in braces followed by "3" instead of space}
 unset -nocomplain a
 test lmap-4.15 {lmap errors} {
-    apply {{} { 
+    apply {{} {
 	set a(0) 44
-	list [catch {lmap a {1 2 3} {}} msg o] $msg $::errorInfo 
-    }} 
+	list [catch {lmap a {1 2 3} {}} msg o] $msg $::errorInfo
+    }}
 } {1 {can't set "a": variable is array} {can't set "a": variable is array
     while executing
 "lmap a {1 2 3} {}"}}
@@ -357,7 +357,7 @@ test lmap-7.2 {noncompiled lmap and shared variable or value list objects that a
 } -body {
     lmap {12.0} {a b c} {
         set x 12.0
-        set x [expr $x + 1]
+        set x [expr {$x + 1}]
     }
 } -result {13.0 13.0 13.0}
 # Test for incorrect "double evaluation" semantics
diff --git a/tests/parse.test b/tests/parse.test
index 4370acb..39f3d1e 100644
--- a/tests/parse.test
+++ b/tests/parse.test
@@ -278,7 +278,7 @@ test parse-6.9 {ParseTokens procedure, error in command substitution} {
 } {0}
 test parse-6.10 {ParseTokens procedure, incomplete sub-command} {
     info complete {puts [
-	expr 1+1
+	expr {1+1}
 	#this is a comment ]}
 } {0}
 test parse-6.11 {ParseTokens procedure, memory allocation for big nested command} testparser {
@@ -485,7 +485,7 @@ test parse-10.3 {Tcl_EvalTokens, nested commands} testevalex {
 } {8}
 test parse-10.4 {Tcl_EvalTokens, nested commands} testevalex {
     unset -nocomplain a
-    list [catch {testevalex {concat xxx[expr $a]}} msg] $msg
+    list [catch {testevalex {concat xxx[expr {$a}]}} msg] $msg
 } {1 {can't read "a": no such variable}}
 test parse-10.5 {Tcl_EvalTokens, simple variables} testevalex {
     set a hello
@@ -518,7 +518,7 @@ test parse-10.11 {Tcl_EvalTokens, object values} testevalex {
     testevalex {concat $a$a$a}
 } {123123123}
 test parse-10.12 {Tcl_EvalTokens, object values} testevalex {
-    testevalex {concat [expr 2][expr 4][expr 6]}
+    testevalex {concat [expr {2}][expr {4}][expr {6}]}
 } {246}
 test parse-10.13 {Tcl_EvalTokens, string values} testevalex {
     testevalex {concat {a" b"}}
@@ -984,26 +984,26 @@ test parse-18.14 {Tcl_SubstObj, exception handling} {
     subst {abc,[break],def}
 } {abc,}
 test parse-18.15 {Tcl_SubstObj, exception handling} {
-    subst {abc,[continue; expr 1+2],def}
+    subst {abc,[continue; expr {1+2}],def}
 } {abc,,def}
 test parse-18.16 {Tcl_SubstObj, exception handling} {
-    subst {abc,[return foo; expr 1+2],def}
+    subst {abc,[return foo; expr {1+2}],def}
 } {abc,foo,def}
 test parse-18.17 {Tcl_SubstObj, exception handling} {
-    subst {abc,[return -code 10 foo; expr 1+2],def}
+    subst {abc,[return -code 10 foo; expr {1+2}],def}
 } {abc,foo,def}
 test parse-18.18 {Tcl_SubstObj, exception handling} {
     subst {abc,[break; set {} {}{}],def}
 } {abc,}
 test parse-18.19 {Tcl_SubstObj, exception handling} {
-    list [catch {subst {abc,[continue; expr 1+2; set {} {}{}],def}} msg] $msg
+    list [catch {subst {abc,[continue; expr {1+2}; set {} {}{}],def}} msg] $msg
 } [list 1 "extra characters after close-brace"]
 test parse-18.20 {Tcl_SubstObj, exception handling} {
-    list [catch {subst {abc,[return foo; expr 1+2; set {} {}{}],def}} msg] $msg
+    list [catch {subst {abc,[return foo; expr {1+2}; set {} {}{}],def}} msg] $msg
 } [list 1 "extra characters after close-brace"]
 test parse-18.21 {Tcl_SubstObj, exception handling} {
     list [catch {
-	subst {abc,[return -code 10 foo; expr 1+2; set {} {}{}],def}
+	subst {abc,[return -code 10 foo; expr {1+2}; set {} {}{}],def}
     } msg] $msg
 } [list 1 "extra characters after close-brace"]
 
diff --git a/tests/parseOld.test b/tests/parseOld.test
index c2d7c23..0ac036b 100644
--- a/tests/parseOld.test
+++ b/tests/parseOld.test
@@ -455,14 +455,14 @@ test parseOld-12.4 {comments} {
 
 test parseOld-13.1 {comments at the end of a bracketed script} {
     set x "[
-expr 1+1
+expr {1+1}
 # skip this!
 ]"
 } {2}
 
 test parseOld-15.1 {TclScriptEnd procedure} {
     info complete {puts [
-	expr 1+1
+	expr {1+1}
 	#this is a comment ]}
 } {0}
 test parseOld-15.2 {TclScriptEnd procedure} {
diff --git a/tests/string.test b/tests/string.test
index 46eb6fd..b1f9dc3 100644
--- a/tests/string.test
+++ b/tests/string.test
@@ -414,7 +414,7 @@ test string-6.27 {string is double, true} {
     string is double 1
 } 1
 test string-6.28 {string is double, true} {
-    string is double [expr double(1)]
+    string is double [expr {double(1)}]
 } 1
 test string-6.29 {string is double, true} {
     string is double 1.0
@@ -489,7 +489,7 @@ test string-6.48 {string is integer, true} {
     string is integer +1234567890
 } 1
 test string-6.49 {string is integer, true on type} {
-    string is integer [expr int(50.0)]
+    string is integer [expr {int(50.0)}]
 } 1
 test string-6.50 {string is integer, true} {
     string is integer [list -10]
@@ -510,7 +510,7 @@ test string-6.55 {string is integer, false on overflow} {
     list [string is integer -fail var +[largest_int]0] $var
 } {0 -1}
 test string-6.56 {string is integer, false} {
-    list [string is integer -fail var [expr double(1)]] $var
+    list [string is integer -fail var [expr {double(1)}]] $var
 } {0 1}
 test string-6.57 {string is integer, false} {
     list [string is integer -fail var "    "] $var
@@ -659,7 +659,7 @@ test string-6.95 {string is wideinteger, true} {
     string is wideinteger +1234567890
 } 1
 test string-6.96 {string is wideinteger, true on type} {
-    string is wideinteger [expr wide(50.0)]
+    string is wideinteger [expr {wide(50.0)}]
 } 1
 test string-6.97 {string is wideinteger, true} {
     string is wideinteger [list -10]
@@ -680,7 +680,7 @@ test string-6.102 {string is wideinteger, false on overflow} {
     list [string is wideinteger -fail var +[largest_int]0] $var
 } {0 -1}
 test string-6.103 {string is wideinteger, false} {
-    list [string is wideinteger -fail var [expr double(1)]] $var
+    list [string is wideinteger -fail var [expr {double(1)}]] $var
 } {0 1}
 test string-6.104 {string is wideinteger, false} {
     list [string is wideinteger -fail var "    "] $var
@@ -715,7 +715,7 @@ test string-6.110 {string is entier, true} {
     string is entier +1234567890
 } 1
 test string-6.111 {string is entier, true on type} {
-    string is entier [expr wide(50.0)]
+    string is entier [expr {wide(50.0)}]
 } 1
 test string-6.112 {string is entier, true} {
     string is entier [list -10]
@@ -736,7 +736,7 @@ test string-6.117 {string is entier, false} {
     list [string is entier -fail var 123123123123123123123123123123123123123123123123123123123123123123123123123123123123abc] $var
 } {0 84}
 test string-6.118 {string is entier, false} {
-    list [string is entier -fail var [expr double(1)]] $var
+    list [string is entier -fail var [expr {double(1)}]] $var
 } {0 1}
 test string-6.119 {string is entier, false} {
     list [string is entier -fail var "    "] $var
diff --git a/tests/util.test b/tests/util.test
index c8a081b..052e7d3 100644
--- a/tests/util.test
+++ b/tests/util.test
@@ -101,7 +101,7 @@ proc verdonk_test {sig binexp shouldbe exp} {
     regexp {([-+]?)([0-9a-f]+)} $sig -> signum sig
     scan $sig %llx sig
     if {$signum eq {-}} {
-	set signum [expr 1<<63]
+	set signum [expr {1<<63}]
     } else {
 	set signum 0
     }
@@ -392,7 +392,7 @@ test util-6.1 {Tcl_PrintDouble - using tcl_precision} -setup {
     set old_precision $::tcl_precision
     set ::tcl_precision 12
 } -body {
-    concat x[expr 1.4]
+    concat x[expr {1.4}]
 } -cleanup {
     set ::tcl_precision $old_precision
 } -result {x1.4}
@@ -400,7 +400,7 @@ test util-6.2 {Tcl_PrintDouble - using tcl_precision} -setup {
     set old_precision $::tcl_precision
     set ::tcl_precision 12
 } -body {
-    concat x[expr 1.39999999999]
+    concat x[expr {1.39999999999}]
 } -cleanup {
     set ::tcl_precision $old_precision
 } -result {x1.39999999999}
@@ -408,7 +408,7 @@ test util-6.3 {Tcl_PrintDouble - using tcl_precision} -setup {
     set old_precision $::tcl_precision
     set ::tcl_precision 12
 } -body {
-    concat x[expr 1.399999999999]
+    concat x[expr {1.399999999999}]
 } -cleanup {
     set ::tcl_precision $old_precision
 } -result {x1.4}
@@ -416,15 +416,15 @@ test util-6.4 {Tcl_PrintDouble - using tcl_precision} -setup {
     set old_precision $::tcl_precision
     set ::tcl_precision 5
 } -body {
-    concat x[expr 1.123412341234]
+    concat x[expr {1.123412341234}]
 } -cleanup {
     set tcl_precision $old_precision
 } -result {x1.1234}
 test util-6.5 {Tcl_PrintDouble - make sure there's a decimal point} {
-    concat x[expr 2.0]
+    concat x[expr {2.0}]
 } {x2.0}
 test util-6.6 {Tcl_PrintDouble - make sure there's a decimal point} {
-    concat x[expr 3.0e98]
+    concat x[expr {3.0e98}]
 } {x3e+98}
 
 test util-7.1 {TclPrecTraceProc - unset callbacks} -setup {
@@ -1122,73 +1122,73 @@ test util-10.122 {Tcl_PrintDouble - rounding} {ieeeFloatingPoint} {
 } {5.20831059055e+36}
 
 test util-11.1 {Tcl_PrintDouble - scaling} {
-    expr 1.1e-5
+    expr {1.1e-5}
 } {1.1e-5}
 test util-11.2 {Tcl_PrintDouble - scaling} {
-    expr 1.1e-4
+    expr {1.1e-4}
 } {0.00011}
 test util-11.3 {Tcl_PrintDouble - scaling} {
-    expr 1.1e-3
+    expr {1.1e-3}
 } {0.0011}
 test util-11.4 {Tcl_PrintDouble - scaling} {
-    expr 1.1e-2
+    expr {1.1e-2}
 } {0.011}
 test util-11.5 {Tcl_PrintDouble - scaling} {
-    expr 1.1e-1
+    expr {1.1e-1}
 } {0.11}
 test util-11.6 {Tcl_PrintDouble - scaling} {
-    expr 1.1e0
+    expr {1.1e0}
 } {1.1}
 test util-11.7 {Tcl_PrintDouble - scaling} {
-    expr 1.1e1
+    expr {1.1e1}
 } {11.0}
 test util-11.8 {Tcl_PrintDouble - scaling} {
-    expr 1.1e2
+    expr {1.1e2}
 } {110.0}
 test util-11.9 {Tcl_PrintDouble - scaling} {
-    expr 1.1e3
+    expr {1.1e3}
 } {1100.0}
 test util-11.10 {Tcl_PrintDouble - scaling} {
-    expr 1.1e4
+    expr {1.1e4}
 } {11000.0}
 test util-11.11 {Tcl_PrintDouble - scaling} {
-    expr 1.1e5
+    expr {1.1e5}
 } {110000.0}
 test util-11.12 {Tcl_PrintDouble - scaling} {
-    expr 1.1e6
+    expr {1.1e6}
 } {1100000.0}
 test util-11.13 {Tcl_PrintDouble - scaling} {
-    expr 1.1e7
+    expr {1.1e7}
 } {11000000.0}
 test util-11.14 {Tcl_PrintDouble - scaling} {
-    expr 1.1e8
+    expr {1.1e8}
 } {110000000.0}
 test util-11.15 {Tcl_PrintDouble - scaling} {
-    expr 1.1e9
+    expr {1.1e9}
 } {1100000000.0}
 test util-11.16 {Tcl_PrintDouble - scaling} {
-    expr 1.1e10
+    expr {1.1e10}
 } {11000000000.0}
 test util-11.17 {Tcl_PrintDouble - scaling} {
-    expr 1.1e11
+    expr {1.1e11}
 } {110000000000.0}
 test util-11.18 {Tcl_PrintDouble - scaling} {
-    expr 1.1e12
+    expr {1.1e12}
 } {1100000000000.0}
 test util-11.19 {Tcl_PrintDouble - scaling} {
-    expr 1.1e13
+    expr {1.1e13}
 } {11000000000000.0}
 test util-11.20 {Tcl_PrintDouble - scaling} {
-    expr 1.1e14
+    expr {1.1e14}
 } {110000000000000.0}
 test util-11.21 {Tcl_PrintDouble - scaling} {
-    expr 1.1e15
+    expr {1.1e15}
 } {1100000000000000.0}
 test util-11.22 {Tcl_PrintDouble - scaling} {
-    expr 1.1e16
+    expr {1.1e16}
 } {11000000000000000.0}
 test util-11.23 {Tcl_PrintDouble - scaling} {
-    expr 1.1e17
+    expr {1.1e17}
 } {1.1e+17}
 
 test util-12.1 {TclDoubleDigits - Inf} {testdoubledigits ieeeFloatingPoint} {
@@ -2166,1869 +2166,1869 @@ set saved_precision $::tcl_precision
 foreach ::tcl_precision {0 12} {
     for {set e -312} {$e < -9} {incr e} {
 	test util-16.1.$::tcl_precision.$e {shortening of numbers} \
-	    "expr 1.1e$e" 1.1e$e
+	    "expr {1.1e$e}" 1.1e$e
     }
 }
 set tcl_precision 0
 for {set e -9} {$e < -4} {incr e} {
     test util-16.1.$::tcl_precision.$e {shortening of numbers} \
-	"expr 1.1e$e" 1.1e$e
+	"expr {1.1e$e}" 1.1e$e
 }
 set tcl_precision 12
 for {set e -9} {$e < -4} {incr e} {
     test util-16.1.$::tcl_precision.$e {8.4 compatible formatting of doubles} \
-	"expr 1.1e$e" 1.1e[format %+03d $e]
+	"expr {1.1e$e}" 1.1e[format %+03d $e]
 }
 foreach ::tcl_precision {0 12} {
     test util-16.1.$::tcl_precision.-4 {shortening of numbers} \
-	{expr 1.1e-4} \
+	{expr {1.1e-4}} \
 	0.00011
     test util-16.1.$::tcl_precision.-3 {shortening of numbers} \
-	{expr 1.1e-3} \
+	{expr {1.1e-3}} \
 	0.0011
     test util-16.1.$::tcl_precision.-2 {shortening of numbers} \
-	{expr 1.1e-2} \
+	{expr {1.1e-2}} \
 	0.011
     test util-16.1.$::tcl_precision.-1 {shortening of numbers} \
-	{expr 1.1e-1} \
+	{expr {1.1e-1}} \
 	0.11
     test util-16.1.$::tcl_precision.0 {shortening of numbers} \
-	{expr 1.1} \
+	{expr {1.1}} \
 	1.1
     for {set e 1} {$e < 17} {incr e} {
 	test util-16.1.$::tcl_precision.$e {shortening of numbers} \
-	    "expr 11[string repeat 0 [expr {$e-1}]].0" \
+	    "expr {11[string repeat 0 [expr {$e-1}]].0}" \
 	    11[string repeat 0 [expr {$e-1}]].0
     }
     for {set e 17} {$e < 309} {incr e} {
 	test util-16.1.$::tcl_precision.$e {shortening of numbers} \
-	    "expr 1.1e$e" 1.1e+$e
+	    "expr {1.1e$e}" 1.1e+$e
     }
 }
 set tcl_precision 17
 test util-16.1.17.-300 {8.4 compatible formatting of doubles} \
-    {expr 1e-300} \
+    {expr {1e-300}} \
     1e-300
 test util-16.1.17.-299 {8.4 compatible formatting of doubles} \
-    {expr 1e-299} \
+    {expr {1e-299}} \
     9.9999999999999999e-300
 test util-16.1.17.-298 {8.4 compatible formatting of doubles} \
-    {expr 1e-298} \
+    {expr {1e-298}} \
     9.9999999999999991e-299
 test util-16.1.17.-297 {8.4 compatible formatting of doubles} \
-    {expr 1e-297} \
+    {expr {1e-297}} \
     1e-297
 test util-16.1.17.-296 {8.4 compatible formatting of doubles} \
-    {expr 1e-296} \
+    {expr {1e-296}} \
     1e-296
 test util-16.1.17.-295 {8.4 compatible formatting of doubles} \
-    {expr 1e-295} \
+    {expr {1e-295}} \
     1.0000000000000001e-295
 test util-16.1.17.-294 {8.4 compatible formatting of doubles} \
-    {expr 1e-294} \
+    {expr {1e-294}} \
     1e-294
 test util-16.1.17.-293 {8.4 compatible formatting of doubles} \
-    {expr 1e-293} \
+    {expr {1e-293}} \
     1.0000000000000001e-293
 test util-16.1.17.-292 {8.4 compatible formatting of doubles} \
-    {expr 1e-292} \
+    {expr {1e-292}} \
     1.0000000000000001e-292
 test util-16.1.17.-291 {8.4 compatible formatting of doubles} \
-    {expr 1e-291} \
+    {expr {1e-291}} \
     9.9999999999999996e-292
 test util-16.1.17.-290 {8.4 compatible formatting of doubles} \
-    {expr 1e-290} \
+    {expr {1e-290}} \
     1.0000000000000001e-290
 test util-16.1.17.-289 {8.4 compatible formatting of doubles} \
-    {expr 1e-289} \
+    {expr {1e-289}} \
     1e-289
 test util-16.1.17.-288 {8.4 compatible formatting of doubles} \
-    {expr 1e-288} \
+    {expr {1e-288}} \
     1.0000000000000001e-288
 test util-16.1.17.-287 {8.4 compatible formatting of doubles} \
-    {expr 1e-287} \
+    {expr {1e-287}} \
     1e-287
 test util-16.1.17.-286 {8.4 compatible formatting of doubles} \
-    {expr 1e-286} \
+    {expr {1e-286}} \
     1.0000000000000001e-286
 test util-16.1.17.-285 {8.4 compatible formatting of doubles} \
-    {expr 1e-285} \
+    {expr {1e-285}} \
     1.0000000000000001e-285
 test util-16.1.17.-284 {8.4 compatible formatting of doubles} \
-    {expr 1e-284} \
+    {expr {1e-284}} \
     1e-284
 test util-16.1.17.-283 {8.4 compatible formatting of doubles} \
-    {expr 1e-283} \
+    {expr {1e-283}} \
     9.9999999999999995e-284
 test util-16.1.17.-282 {8.4 compatible formatting of doubles} \
-    {expr 1e-282} \
+    {expr {1e-282}} \
     1e-282
 test util-16.1.17.-281 {8.4 compatible formatting of doubles} \
-    {expr 1e-281} \
+    {expr {1e-281}} \
     1e-281
 test util-16.1.17.-280 {8.4 compatible formatting of doubles} \
-    {expr 1e-280} \
+    {expr {1e-280}} \
     9.9999999999999996e-281
 test util-16.1.17.-279 {8.4 compatible formatting of doubles} \
-    {expr 1e-279} \
+    {expr {1e-279}} \
     1.0000000000000001e-279
 test util-16.1.17.-278 {8.4 compatible formatting of doubles} \
-    {expr 1e-278} \
+    {expr {1e-278}} \
     9.9999999999999994e-279
 test util-16.1.17.-277 {8.4 compatible formatting of doubles} \
-    {expr 1e-277} \
+    {expr {1e-277}} \
     9.9999999999999997e-278
 test util-16.1.17.-276 {8.4 compatible formatting of doubles} \
-    {expr 1e-276} \
+    {expr {1e-276}} \
     1.0000000000000001e-276
 test util-16.1.17.-275 {8.4 compatible formatting of doubles} \
-    {expr 1e-275} \
+    {expr {1e-275}} \
     9.9999999999999993e-276
 test util-16.1.17.-274 {8.4 compatible formatting of doubles} \
-    {expr 1e-274} \
+    {expr {1e-274}} \
     9.9999999999999997e-275
 test util-16.1.17.-273 {8.4 compatible formatting of doubles} \
-    {expr 1e-273} \
+    {expr {1e-273}} \
     1.0000000000000001e-273
 test util-16.1.17.-272 {8.4 compatible formatting of doubles} \
-    {expr 1e-272} \
+    {expr {1e-272}} \
     9.9999999999999993e-273
 test util-16.1.17.-271 {8.4 compatible formatting of doubles} \
-    {expr 1e-271} \
+    {expr {1e-271}} \
     9.9999999999999996e-272
 test util-16.1.17.-270 {8.4 compatible formatting of doubles} \
-    {expr 1e-270} \
+    {expr {1e-270}} \
     1e-270
 test util-16.1.17.-269 {8.4 compatible formatting of doubles} \
-    {expr 1e-269} \
+    {expr {1e-269}} \
     9.9999999999999996e-270
 test util-16.1.17.-268 {8.4 compatible formatting of doubles} \
-    {expr 1e-268} \
+    {expr {1e-268}} \
     9.9999999999999996e-269
 test util-16.1.17.-267 {8.4 compatible formatting of doubles} \
-    {expr 1e-267} \
+    {expr {1e-267}} \
     9.9999999999999998e-268
 test util-16.1.17.-266 {8.4 compatible formatting of doubles} \
-    {expr 1e-266} \
+    {expr {1e-266}} \
     9.9999999999999998e-267
 test util-16.1.17.-265 {8.4 compatible formatting of doubles} \
-    {expr 1e-265} \
+    {expr {1e-265}} \
     9.9999999999999998e-266
 test util-16.1.17.-264 {8.4 compatible formatting of doubles} \
-    {expr 1e-264} \
+    {expr {1e-264}} \
     1e-264
 test util-16.1.17.-263 {8.4 compatible formatting of doubles} \
-    {expr 1e-263} \
+    {expr {1e-263}} \
     1e-263
 test util-16.1.17.-262 {8.4 compatible formatting of doubles} \
-    {expr 1e-262} \
+    {expr {1e-262}} \
     1e-262
 test util-16.1.17.-261 {8.4 compatible formatting of doubles} \
-    {expr 1e-261} \
+    {expr {1e-261}} \
     9.9999999999999998e-262
 test util-16.1.17.-260 {8.4 compatible formatting of doubles} \
-    {expr 1e-260} \
+    {expr {1e-260}} \
     9.9999999999999996e-261
 test util-16.1.17.-259 {8.4 compatible formatting of doubles} \
-    {expr 1e-259} \
+    {expr {1e-259}} \
     1.0000000000000001e-259
 test util-16.1.17.-258 {8.4 compatible formatting of doubles} \
-    {expr 1e-258} \
+    {expr {1e-258}} \
     9.9999999999999995e-259
 test util-16.1.17.-257 {8.4 compatible formatting of doubles} \
-    {expr 1e-257} \
+    {expr {1e-257}} \
     9.9999999999999998e-258
 test util-16.1.17.-256 {8.4 compatible formatting of doubles} \
-    {expr 1e-256} \
+    {expr {1e-256}} \
     9.9999999999999998e-257
 test util-16.1.17.-255 {8.4 compatible formatting of doubles} \
-    {expr 1e-255} \
+    {expr {1e-255}} \
     1e-255
 test util-16.1.17.-254 {8.4 compatible formatting of doubles} \
-    {expr 1e-254} \
+    {expr {1e-254}} \
     9.9999999999999991e-255
 test util-16.1.17.-253 {8.4 compatible formatting of doubles} \
-    {expr 1e-253} \
+    {expr {1e-253}} \
     1.0000000000000001e-253
 test util-16.1.17.-252 {8.4 compatible formatting of doubles} \
-    {expr 1e-252} \
+    {expr {1e-252}} \
     9.9999999999999994e-253
 test util-16.1.17.-251 {8.4 compatible formatting of doubles} \
-    {expr 1e-251} \
+    {expr {1e-251}} \
     1e-251
 test util-16.1.17.-250 {8.4 compatible formatting of doubles} \
-    {expr 1e-250} \
+    {expr {1e-250}} \
     1.0000000000000001e-250
 test util-16.1.17.-249 {8.4 compatible formatting of doubles} \
-    {expr 1e-249} \
+    {expr {1e-249}} \
     1.0000000000000001e-249
 test util-16.1.17.-248 {8.4 compatible formatting of doubles} \
-    {expr 1e-248} \
+    {expr {1e-248}} \
     9.9999999999999998e-249
 test util-16.1.17.-247 {8.4 compatible formatting of doubles} \
-    {expr 1e-247} \
+    {expr {1e-247}} \
     1e-247
 test util-16.1.17.-246 {8.4 compatible formatting of doubles} \
-    {expr 1e-246} \
+    {expr {1e-246}} \
     9.9999999999999996e-247
 test util-16.1.17.-245 {8.4 compatible formatting of doubles} \
-    {expr 1e-245} \
+    {expr {1e-245}} \
     9.9999999999999993e-246
 test util-16.1.17.-244 {8.4 compatible formatting of doubles} \
-    {expr 1e-244} \
+    {expr {1e-244}} \
     9.9999999999999993e-245
 test util-16.1.17.-243 {8.4 compatible formatting of doubles} \
-    {expr 1e-243} \
+    {expr {1e-243}} \
     1e-243
 test util-16.1.17.-242 {8.4 compatible formatting of doubles} \
-    {expr 1e-242} \
+    {expr {1e-242}} \
     9.9999999999999997e-243
 test util-16.1.17.-241 {8.4 compatible formatting of doubles} \
-    {expr 1e-241} \
+    {expr {1e-241}} \
     9.9999999999999997e-242
 test util-16.1.17.-240 {8.4 compatible formatting of doubles} \
-    {expr 1e-240} \
+    {expr {1e-240}} \
     9.9999999999999997e-241
 test util-16.1.17.-239 {8.4 compatible formatting of doubles} \
-    {expr 1e-239} \
+    {expr {1e-239}} \
     1.0000000000000001e-239
 test util-16.1.17.-238 {8.4 compatible formatting of doubles} \
-    {expr 1e-238} \
+    {expr {1e-238}} \
     9.9999999999999999e-239
 test util-16.1.17.-237 {8.4 compatible formatting of doubles} \
-    {expr 1e-237} \
+    {expr {1e-237}} \
     9.9999999999999999e-238
 test util-16.1.17.-236 {8.4 compatible formatting of doubles} \
-    {expr 1e-236} \
+    {expr {1e-236}} \
     1e-236
 test util-16.1.17.-235 {8.4 compatible formatting of doubles} \
-    {expr 1e-235} \
+    {expr {1e-235}} \
     9.9999999999999996e-236
 test util-16.1.17.-234 {8.4 compatible formatting of doubles} \
-    {expr 1e-234} \
+    {expr {1e-234}} \
     9.9999999999999996e-235
 test util-16.1.17.-233 {8.4 compatible formatting of doubles} \
-    {expr 1e-233} \
+    {expr {1e-233}} \
     9.9999999999999996e-234
 test util-16.1.17.-232 {8.4 compatible formatting of doubles} \
-    {expr 1e-232} \
+    {expr {1e-232}} \
     1e-232
 test util-16.1.17.-231 {8.4 compatible formatting of doubles} \
-    {expr 1e-231} \
+    {expr {1e-231}} \
     9.9999999999999999e-232
 test util-16.1.17.-230 {8.4 compatible formatting of doubles} \
-    {expr 1e-230} \
+    {expr {1e-230}} \
     1e-230
 test util-16.1.17.-229 {8.4 compatible formatting of doubles} \
-    {expr 1e-229} \
+    {expr {1e-229}} \
     1.0000000000000001e-229
 test util-16.1.17.-228 {8.4 compatible formatting of doubles} \
-    {expr 1e-228} \
+    {expr {1e-228}} \
     1e-228
 test util-16.1.17.-227 {8.4 compatible formatting of doubles} \
-    {expr 1e-227} \
+    {expr {1e-227}} \
     9.9999999999999994e-228
 test util-16.1.17.-226 {8.4 compatible formatting of doubles} \
-    {expr 1e-226} \
+    {expr {1e-226}} \
     9.9999999999999992e-227
 test util-16.1.17.-225 {8.4 compatible formatting of doubles} \
-    {expr 1e-225} \
+    {expr {1e-225}} \
     9.9999999999999996e-226
 test util-16.1.17.-224 {8.4 compatible formatting of doubles} \
-    {expr 1e-224} \
+    {expr {1e-224}} \
     1e-224
 test util-16.1.17.-223 {8.4 compatible formatting of doubles} \
-    {expr 1e-223} \
+    {expr {1e-223}} \
     9.9999999999999997e-224
 test util-16.1.17.-222 {8.4 compatible formatting of doubles} \
-    {expr 1e-222} \
+    {expr {1e-222}} \
     1e-222
 test util-16.1.17.-221 {8.4 compatible formatting of doubles} \
-    {expr 1e-221} \
+    {expr {1e-221}} \
     1e-221
 test util-16.1.17.-220 {8.4 compatible formatting of doubles} \
-    {expr 1e-220} \
+    {expr {1e-220}} \
     9.9999999999999999e-221
 test util-16.1.17.-219 {8.4 compatible formatting of doubles} \
-    {expr 1e-219} \
+    {expr {1e-219}} \
     1e-219
 test util-16.1.17.-218 {8.4 compatible formatting of doubles} \
-    {expr 1e-218} \
+    {expr {1e-218}} \
     1e-218
 test util-16.1.17.-217 {8.4 compatible formatting of doubles} \
-    {expr 1e-217} \
+    {expr {1e-217}} \
     1.0000000000000001e-217
 test util-16.1.17.-216 {8.4 compatible formatting of doubles} \
-    {expr 1e-216} \
+    {expr {1e-216}} \
     1e-216
 test util-16.1.17.-215 {8.4 compatible formatting of doubles} \
-    {expr 1e-215} \
+    {expr {1e-215}} \
     1e-215
 test util-16.1.17.-214 {8.4 compatible formatting of doubles} \
-    {expr 1e-214} \
+    {expr {1e-214}} \
     9.9999999999999991e-215
 test util-16.1.17.-213 {8.4 compatible formatting of doubles} \
-    {expr 1e-213} \
+    {expr {1e-213}} \
     9.9999999999999995e-214
 test util-16.1.17.-212 {8.4 compatible formatting of doubles} \
-    {expr 1e-212} \
+    {expr {1e-212}} \
     9.9999999999999995e-213
 test util-16.1.17.-211 {8.4 compatible formatting of doubles} \
-    {expr 1e-211} \
+    {expr {1e-211}} \
     1.0000000000000001e-211
 test util-16.1.17.-210 {8.4 compatible formatting of doubles} \
-    {expr 1e-210} \
+    {expr {1e-210}} \
     1e-210
 test util-16.1.17.-209 {8.4 compatible formatting of doubles} \
-    {expr 1e-209} \
+    {expr {1e-209}} \
     1e-209
 test util-16.1.17.-208 {8.4 compatible formatting of doubles} \
-    {expr 1e-208} \
+    {expr {1e-208}} \
     1.0000000000000001e-208
 test util-16.1.17.-207 {8.4 compatible formatting of doubles} \
-    {expr 1e-207} \
+    {expr {1e-207}} \
     9.9999999999999993e-208
 test util-16.1.17.-206 {8.4 compatible formatting of doubles} \
-    {expr 1e-206} \
+    {expr {1e-206}} \
     1e-206
 test util-16.1.17.-205 {8.4 compatible formatting of doubles} \
-    {expr 1e-205} \
+    {expr {1e-205}} \
     1e-205
 test util-16.1.17.-204 {8.4 compatible formatting of doubles} \
-    {expr 1e-204} \
+    {expr {1e-204}} \
     1e-204
 test util-16.1.17.-203 {8.4 compatible formatting of doubles} \
-    {expr 1e-203} \
+    {expr {1e-203}} \
     1e-203
 test util-16.1.17.-202 {8.4 compatible formatting of doubles} \
-    {expr 1e-202} \
+    {expr {1e-202}} \
     1e-202
 test util-16.1.17.-201 {8.4 compatible formatting of doubles} \
-    {expr 1e-201} \
+    {expr {1e-201}} \
     9.9999999999999995e-202
 test util-16.1.17.-200 {8.4 compatible formatting of doubles} \
-    {expr 1e-200} \
+    {expr {1e-200}} \
     9.9999999999999998e-201
 test util-16.1.17.-199 {8.4 compatible formatting of doubles} \
-    {expr 1e-199} \
+    {expr {1e-199}} \
     9.9999999999999998e-200
 test util-16.1.17.-198 {8.4 compatible formatting of doubles} \
-    {expr 1e-198} \
+    {expr {1e-198}} \
     9.9999999999999991e-199
 test util-16.1.17.-197 {8.4 compatible formatting of doubles} \
-    {expr 1e-197} \
+    {expr {1e-197}} \
     9.9999999999999999e-198
 test util-16.1.17.-196 {8.4 compatible formatting of doubles} \
-    {expr 1e-196} \
+    {expr {1e-196}} \
     1e-196
 test util-16.1.17.-195 {8.4 compatible formatting of doubles} \
-    {expr 1e-195} \
+    {expr {1e-195}} \
     1.0000000000000001e-195
 test util-16.1.17.-194 {8.4 compatible formatting of doubles} \
-    {expr 1e-194} \
+    {expr {1e-194}} \
     1e-194
 test util-16.1.17.-193 {8.4 compatible formatting of doubles} \
-    {expr 1e-193} \
+    {expr {1e-193}} \
     1e-193
 test util-16.1.17.-192 {8.4 compatible formatting of doubles} \
-    {expr 1e-192} \
+    {expr {1e-192}} \
     1.0000000000000001e-192
 test util-16.1.17.-191 {8.4 compatible formatting of doubles} \
-    {expr 1e-191} \
+    {expr {1e-191}} \
     1e-191
 test util-16.1.17.-190 {8.4 compatible formatting of doubles} \
-    {expr 1e-190} \
+    {expr {1e-190}} \
     1e-190
 test util-16.1.17.-189 {8.4 compatible formatting of doubles} \
-    {expr 1e-189} \
+    {expr {1e-189}} \
     1.0000000000000001e-189
 test util-16.1.17.-188 {8.4 compatible formatting of doubles} \
-    {expr 1e-188} \
+    {expr {1e-188}} \
     9.9999999999999995e-189
 test util-16.1.17.-187 {8.4 compatible formatting of doubles} \
-    {expr 1e-187} \
+    {expr {1e-187}} \
     1e-187
 test util-16.1.17.-186 {8.4 compatible formatting of doubles} \
-    {expr 1e-186} \
+    {expr {1e-186}} \
     9.9999999999999991e-187
 test util-16.1.17.-185 {8.4 compatible formatting of doubles} \
-    {expr 1e-185} \
+    {expr {1e-185}} \
     9.9999999999999999e-186
 test util-16.1.17.-184 {8.4 compatible formatting of doubles} \
-    {expr 1e-184} \
+    {expr {1e-184}} \
     1.0000000000000001e-184
 test util-16.1.17.-183 {8.4 compatible formatting of doubles} \
-    {expr 1e-183} \
+    {expr {1e-183}} \
     1e-183
 test util-16.1.17.-182 {8.4 compatible formatting of doubles} \
-    {expr 1e-182} \
+    {expr {1e-182}} \
     1e-182
 test util-16.1.17.-181 {8.4 compatible formatting of doubles} \
-    {expr 1e-181} \
+    {expr {1e-181}} \
     1e-181
 test util-16.1.17.-180 {8.4 compatible formatting of doubles} \
-    {expr 1e-180} \
+    {expr {1e-180}} \
     1e-180
 test util-16.1.17.-179 {8.4 compatible formatting of doubles} \
-    {expr 1e-179} \
+    {expr {1e-179}} \
     1e-179
 test util-16.1.17.-178 {8.4 compatible formatting of doubles} \
-    {expr 1e-178} \
+    {expr {1e-178}} \
     9.9999999999999995e-179
 test util-16.1.17.-177 {8.4 compatible formatting of doubles} \
-    {expr 1e-177} \
+    {expr {1e-177}} \
     9.9999999999999995e-178
 test util-16.1.17.-176 {8.4 compatible formatting of doubles} \
-    {expr 1e-176} \
+    {expr {1e-176}} \
     1e-176
 test util-16.1.17.-175 {8.4 compatible formatting of doubles} \
-    {expr 1e-175} \
+    {expr {1e-175}} \
     1e-175
 test util-16.1.17.-174 {8.4 compatible formatting of doubles} \
-    {expr 1e-174} \
+    {expr {1e-174}} \
     1e-174
 test util-16.1.17.-173 {8.4 compatible formatting of doubles} \
-    {expr 1e-173} \
+    {expr {1e-173}} \
     1e-173
 test util-16.1.17.-172 {8.4 compatible formatting of doubles} \
-    {expr 1e-172} \
+    {expr {1e-172}} \
     1e-172
 test util-16.1.17.-171 {8.4 compatible formatting of doubles} \
-    {expr 1e-171} \
+    {expr {1e-171}} \
     9.9999999999999998e-172
 test util-16.1.17.-170 {8.4 compatible formatting of doubles} \
-    {expr 1e-170} \
+    {expr {1e-170}} \
     9.9999999999999998e-171
 test util-16.1.17.-169 {8.4 compatible formatting of doubles} \
-    {expr 1e-169} \
+    {expr {1e-169}} \
     1e-169
 test util-16.1.17.-168 {8.4 compatible formatting of doubles} \
-    {expr 1e-168} \
+    {expr {1e-168}} \
     1e-168
 test util-16.1.17.-167 {8.4 compatible formatting of doubles} \
-    {expr 1e-167} \
+    {expr {1e-167}} \
     1e-167
 test util-16.1.17.-166 {8.4 compatible formatting of doubles} \
-    {expr 1e-166} \
+    {expr {1e-166}} \
     1e-166
 test util-16.1.17.-165 {8.4 compatible formatting of doubles} \
-    {expr 1e-165} \
+    {expr {1e-165}} \
     1e-165
 test util-16.1.17.-164 {8.4 compatible formatting of doubles} \
-    {expr 1e-164} \
+    {expr {1e-164}} \
     9.9999999999999996e-165
 test util-16.1.17.-163 {8.4 compatible formatting of doubles} \
-    {expr 1e-163} \
+    {expr {1e-163}} \
     9.9999999999999992e-164
 test util-16.1.17.-162 {8.4 compatible formatting of doubles} \
-    {expr 1e-162} \
+    {expr {1e-162}} \
     9.9999999999999995e-163
 test util-16.1.17.-161 {8.4 compatible formatting of doubles} \
-    {expr 1e-161} \
+    {expr {1e-161}} \
     1e-161
 test util-16.1.17.-160 {8.4 compatible formatting of doubles} \
-    {expr 1e-160} \
+    {expr {1e-160}} \
     9.9999999999999999e-161
 test util-16.1.17.-159 {8.4 compatible formatting of doubles} \
-    {expr 1e-159} \
+    {expr {1e-159}} \
     9.9999999999999999e-160
 test util-16.1.17.-158 {8.4 compatible formatting of doubles} \
-    {expr 1e-158} \
+    {expr {1e-158}} \
     1.0000000000000001e-158
 test util-16.1.17.-157 {8.4 compatible formatting of doubles} \
-    {expr 1e-157} \
+    {expr {1e-157}} \
     9.9999999999999994e-158
 test util-16.1.17.-156 {8.4 compatible formatting of doubles} \
-    {expr 1e-156} \
+    {expr {1e-156}} \
     1e-156
 test util-16.1.17.-155 {8.4 compatible formatting of doubles} \
-    {expr 1e-155} \
+    {expr {1e-155}} \
     1e-155
 test util-16.1.17.-154 {8.4 compatible formatting of doubles} \
-    {expr 1e-154} \
+    {expr {1e-154}} \
     9.9999999999999997e-155
 test util-16.1.17.-153 {8.4 compatible formatting of doubles} \
-    {expr 1e-153} \
+    {expr {1e-153}} \
     1e-153
 test util-16.1.17.-152 {8.4 compatible formatting of doubles} \
-    {expr 1e-152} \
+    {expr {1e-152}} \
     1.0000000000000001e-152
 test util-16.1.17.-151 {8.4 compatible formatting of doubles} \
-    {expr 1e-151} \
+    {expr {1e-151}} \
     9.9999999999999994e-152
 test util-16.1.17.-150 {8.4 compatible formatting of doubles} \
-    {expr 1e-150} \
+    {expr {1e-150}} \
     1e-150
 test util-16.1.17.-149 {8.4 compatible formatting of doubles} \
-    {expr 1e-149} \
+    {expr {1e-149}} \
     9.9999999999999998e-150
 test util-16.1.17.-148 {8.4 compatible formatting of doubles} \
-    {expr 1e-148} \
+    {expr {1e-148}} \
     9.9999999999999994e-149
 test util-16.1.17.-147 {8.4 compatible formatting of doubles} \
-    {expr 1e-147} \
+    {expr {1e-147}} \
     9.9999999999999997e-148
 test util-16.1.17.-146 {8.4 compatible formatting of doubles} \
-    {expr 1e-146} \
+    {expr {1e-146}} \
     1e-146
 test util-16.1.17.-145 {8.4 compatible formatting of doubles} \
-    {expr 1e-145} \
+    {expr {1e-145}} \
     9.9999999999999991e-146
 test util-16.1.17.-144 {8.4 compatible formatting of doubles} \
-    {expr 1e-144} \
+    {expr {1e-144}} \
     9.9999999999999995e-145
 test util-16.1.17.-143 {8.4 compatible formatting of doubles} \
-    {expr 1e-143} \
+    {expr {1e-143}} \
     9.9999999999999995e-144
 test util-16.1.17.-142 {8.4 compatible formatting of doubles} \
-    {expr 1e-142} \
+    {expr {1e-142}} \
     1e-142
 test util-16.1.17.-141 {8.4 compatible formatting of doubles} \
-    {expr 1e-141} \
+    {expr {1e-141}} \
     1e-141
 test util-16.1.17.-140 {8.4 compatible formatting of doubles} \
-    {expr 1e-140} \
+    {expr {1e-140}} \
     9.9999999999999998e-141
 test util-16.1.17.-139 {8.4 compatible formatting of doubles} \
-    {expr 1e-139} \
+    {expr {1e-139}} \
     1e-139
 test util-16.1.17.-138 {8.4 compatible formatting of doubles} \
-    {expr 1e-138} \
+    {expr {1e-138}} \
     1.0000000000000001e-138
 test util-16.1.17.-137 {8.4 compatible formatting of doubles} \
-    {expr 1e-137} \
+    {expr {1e-137}} \
     9.9999999999999998e-138
 test util-16.1.17.-136 {8.4 compatible formatting of doubles} \
-    {expr 1e-136} \
+    {expr {1e-136}} \
     1e-136
 test util-16.1.17.-135 {8.4 compatible formatting of doubles} \
-    {expr 1e-135} \
+    {expr {1e-135}} \
     1e-135
 test util-16.1.17.-134 {8.4 compatible formatting of doubles} \
-    {expr 1e-134} \
+    {expr {1e-134}} \
     1e-134
 test util-16.1.17.-133 {8.4 compatible formatting of doubles} \
-    {expr 1e-133} \
+    {expr {1e-133}} \
     1.0000000000000001e-133
 test util-16.1.17.-132 {8.4 compatible formatting of doubles} \
-    {expr 1e-132} \
+    {expr {1e-132}} \
     9.9999999999999999e-133
 test util-16.1.17.-131 {8.4 compatible formatting of doubles} \
-    {expr 1e-131} \
+    {expr {1e-131}} \
     9.9999999999999999e-132
 test util-16.1.17.-130 {8.4 compatible formatting of doubles} \
-    {expr 1e-130} \
+    {expr {1e-130}} \
     1.0000000000000001e-130
 test util-16.1.17.-129 {8.4 compatible formatting of doubles} \
-    {expr 1e-129} \
+    {expr {1e-129}} \
     9.9999999999999993e-130
 test util-16.1.17.-128 {8.4 compatible formatting of doubles} \
-    {expr 1e-128} \
+    {expr {1e-128}} \
     1.0000000000000001e-128
 test util-16.1.17.-127 {8.4 compatible formatting of doubles} \
-    {expr 1e-127} \
+    {expr {1e-127}} \
     1e-127
 test util-16.1.17.-126 {8.4 compatible formatting of doubles} \
-    {expr 1e-126} \
+    {expr {1e-126}} \
     9.9999999999999995e-127
 test util-16.1.17.-125 {8.4 compatible formatting of doubles} \
-    {expr 1e-125} \
+    {expr {1e-125}} \
     1e-125
 test util-16.1.17.-124 {8.4 compatible formatting of doubles} \
-    {expr 1e-124} \
+    {expr {1e-124}} \
     9.9999999999999993e-125
 test util-16.1.17.-123 {8.4 compatible formatting of doubles} \
-    {expr 1e-123} \
+    {expr {1e-123}} \
     1.0000000000000001e-123
 test util-16.1.17.-122 {8.4 compatible formatting of doubles} \
-    {expr 1e-122} \
+    {expr {1e-122}} \
     1.0000000000000001e-122
 test util-16.1.17.-121 {8.4 compatible formatting of doubles} \
-    {expr 1e-121} \
+    {expr {1e-121}} \
     9.9999999999999998e-122
 test util-16.1.17.-120 {8.4 compatible formatting of doubles} \
-    {expr 1e-120} \
+    {expr {1e-120}} \
     9.9999999999999998e-121
 test util-16.1.17.-119 {8.4 compatible formatting of doubles} \
-    {expr 1e-119} \
+    {expr {1e-119}} \
     1e-119
 test util-16.1.17.-118 {8.4 compatible formatting of doubles} \
-    {expr 1e-118} \
+    {expr {1e-118}} \
     9.9999999999999999e-119
 test util-16.1.17.-117 {8.4 compatible formatting of doubles} \
-    {expr 1e-117} \
+    {expr {1e-117}} \
     1e-117
 test util-16.1.17.-116 {8.4 compatible formatting of doubles} \
-    {expr 1e-116} \
+    {expr {1e-116}} \
     9.9999999999999999e-117
 test util-16.1.17.-115 {8.4 compatible formatting of doubles} \
-    {expr 1e-115} \
+    {expr {1e-115}} \
     1.0000000000000001e-115
 test util-16.1.17.-114 {8.4 compatible formatting of doubles} \
-    {expr 1e-114} \
+    {expr {1e-114}} \
     1.0000000000000001e-114
 test util-16.1.17.-113 {8.4 compatible formatting of doubles} \
-    {expr 1e-113} \
+    {expr {1e-113}} \
     9.9999999999999998e-114
 test util-16.1.17.-112 {8.4 compatible formatting of doubles} \
-    {expr 1e-112} \
+    {expr {1e-112}} \
     9.9999999999999995e-113
 test util-16.1.17.-111 {8.4 compatible formatting of doubles} \
-    {expr 1e-111} \
+    {expr {1e-111}} \
     1.0000000000000001e-111
 test util-16.1.17.-110 {8.4 compatible formatting of doubles} \
-    {expr 1e-110} \
+    {expr {1e-110}} \
     1.0000000000000001e-110
 test util-16.1.17.-109 {8.4 compatible formatting of doubles} \
-    {expr 1e-109} \
+    {expr {1e-109}} \
     9.9999999999999999e-110
 test util-16.1.17.-108 {8.4 compatible formatting of doubles} \
-    {expr 1e-108} \
+    {expr {1e-108}} \
     1e-108
 test util-16.1.17.-107 {8.4 compatible formatting of doubles} \
-    {expr 1e-107} \
+    {expr {1e-107}} \
     1e-107
 test util-16.1.17.-106 {8.4 compatible formatting of doubles} \
-    {expr 1e-106} \
+    {expr {1e-106}} \
     9.9999999999999994e-107
 test util-16.1.17.-105 {8.4 compatible formatting of doubles} \
-    {expr 1e-105} \
+    {expr {1e-105}} \
     9.9999999999999997e-106
 test util-16.1.17.-104 {8.4 compatible formatting of doubles} \
-    {expr 1e-104} \
+    {expr {1e-104}} \
     9.9999999999999993e-105
 test util-16.1.17.-103 {8.4 compatible formatting of doubles} \
-    {expr 1e-103} \
+    {expr {1e-103}} \
     9.9999999999999996e-104
 test util-16.1.17.-102 {8.4 compatible formatting of doubles} \
-    {expr 1e-102} \
+    {expr {1e-102}} \
     9.9999999999999993e-103
 test util-16.1.17.-101 {8.4 compatible formatting of doubles} \
-    {expr 1e-101} \
+    {expr {1e-101}} \
     1.0000000000000001e-101
 test util-16.1.17.-100 {8.4 compatible formatting of doubles} \
-    {expr 1e-100} \
+    {expr {1e-100}} \
     1e-100
 test util-16.1.17.-99 {8.4 compatible formatting of doubles} \
-    {expr 1e-99} \
+    {expr {1e-99}} \
     1e-99
 test util-16.1.17.-98 {8.4 compatible formatting of doubles} \
-    {expr 1e-98} \
+    {expr {1e-98}} \
     9.9999999999999994e-99
 test util-16.1.17.-97 {8.4 compatible formatting of doubles} \
-    {expr 1e-97} \
+    {expr {1e-97}} \
     1e-97
 test util-16.1.17.-96 {8.4 compatible formatting of doubles} \
-    {expr 1e-96} \
+    {expr {1e-96}} \
     9.9999999999999991e-97
 test util-16.1.17.-95 {8.4 compatible formatting of doubles} \
-    {expr 1e-95} \
+    {expr {1e-95}} \
     9.9999999999999999e-96
 test util-16.1.17.-94 {8.4 compatible formatting of doubles} \
-    {expr 1e-94} \
+    {expr {1e-94}} \
     9.9999999999999996e-95
 test util-16.1.17.-93 {8.4 compatible formatting of doubles} \
-    {expr 1e-93} \
+    {expr {1e-93}} \
     9.999999999999999e-94
 test util-16.1.17.-92 {8.4 compatible formatting of doubles} \
-    {expr 1e-92} \
+    {expr {1e-92}} \
     9.9999999999999999e-93
 test util-16.1.17.-91 {8.4 compatible formatting of doubles} \
-    {expr 1e-91} \
+    {expr {1e-91}} \
     1e-91
 test util-16.1.17.-90 {8.4 compatible formatting of doubles} \
-    {expr 1e-90} \
+    {expr {1e-90}} \
     9.9999999999999999e-91
 test util-16.1.17.-89 {8.4 compatible formatting of doubles} \
-    {expr 1e-89} \
+    {expr {1e-89}} \
     1e-89
 test util-16.1.17.-88 {8.4 compatible formatting of doubles} \
-    {expr 1e-88} \
+    {expr {1e-88}} \
     9.9999999999999993e-89
 test util-16.1.17.-87 {8.4 compatible formatting of doubles} \
-    {expr 1e-87} \
+    {expr {1e-87}} \
     1e-87
 test util-16.1.17.-86 {8.4 compatible formatting of doubles} \
-    {expr 1e-86} \
+    {expr {1e-86}} \
     1.0000000000000001e-86
 test util-16.1.17.-85 {8.4 compatible formatting of doubles} \
-    {expr 1e-85} \
+    {expr {1e-85}} \
     9.9999999999999998e-86
 test util-16.1.17.-84 {8.4 compatible formatting of doubles} \
-    {expr 1e-84} \
+    {expr {1e-84}} \
     1e-84
 test util-16.1.17.-83 {8.4 compatible formatting of doubles} \
-    {expr 1e-83} \
+    {expr {1e-83}} \
     1e-83
 test util-16.1.17.-82 {8.4 compatible formatting of doubles} \
-    {expr 1e-82} \
+    {expr {1e-82}} \
     9.9999999999999996e-83
 test util-16.1.17.-81 {8.4 compatible formatting of doubles} \
-    {expr 1e-81} \
+    {expr {1e-81}} \
     9.9999999999999996e-82
 test util-16.1.17.-80 {8.4 compatible formatting of doubles} \
-    {expr 1e-80} \
+    {expr {1e-80}} \
     9.9999999999999996e-81
 test util-16.1.17.-79 {8.4 compatible formatting of doubles} \
-    {expr 1e-79} \
+    {expr {1e-79}} \
     1e-79
 test util-16.1.17.-78 {8.4 compatible formatting of doubles} \
-    {expr 1e-78} \
+    {expr {1e-78}} \
     1e-78
 test util-16.1.17.-77 {8.4 compatible formatting of doubles} \
-    {expr 1e-77} \
+    {expr {1e-77}} \
     9.9999999999999993e-78
 test util-16.1.17.-76 {8.4 compatible formatting of doubles} \
-    {expr 1e-76} \
+    {expr {1e-76}} \
     9.9999999999999993e-77
 test util-16.1.17.-75 {8.4 compatible formatting of doubles} \
-    {expr 1e-75} \
+    {expr {1e-75}} \
     9.9999999999999996e-76
 test util-16.1.17.-74 {8.4 compatible formatting of doubles} \
-    {expr 1e-74} \
+    {expr {1e-74}} \
     9.9999999999999996e-75
 test util-16.1.17.-73 {8.4 compatible formatting of doubles} \
-    {expr 1e-73} \
+    {expr {1e-73}} \
     1e-73
 test util-16.1.17.-72 {8.4 compatible formatting of doubles} \
-    {expr 1e-72} \
+    {expr {1e-72}} \
     9.9999999999999997e-73
 test util-16.1.17.-71 {8.4 compatible formatting of doubles} \
-    {expr 1e-71} \
+    {expr {1e-71}} \
     9.9999999999999992e-72
 test util-16.1.17.-70 {8.4 compatible formatting of doubles} \
-    {expr 1e-70} \
+    {expr {1e-70}} \
     1e-70
 test util-16.1.17.-69 {8.4 compatible formatting of doubles} \
-    {expr 1e-69} \
+    {expr {1e-69}} \
     9.9999999999999996e-70
 test util-16.1.17.-68 {8.4 compatible formatting of doubles} \
-    {expr 1e-68} \
+    {expr {1e-68}} \
     1.0000000000000001e-68
 test util-16.1.17.-67 {8.4 compatible formatting of doubles} \
-    {expr 1e-67} \
+    {expr {1e-67}} \
     9.9999999999999994e-68
 test util-16.1.17.-66 {8.4 compatible formatting of doubles} \
-    {expr 1e-66} \
+    {expr {1e-66}} \
     9.9999999999999998e-67
 test util-16.1.17.-65 {8.4 compatible formatting of doubles} \
-    {expr 1e-65} \
+    {expr {1e-65}} \
     9.9999999999999992e-66
 test util-16.1.17.-64 {8.4 compatible formatting of doubles} \
-    {expr 1e-64} \
+    {expr {1e-64}} \
     9.9999999999999997e-65
 test util-16.1.17.-63 {8.4 compatible formatting of doubles} \
-    {expr 1e-63} \
+    {expr {1e-63}} \
     1.0000000000000001e-63
 test util-16.1.17.-62 {8.4 compatible formatting of doubles} \
-    {expr 1e-62} \
+    {expr {1e-62}} \
     1e-62
 test util-16.1.17.-61 {8.4 compatible formatting of doubles} \
-    {expr 1e-61} \
+    {expr {1e-61}} \
     1e-61
 test util-16.1.17.-60 {8.4 compatible formatting of doubles} \
-    {expr 1e-60} \
+    {expr {1e-60}} \
     9.9999999999999997e-61
 test util-16.1.17.-59 {8.4 compatible formatting of doubles} \
-    {expr 1e-59} \
+    {expr {1e-59}} \
     1e-59
 test util-16.1.17.-58 {8.4 compatible formatting of doubles} \
-    {expr 1e-58} \
+    {expr {1e-58}} \
     1e-58
 test util-16.1.17.-57 {8.4 compatible formatting of doubles} \
-    {expr 1e-57} \
+    {expr {1e-57}} \
     9.9999999999999995e-58
 test util-16.1.17.-56 {8.4 compatible formatting of doubles} \
-    {expr 1e-56} \
+    {expr {1e-56}} \
     1e-56
 test util-16.1.17.-55 {8.4 compatible formatting of doubles} \
-    {expr 1e-55} \
+    {expr {1e-55}} \
     9.9999999999999999e-56
 test util-16.1.17.-54 {8.4 compatible formatting of doubles} \
-    {expr 1e-54} \
+    {expr {1e-54}} \
     1e-54
 test util-16.1.17.-53 {8.4 compatible formatting of doubles} \
-    {expr 1e-53} \
+    {expr {1e-53}} \
     1e-53
 test util-16.1.17.-52 {8.4 compatible formatting of doubles} \
-    {expr 1e-52} \
+    {expr {1e-52}} \
     1e-52
 test util-16.1.17.-51 {8.4 compatible formatting of doubles} \
-    {expr 1e-51} \
+    {expr {1e-51}} \
     1e-51
 test util-16.1.17.-50 {8.4 compatible formatting of doubles} \
-    {expr 1e-50} \
+    {expr {1e-50}} \
     1e-50
 test util-16.1.17.-49 {8.4 compatible formatting of doubles} \
-    {expr 1e-49} \
+    {expr {1e-49}} \
     9.9999999999999994e-50
 test util-16.1.17.-48 {8.4 compatible formatting of doubles} \
-    {expr 1e-48} \
+    {expr {1e-48}} \
     9.9999999999999997e-49
 test util-16.1.17.-47 {8.4 compatible formatting of doubles} \
-    {expr 1e-47} \
+    {expr {1e-47}} \
     9.9999999999999997e-48
 test util-16.1.17.-46 {8.4 compatible formatting of doubles} \
-    {expr 1e-46} \
+    {expr {1e-46}} \
     1e-46
 test util-16.1.17.-45 {8.4 compatible formatting of doubles} \
-    {expr 1e-45} \
+    {expr {1e-45}} \
     9.9999999999999998e-46
 test util-16.1.17.-44 {8.4 compatible formatting of doubles} \
-    {expr 1e-44} \
+    {expr {1e-44}} \
     9.9999999999999995e-45
 test util-16.1.17.-43 {8.4 compatible formatting of doubles} \
-    {expr 1e-43} \
+    {expr {1e-43}} \
     1.0000000000000001e-43
 test util-16.1.17.-42 {8.4 compatible formatting of doubles} \
-    {expr 1e-42} \
+    {expr {1e-42}} \
     1e-42
 test util-16.1.17.-41 {8.4 compatible formatting of doubles} \
-    {expr 1e-41} \
+    {expr {1e-41}} \
     1e-41
 test util-16.1.17.-40 {8.4 compatible formatting of doubles} \
-    {expr 1e-40} \
+    {expr {1e-40}} \
     9.9999999999999993e-41
 test util-16.1.17.-39 {8.4 compatible formatting of doubles} \
-    {expr 1e-39} \
+    {expr {1e-39}} \
     9.9999999999999993e-40
 test util-16.1.17.-38 {8.4 compatible formatting of doubles} \
-    {expr 1e-38} \
+    {expr {1e-38}} \
     9.9999999999999996e-39
 test util-16.1.17.-37 {8.4 compatible formatting of doubles} \
-    {expr 1e-37} \
+    {expr {1e-37}} \
     1.0000000000000001e-37
 test util-16.1.17.-36 {8.4 compatible formatting of doubles} \
-    {expr 1e-36} \
+    {expr {1e-36}} \
     9.9999999999999994e-37
 test util-16.1.17.-35 {8.4 compatible formatting of doubles} \
-    {expr 1e-35} \
+    {expr {1e-35}} \
     1e-35
 test util-16.1.17.-34 {8.4 compatible formatting of doubles} \
-    {expr 1e-34} \
+    {expr {1e-34}} \
     9.9999999999999993e-35
 test util-16.1.17.-33 {8.4 compatible formatting of doubles} \
-    {expr 1e-33} \
+    {expr {1e-33}} \
     1.0000000000000001e-33
 test util-16.1.17.-32 {8.4 compatible formatting of doubles} \
-    {expr 1e-32} \
+    {expr {1e-32}} \
     1.0000000000000001e-32
 test util-16.1.17.-31 {8.4 compatible formatting of doubles} \
-    {expr 1e-31} \
+    {expr {1e-31}} \
     1.0000000000000001e-31
 test util-16.1.17.-30 {8.4 compatible formatting of doubles} \
-    {expr 1e-30} \
+    {expr {1e-30}} \
     1.0000000000000001e-30
 test util-16.1.17.-29 {8.4 compatible formatting of doubles} \
-    {expr 1e-29} \
+    {expr {1e-29}} \
     9.9999999999999994e-30
 test util-16.1.17.-28 {8.4 compatible formatting of doubles} \
-    {expr 1e-28} \
+    {expr {1e-28}} \
     9.9999999999999997e-29
 test util-16.1.17.-27 {8.4 compatible formatting of doubles} \
-    {expr 1e-27} \
+    {expr {1e-27}} \
     1e-27
 test util-16.1.17.-26 {8.4 compatible formatting of doubles} \
-    {expr 1e-26} \
+    {expr {1e-26}} \
     1e-26
 test util-16.1.17.-25 {8.4 compatible formatting of doubles} \
-    {expr 1e-25} \
+    {expr {1e-25}} \
     1e-25
 test util-16.1.17.-24 {8.4 compatible formatting of doubles} \
-    {expr 1e-24} \
+    {expr {1e-24}} \
     9.9999999999999992e-25
 test util-16.1.17.-23 {8.4 compatible formatting of doubles} \
-    {expr 1e-23} \
+    {expr {1e-23}} \
     9.9999999999999996e-24
 test util-16.1.17.-22 {8.4 compatible formatting of doubles} \
-    {expr 1e-22} \
+    {expr {1e-22}} \
     1e-22
 test util-16.1.17.-21 {8.4 compatible formatting of doubles} \
-    {expr 1e-21} \
+    {expr {1e-21}} \
     9.9999999999999991e-22
 test util-16.1.17.-20 {8.4 compatible formatting of doubles} \
-    {expr 1e-20} \
+    {expr {1e-20}} \
     9.9999999999999995e-21
 test util-16.1.17.-19 {8.4 compatible formatting of doubles} \
-    {expr 1e-19} \
+    {expr {1e-19}} \
     9.9999999999999998e-20
 test util-16.1.17.-18 {8.4 compatible formatting of doubles} \
-    {expr 1e-18} \
+    {expr {1e-18}} \
     1.0000000000000001e-18
 test util-16.1.17.-17 {8.4 compatible formatting of doubles} \
-    {expr 1e-17} \
+    {expr {1e-17}} \
     1.0000000000000001e-17
 test util-16.1.17.-16 {8.4 compatible formatting of doubles} \
-    {expr 1e-16} \
+    {expr {1e-16}} \
     9.9999999999999998e-17
 test util-16.1.17.-15 {8.4 compatible formatting of doubles} \
-    {expr 1e-15} \
+    {expr {1e-15}} \
     1.0000000000000001e-15
 test util-16.1.17.-14 {8.4 compatible formatting of doubles} \
-    {expr 1e-14} \
+    {expr {1e-14}} \
     1e-14
 test util-16.1.17.-13 {8.4 compatible formatting of doubles} \
-    {expr 1e-13} \
+    {expr {1e-13}} \
     1e-13
 test util-16.1.17.-12 {8.4 compatible formatting of doubles} \
-    {expr 1e-12} \
+    {expr {1e-12}} \
     9.9999999999999998e-13
 test util-16.1.17.-11 {8.4 compatible formatting of doubles} \
-    {expr 1e-11} \
+    {expr {1e-11}} \
     9.9999999999999994e-12
 test util-16.1.17.-10 {8.4 compatible formatting of doubles} \
-    {expr 1e-10} \
+    {expr {1e-10}} \
     1e-10
 test util-16.1.17.-9 {8.4 compatible formatting of doubles} \
-    {expr 1e-9} \
+    {expr {1e-9}} \
     1.0000000000000001e-09
 test util-16.1.17.-8 {8.4 compatible formatting of doubles} \
-    {expr 1e-8} \
+    {expr {1e-8}} \
     1e-08
 test util-16.1.17.-7 {8.4 compatible formatting of doubles} \
-    {expr 1e-7} \
+    {expr {1e-7}} \
     9.9999999999999995e-08
 test util-16.1.17.-6 {8.4 compatible formatting of doubles} \
-    {expr 1e-6} \
+    {expr {1e-6}} \
     9.9999999999999995e-07
 test util-16.1.17.-5 {8.4 compatible formatting of doubles} \
-    {expr 1e-5} \
+    {expr {1e-5}} \
     1.0000000000000001e-05
 test util-16.1.17.-4 {8.4 compatible formatting of doubles} \
-    {expr 1e-4} \
+    {expr {1e-4}} \
     0.0001
 test util-16.1.17.-3 {8.4 compatible formatting of doubles} \
-    {expr 1e-3} \
+    {expr {1e-3}} \
     0.001
 test util-16.1.17.-2 {8.4 compatible formatting of doubles} \
-    {expr 1e-2} \
+    {expr {1e-2}} \
     0.01
 test util-16.1.17.-1 {8.4 compatible formatting of doubles} \
-    {expr 1e-1} \
+    {expr {1e-1}} \
     0.10000000000000001
 test util-16.1.17.0 {8.4 compatible formatting of doubles} \
-    {expr 1e0} \
+    {expr {1e0}} \
     1.0
 test util-16.1.17.1 {8.4 compatible formatting of doubles} \
-    {expr 1e1} \
+    {expr {1e1}} \
     10.0
 test util-16.1.17.2 {8.4 compatible formatting of doubles} \
-    {expr 1e2} \
+    {expr {1e2}} \
     100.0
 test util-16.1.17.3 {8.4 compatible formatting of doubles} \
-    {expr 1e3} \
+    {expr {1e3}} \
     1000.0
 test util-16.1.17.4 {8.4 compatible formatting of doubles} \
-    {expr 1e4} \
+    {expr {1e4}} \
     10000.0
 test util-16.1.17.5 {8.4 compatible formatting of doubles} \
-    {expr 1e5} \
+    {expr {1e5}} \
     100000.0
 test util-16.1.17.6 {8.4 compatible formatting of doubles} \
-    {expr 1e6} \
+    {expr {1e6}} \
     1000000.0
 test util-16.1.17.7 {8.4 compatible formatting of doubles} \
-    {expr 1e7} \
+    {expr {1e7}} \
     10000000.0
 test util-16.1.17.8 {8.4 compatible formatting of doubles} \
-    {expr 1e8} \
+    {expr {1e8}} \
     100000000.0
 test util-16.1.17.9 {8.4 compatible formatting of doubles} \
-    {expr 1e9} \
+    {expr {1e9}} \
     1000000000.0
 test util-16.1.17.10 {8.4 compatible formatting of doubles} \
-    {expr 1e10} \
+    {expr {1e10}} \
     10000000000.0
 test util-16.1.17.11 {8.4 compatible formatting of doubles} \
-    {expr 1e11} \
+    {expr {1e11}} \
     100000000000.0
 test util-16.1.17.12 {8.4 compatible formatting of doubles} \
-    {expr 1e12} \
+    {expr {1e12}} \
     1000000000000.0
 test util-16.1.17.13 {8.4 compatible formatting of doubles} \
-    {expr 1e13} \
+    {expr {1e13}} \
     10000000000000.0
 test util-16.1.17.14 {8.4 compatible formatting of doubles} \
-    {expr 1e14} \
+    {expr {1e14}} \
     100000000000000.0
 test util-16.1.17.15 {8.4 compatible formatting of doubles} \
-    {expr 1e15} \
+    {expr {1e15}} \
     1000000000000000.0
 test util-16.1.17.16 {8.4 compatible formatting of doubles} \
-    {expr 1e16} \
+    {expr {1e16}} \
     10000000000000000.0
 test util-16.1.17.17 {8.4 compatible formatting of doubles} \
-    {expr 1e17} \
+    {expr {1e17}} \
     1e+17
 test util-16.1.17.18 {8.4 compatible formatting of doubles} \
-    {expr 1e18} \
+    {expr {1e18}} \
     1e+18
 test util-16.1.17.19 {8.4 compatible formatting of doubles} \
-    {expr 1e19} \
+    {expr {1e19}} \
     1e+19
 test util-16.1.17.20 {8.4 compatible formatting of doubles} \
-    {expr 1e20} \
+    {expr {1e20}} \
     1e+20
 test util-16.1.17.21 {8.4 compatible formatting of doubles} \
-    {expr 1e21} \
+    {expr {1e21}} \
     1e+21
 test util-16.1.17.22 {8.4 compatible formatting of doubles} \
-    {expr 1e22} \
+    {expr {1e22}} \
     1e+22
 test util-16.1.17.23 {8.4 compatible formatting of doubles} \
-    {expr 1e23} \
+    {expr {1e23}} \
     9.9999999999999992e+22
 test util-16.1.17.24 {8.4 compatible formatting of doubles} \
-    {expr 1e24} \
+    {expr {1e24}} \
     9.9999999999999998e+23
 test util-16.1.17.25 {8.4 compatible formatting of doubles} \
-    {expr 1e25} \
+    {expr {1e25}} \
     1.0000000000000001e+25
 test util-16.1.17.26 {8.4 compatible formatting of doubles} \
-    {expr 1e26} \
+    {expr {1e26}} \
     1e+26
 test util-16.1.17.27 {8.4 compatible formatting of doubles} \
-    {expr 1e27} \
+    {expr {1e27}} \
     1e+27
 test util-16.1.17.28 {8.4 compatible formatting of doubles} \
-    {expr 1e28} \
+    {expr {1e28}} \
     9.9999999999999996e+27
 test util-16.1.17.29 {8.4 compatible formatting of doubles} \
-    {expr 1e29} \
+    {expr {1e29}} \
     9.9999999999999991e+28
 test util-16.1.17.30 {8.4 compatible formatting of doubles} \
-    {expr 1e30} \
+    {expr {1e30}} \
     1e+30
 test util-16.1.17.31 {8.4 compatible formatting of doubles} \
-    {expr 1e31} \
+    {expr {1e31}} \
     9.9999999999999996e+30
 test util-16.1.17.32 {8.4 compatible formatting of doubles} \
-    {expr 1e32} \
+    {expr {1e32}} \
     1.0000000000000001e+32
 test util-16.1.17.33 {8.4 compatible formatting of doubles} \
-    {expr 1e33} \
+    {expr {1e33}} \
     9.9999999999999995e+32
 test util-16.1.17.34 {8.4 compatible formatting of doubles} \
-    {expr 1e34} \
+    {expr {1e34}} \
     9.9999999999999995e+33
 test util-16.1.17.35 {8.4 compatible formatting of doubles} \
-    {expr 1e35} \
+    {expr {1e35}} \
     9.9999999999999997e+34
 test util-16.1.17.36 {8.4 compatible formatting of doubles} \
-    {expr 1e36} \
+    {expr {1e36}} \
     1e+36
 test util-16.1.17.37 {8.4 compatible formatting of doubles} \
-    {expr 1e37} \
+    {expr {1e37}} \
     9.9999999999999995e+36
 test util-16.1.17.38 {8.4 compatible formatting of doubles} \
-    {expr 1e38} \
+    {expr {1e38}} \
     9.9999999999999998e+37
 test util-16.1.17.39 {8.4 compatible formatting of doubles} \
-    {expr 1e39} \
+    {expr {1e39}} \
     9.9999999999999994e+38
 test util-16.1.17.40 {8.4 compatible formatting of doubles} \
-    {expr 1e40} \
+    {expr {1e40}} \
     1e+40
 test util-16.1.17.41 {8.4 compatible formatting of doubles} \
-    {expr 1e41} \
+    {expr {1e41}} \
     1e+41
 test util-16.1.17.42 {8.4 compatible formatting of doubles} \
-    {expr 1e42} \
+    {expr {1e42}} \
     1e+42
 test util-16.1.17.43 {8.4 compatible formatting of doubles} \
-    {expr 1e43} \
+    {expr {1e43}} \
     1e+43
 test util-16.1.17.44 {8.4 compatible formatting of doubles} \
-    {expr 1e44} \
+    {expr {1e44}} \
     1.0000000000000001e+44
 test util-16.1.17.45 {8.4 compatible formatting of doubles} \
-    {expr 1e45} \
+    {expr {1e45}} \
     9.9999999999999993e+44
 test util-16.1.17.46 {8.4 compatible formatting of doubles} \
-    {expr 1e46} \
+    {expr {1e46}} \
     9.9999999999999999e+45
 test util-16.1.17.47 {8.4 compatible formatting of doubles} \
-    {expr 1e47} \
+    {expr {1e47}} \
     1e+47
 test util-16.1.17.48 {8.4 compatible formatting of doubles} \
-    {expr 1e48} \
+    {expr {1e48}} \
     1e+48
 test util-16.1.17.49 {8.4 compatible formatting of doubles} \
-    {expr 1e49} \
+    {expr {1e49}} \
     9.9999999999999995e+48
 test util-16.1.17.50 {8.4 compatible formatting of doubles} \
-    {expr 1e50} \
+    {expr {1e50}} \
     1.0000000000000001e+50
 test util-16.1.17.51 {8.4 compatible formatting of doubles} \
-    {expr 1e51} \
+    {expr {1e51}} \
     9.9999999999999999e+50
 test util-16.1.17.52 {8.4 compatible formatting of doubles} \
-    {expr 1e52} \
+    {expr {1e52}} \
     9.9999999999999999e+51
 test util-16.1.17.53 {8.4 compatible formatting of doubles} \
-    {expr 1e53} \
+    {expr {1e53}} \
     9.9999999999999999e+52
 test util-16.1.17.54 {8.4 compatible formatting of doubles} \
-    {expr 1e54} \
+    {expr {1e54}} \
     1.0000000000000001e+54
 test util-16.1.17.55 {8.4 compatible formatting of doubles} \
-    {expr 1e55} \
+    {expr {1e55}} \
     1e+55
 test util-16.1.17.56 {8.4 compatible formatting of doubles} \
-    {expr 1e56} \
+    {expr {1e56}} \
     1.0000000000000001e+56
 test util-16.1.17.57 {8.4 compatible formatting of doubles} \
-    {expr 1e57} \
+    {expr {1e57}} \
     1e+57
 test util-16.1.17.58 {8.4 compatible formatting of doubles} \
-    {expr 1e58} \
+    {expr {1e58}} \
     9.9999999999999994e+57
 test util-16.1.17.59 {8.4 compatible formatting of doubles} \
-    {expr 1e59} \
+    {expr {1e59}} \
     9.9999999999999997e+58
 test util-16.1.17.60 {8.4 compatible formatting of doubles} \
-    {expr 1e60} \
+    {expr {1e60}} \
     9.9999999999999995e+59
 test util-16.1.17.61 {8.4 compatible formatting of doubles} \
-    {expr 1e61} \
+    {expr {1e61}} \
     9.9999999999999995e+60
 test util-16.1.17.62 {8.4 compatible formatting of doubles} \
-    {expr 1e62} \
+    {expr {1e62}} \
     1e+62
 test util-16.1.17.63 {8.4 compatible formatting of doubles} \
-    {expr 1e63} \
+    {expr {1e63}} \
     1.0000000000000001e+63
 test util-16.1.17.64 {8.4 compatible formatting of doubles} \
-    {expr 1e64} \
+    {expr {1e64}} \
     1e+64
 test util-16.1.17.65 {8.4 compatible formatting of doubles} \
-    {expr 1e65} \
+    {expr {1e65}} \
     9.9999999999999999e+64
 test util-16.1.17.66 {8.4 compatible formatting of doubles} \
-    {expr 1e66} \
+    {expr {1e66}} \
     9.9999999999999995e+65
 test util-16.1.17.67 {8.4 compatible formatting of doubles} \
-    {expr 1e67} \
+    {expr {1e67}} \
     9.9999999999999998e+66
 test util-16.1.17.68 {8.4 compatible formatting of doubles} \
-    {expr 1e68} \
+    {expr {1e68}} \
     9.9999999999999995e+67
 test util-16.1.17.69 {8.4 compatible formatting of doubles} \
-    {expr 1e69} \
+    {expr {1e69}} \
     1.0000000000000001e+69
 test util-16.1.17.70 {8.4 compatible formatting of doubles} \
-    {expr 1e70} \
+    {expr {1e70}} \
     1.0000000000000001e+70
 test util-16.1.17.71 {8.4 compatible formatting of doubles} \
-    {expr 1e71} \
+    {expr {1e71}} \
     1e+71
 test util-16.1.17.72 {8.4 compatible formatting of doubles} \
-    {expr 1e72} \
+    {expr {1e72}} \
     9.9999999999999994e+71
 test util-16.1.17.73 {8.4 compatible formatting of doubles} \
-    {expr 1e73} \
+    {expr {1e73}} \
     9.9999999999999998e+72
 test util-16.1.17.74 {8.4 compatible formatting of doubles} \
-    {expr 1e74} \
+    {expr {1e74}} \
     9.9999999999999995e+73
 test util-16.1.17.75 {8.4 compatible formatting of doubles} \
-    {expr 1e75} \
+    {expr {1e75}} \
     9.9999999999999993e+74
 test util-16.1.17.76 {8.4 compatible formatting of doubles} \
-    {expr 1e76} \
+    {expr {1e76}} \
     1e+76
 test util-16.1.17.77 {8.4 compatible formatting of doubles} \
-    {expr 1e77} \
+    {expr {1e77}} \
     9.9999999999999998e+76
 test util-16.1.17.78 {8.4 compatible formatting of doubles} \
-    {expr 1e78} \
+    {expr {1e78}} \
     1e+78
 test util-16.1.17.79 {8.4 compatible formatting of doubles} \
-    {expr 1e79} \
+    {expr {1e79}} \
     9.9999999999999997e+78
 test util-16.1.17.80 {8.4 compatible formatting of doubles} \
-    {expr 1e80} \
+    {expr {1e80}} \
     1e+80
 test util-16.1.17.81 {8.4 compatible formatting of doubles} \
-    {expr 1e81} \
+    {expr {1e81}} \
     9.9999999999999992e+80
 test util-16.1.17.82 {8.4 compatible formatting of doubles} \
-    {expr 1e82} \
+    {expr {1e82}} \
     9.9999999999999996e+81
 test util-16.1.17.83 {8.4 compatible formatting of doubles} \
-    {expr 1e83} \
+    {expr {1e83}} \
     1e+83
 test util-16.1.17.84 {8.4 compatible formatting of doubles} \
-    {expr 1e84} \
+    {expr {1e84}} \
     1.0000000000000001e+84
 test util-16.1.17.85 {8.4 compatible formatting of doubles} \
-    {expr 1e85} \
+    {expr {1e85}} \
     1e+85
 test util-16.1.17.86 {8.4 compatible formatting of doubles} \
-    {expr 1e86} \
+    {expr {1e86}} \
     1e+86
 test util-16.1.17.87 {8.4 compatible formatting of doubles} \
-    {expr 1e87} \
+    {expr {1e87}} \
     9.9999999999999996e+86
 test util-16.1.17.88 {8.4 compatible formatting of doubles} \
-    {expr 1e88} \
+    {expr {1e88}} \
     9.9999999999999996e+87
 test util-16.1.17.89 {8.4 compatible formatting of doubles} \
-    {expr 1e89} \
+    {expr {1e89}} \
     9.9999999999999999e+88
 test util-16.1.17.90 {8.4 compatible formatting of doubles} \
-    {expr 1e90} \
+    {expr {1e90}} \
     9.9999999999999997e+89
 test util-16.1.17.91 {8.4 compatible formatting of doubles} \
-    {expr 1e91} \
+    {expr {1e91}} \
     1.0000000000000001e+91
 test util-16.1.17.92 {8.4 compatible formatting of doubles} \
-    {expr 1e92} \
+    {expr {1e92}} \
     1e+92
 test util-16.1.17.93 {8.4 compatible formatting of doubles} \
-    {expr 1e93} \
+    {expr {1e93}} \
     1e+93
 test util-16.1.17.94 {8.4 compatible formatting of doubles} \
-    {expr 1e94} \
+    {expr {1e94}} \
     1e+94
 test util-16.1.17.95 {8.4 compatible formatting of doubles} \
-    {expr 1e95} \
+    {expr {1e95}} \
     1e+95
 test util-16.1.17.96 {8.4 compatible formatting of doubles} \
-    {expr 1e96} \
+    {expr {1e96}} \
     1e+96
 test util-16.1.17.97 {8.4 compatible formatting of doubles} \
-    {expr 1e97} \
+    {expr {1e97}} \
     1.0000000000000001e+97
 test util-16.1.17.98 {8.4 compatible formatting of doubles} \
-    {expr 1e98} \
+    {expr {1e98}} \
     1e+98
 test util-16.1.17.99 {8.4 compatible formatting of doubles} \
-    {expr 1e99} \
+    {expr {1e99}} \
     9.9999999999999997e+98
 test util-16.1.17.100 {8.4 compatible formatting of doubles} \
-    {expr 1e100} \
+    {expr {1e100}} \
     1e+100
 test util-16.1.17.101 {8.4 compatible formatting of doubles} \
-    {expr 1e101} \
+    {expr {1e101}} \
     9.9999999999999998e+100
 test util-16.1.17.102 {8.4 compatible formatting of doubles} \
-    {expr 1e102} \
+    {expr {1e102}} \
     9.9999999999999998e+101
 test util-16.1.17.103 {8.4 compatible formatting of doubles} \
-    {expr 1e103} \
+    {expr {1e103}} \
     1e+103
 test util-16.1.17.104 {8.4 compatible formatting of doubles} \
-    {expr 1e104} \
+    {expr {1e104}} \
     1e+104
 test util-16.1.17.105 {8.4 compatible formatting of doubles} \
-    {expr 1e105} \
+    {expr {1e105}} \
     9.9999999999999994e+104
 test util-16.1.17.106 {8.4 compatible formatting of doubles} \
-    {expr 1e106} \
+    {expr {1e106}} \
     1.0000000000000001e+106
 test util-16.1.17.107 {8.4 compatible formatting of doubles} \
-    {expr 1e107} \
+    {expr {1e107}} \
     9.9999999999999997e+106
 test util-16.1.17.108 {8.4 compatible formatting of doubles} \
-    {expr 1e108} \
+    {expr {1e108}} \
     1e+108
 test util-16.1.17.109 {8.4 compatible formatting of doubles} \
-    {expr 1e109} \
+    {expr {1e109}} \
     9.9999999999999998e+108
 test util-16.1.17.110 {8.4 compatible formatting of doubles} \
-    {expr 1e110} \
+    {expr {1e110}} \
     1e+110
 test util-16.1.17.111 {8.4 compatible formatting of doubles} \
-    {expr 1e111} \
+    {expr {1e111}} \
     9.9999999999999996e+110
 test util-16.1.17.112 {8.4 compatible formatting of doubles} \
-    {expr 1e112} \
+    {expr {1e112}} \
     9.9999999999999993e+111
 test util-16.1.17.113 {8.4 compatible formatting of doubles} \
-    {expr 1e113} \
+    {expr {1e113}} \
     1e+113
 test util-16.1.17.114 {8.4 compatible formatting of doubles} \
-    {expr 1e114} \
+    {expr {1e114}} \
     1e+114
 test util-16.1.17.115 {8.4 compatible formatting of doubles} \
-    {expr 1e115} \
+    {expr {1e115}} \
     1e+115
 test util-16.1.17.116 {8.4 compatible formatting of doubles} \
-    {expr 1e116} \
+    {expr {1e116}} \
     1e+116
 test util-16.1.17.117 {8.4 compatible formatting of doubles} \
-    {expr 1e117} \
+    {expr {1e117}} \
     1.0000000000000001e+117
 test util-16.1.17.118 {8.4 compatible formatting of doubles} \
-    {expr 1e118} \
+    {expr {1e118}} \
     9.9999999999999997e+117
 test util-16.1.17.119 {8.4 compatible formatting of doubles} \
-    {expr 1e119} \
+    {expr {1e119}} \
     9.9999999999999994e+118
 test util-16.1.17.120 {8.4 compatible formatting of doubles} \
-    {expr 1e120} \
+    {expr {1e120}} \
     9.9999999999999998e+119
 test util-16.1.17.121 {8.4 compatible formatting of doubles} \
-    {expr 1e121} \
+    {expr {1e121}} \
     1e+121
 test util-16.1.17.122 {8.4 compatible formatting of doubles} \
-    {expr 1e122} \
+    {expr {1e122}} \
     1e+122
 test util-16.1.17.123 {8.4 compatible formatting of doubles} \
-    {expr 1e123} \
+    {expr {1e123}} \
     9.9999999999999998e+122
 test util-16.1.17.124 {8.4 compatible formatting of doubles} \
-    {expr 1e124} \
+    {expr {1e124}} \
     9.9999999999999995e+123
 test util-16.1.17.125 {8.4 compatible formatting of doubles} \
-    {expr 1e125} \
+    {expr {1e125}} \
     9.9999999999999992e+124
 test util-16.1.17.126 {8.4 compatible formatting of doubles} \
-    {expr 1e126} \
+    {expr {1e126}} \
     9.9999999999999992e+125
 test util-16.1.17.127 {8.4 compatible formatting of doubles} \
-    {expr 1e127} \
+    {expr {1e127}} \
     9.9999999999999995e+126
 test util-16.1.17.128 {8.4 compatible formatting of doubles} \
-    {expr 1e128} \
+    {expr {1e128}} \
     1.0000000000000001e+128
 test util-16.1.17.129 {8.4 compatible formatting of doubles} \
-    {expr 1e129} \
+    {expr {1e129}} \
     1e+129
 test util-16.1.17.130 {8.4 compatible formatting of doubles} \
-    {expr 1e130} \
+    {expr {1e130}} \
     1.0000000000000001e+130
 test util-16.1.17.131 {8.4 compatible formatting of doubles} \
-    {expr 1e131} \
+    {expr {1e131}} \
     9.9999999999999991e+130
 test util-16.1.17.132 {8.4 compatible formatting of doubles} \
-    {expr 1e132} \
+    {expr {1e132}} \
     9.9999999999999999e+131
 test util-16.1.17.133 {8.4 compatible formatting of doubles} \
-    {expr 1e133} \
+    {expr {1e133}} \
     1e+133
 test util-16.1.17.134 {8.4 compatible formatting of doubles} \
-    {expr 1e134} \
+    {expr {1e134}} \
     9.9999999999999992e+133
 test util-16.1.17.135 {8.4 compatible formatting of doubles} \
-    {expr 1e135} \
+    {expr {1e135}} \
     9.9999999999999996e+134
 test util-16.1.17.136 {8.4 compatible formatting of doubles} \
-    {expr 1e136} \
+    {expr {1e136}} \
     1.0000000000000001e+136
 test util-16.1.17.137 {8.4 compatible formatting of doubles} \
-    {expr 1e137} \
+    {expr {1e137}} \
     1e+137
 test util-16.1.17.138 {8.4 compatible formatting of doubles} \
-    {expr 1e138} \
+    {expr {1e138}} \
     1e+138
 test util-16.1.17.139 {8.4 compatible formatting of doubles} \
-    {expr 1e139} \
+    {expr {1e139}} \
     1e+139
 test util-16.1.17.140 {8.4 compatible formatting of doubles} \
-    {expr 1e140} \
+    {expr {1e140}} \
     1.0000000000000001e+140
 test util-16.1.17.141 {8.4 compatible formatting of doubles} \
-    {expr 1e141} \
+    {expr {1e141}} \
     1e+141
 test util-16.1.17.142 {8.4 compatible formatting of doubles} \
-    {expr 1e142} \
+    {expr {1e142}} \
     1.0000000000000001e+142
 test util-16.1.17.143 {8.4 compatible formatting of doubles} \
-    {expr 1e143} \
+    {expr {1e143}} \
     1e+143
 test util-16.1.17.144 {8.4 compatible formatting of doubles} \
-    {expr 1e144} \
+    {expr {1e144}} \
     1e+144
 test util-16.1.17.145 {8.4 compatible formatting of doubles} \
-    {expr 1e145} \
+    {expr {1e145}} \
     9.9999999999999999e+144
 test util-16.1.17.146 {8.4 compatible formatting of doubles} \
-    {expr 1e146} \
+    {expr {1e146}} \
     9.9999999999999993e+145
 test util-16.1.17.147 {8.4 compatible formatting of doubles} \
-    {expr 1e147} \
+    {expr {1e147}} \
     9.9999999999999998e+146
 test util-16.1.17.148 {8.4 compatible formatting of doubles} \
-    {expr 1e148} \
+    {expr {1e148}} \
     1e+148
 test util-16.1.17.149 {8.4 compatible formatting of doubles} \
-    {expr 1e149} \
+    {expr {1e149}} \
     1e+149
 test util-16.1.17.150 {8.4 compatible formatting of doubles} \
-    {expr 1e150} \
+    {expr {1e150}} \
     9.9999999999999998e+149
 test util-16.1.17.151 {8.4 compatible formatting of doubles} \
-    {expr 1e151} \
+    {expr {1e151}} \
     1e+151
 test util-16.1.17.152 {8.4 compatible formatting of doubles} \
-    {expr 1e152} \
+    {expr {1e152}} \
     1e+152
 test util-16.1.17.153 {8.4 compatible formatting of doubles} \
-    {expr 1e153} \
+    {expr {1e153}} \
     1e+153
 test util-16.1.17.154 {8.4 compatible formatting of doubles} \
-    {expr 1e154} \
+    {expr {1e154}} \
     1e+154
 test util-16.1.17.155 {8.4 compatible formatting of doubles} \
-    {expr 1e155} \
+    {expr {1e155}} \
     1e+155
 test util-16.1.17.156 {8.4 compatible formatting of doubles} \
-    {expr 1e156} \
+    {expr {1e156}} \
     9.9999999999999998e+155
 test util-16.1.17.157 {8.4 compatible formatting of doubles} \
-    {expr 1e157} \
+    {expr {1e157}} \
     9.9999999999999998e+156
 test util-16.1.17.158 {8.4 compatible formatting of doubles} \
-    {expr 1e158} \
+    {expr {1e158}} \
     9.9999999999999995e+157
 test util-16.1.17.159 {8.4 compatible formatting of doubles} \
-    {expr 1e159} \
+    {expr {1e159}} \
     9.9999999999999993e+158
 test util-16.1.17.160 {8.4 compatible formatting of doubles} \
-    {expr 1e160} \
+    {expr {1e160}} \
     1e+160
 test util-16.1.17.161 {8.4 compatible formatting of doubles} \
-    {expr 1e161} \
+    {expr {1e161}} \
     1e+161
 test util-16.1.17.162 {8.4 compatible formatting of doubles} \
-    {expr 1e162} \
+    {expr {1e162}} \
     9.9999999999999994e+161
 test util-16.1.17.163 {8.4 compatible formatting of doubles} \
-    {expr 1e163} \
+    {expr {1e163}} \
     9.9999999999999994e+162
 test util-16.1.17.164 {8.4 compatible formatting of doubles} \
-    {expr 1e164} \
+    {expr {1e164}} \
     1e+164
 test util-16.1.17.165 {8.4 compatible formatting of doubles} \
-    {expr 1e165} \
+    {expr {1e165}} \
     9.999999999999999e+164
 test util-16.1.17.166 {8.4 compatible formatting of doubles} \
-    {expr 1e166} \
+    {expr {1e166}} \
     9.9999999999999994e+165
 test util-16.1.17.167 {8.4 compatible formatting of doubles} \
-    {expr 1e167} \
+    {expr {1e167}} \
     1e+167
 test util-16.1.17.168 {8.4 compatible formatting of doubles} \
-    {expr 1e168} \
+    {expr {1e168}} \
     9.9999999999999993e+167
 test util-16.1.17.169 {8.4 compatible formatting of doubles} \
-    {expr 1e169} \
+    {expr {1e169}} \
     9.9999999999999993e+168
 test util-16.1.17.170 {8.4 compatible formatting of doubles} \
-    {expr 1e170} \
+    {expr {1e170}} \
     1e+170
 test util-16.1.17.171 {8.4 compatible formatting of doubles} \
-    {expr 1e171} \
+    {expr {1e171}} \
     9.9999999999999995e+170
 test util-16.1.17.172 {8.4 compatible formatting of doubles} \
-    {expr 1e172} \
+    {expr {1e172}} \
     1.0000000000000001e+172
 test util-16.1.17.173 {8.4 compatible formatting of doubles} \
-    {expr 1e173} \
+    {expr {1e173}} \
     1e+173
 test util-16.1.17.174 {8.4 compatible formatting of doubles} \
-    {expr 1e174} \
+    {expr {1e174}} \
     1.0000000000000001e+174
 test util-16.1.17.175 {8.4 compatible formatting of doubles} \
-    {expr 1e175} \
+    {expr {1e175}} \
     9.9999999999999994e+174
 test util-16.1.17.176 {8.4 compatible formatting of doubles} \
-    {expr 1e176} \
+    {expr {1e176}} \
     1e+176
 test util-16.1.17.177 {8.4 compatible formatting of doubles} \
-    {expr 1e177} \
+    {expr {1e177}} \
     1e+177
 test util-16.1.17.178 {8.4 compatible formatting of doubles} \
-    {expr 1e178} \
+    {expr {1e178}} \
     1.0000000000000001e+178
 test util-16.1.17.179 {8.4 compatible formatting of doubles} \
-    {expr 1e179} \
+    {expr {1e179}} \
     9.9999999999999998e+178
 test util-16.1.17.180 {8.4 compatible formatting of doubles} \
-    {expr 1e180} \
+    {expr {1e180}} \
     1e+180
 test util-16.1.17.181 {8.4 compatible formatting of doubles} \
-    {expr 1e181} \
+    {expr {1e181}} \
     9.9999999999999992e+180
 test util-16.1.17.182 {8.4 compatible formatting of doubles} \
-    {expr 1e182} \
+    {expr {1e182}} \
     1.0000000000000001e+182
 test util-16.1.17.183 {8.4 compatible formatting of doubles} \
-    {expr 1e183} \
+    {expr {1e183}} \
     9.9999999999999995e+182
 test util-16.1.17.184 {8.4 compatible formatting of doubles} \
-    {expr 1e184} \
+    {expr {1e184}} \
     1e+184
 test util-16.1.17.185 {8.4 compatible formatting of doubles} \
-    {expr 1e185} \
+    {expr {1e185}} \
     9.9999999999999998e+184
 test util-16.1.17.186 {8.4 compatible formatting of doubles} \
-    {expr 1e186} \
+    {expr {1e186}} \
     9.9999999999999998e+185
 test util-16.1.17.187 {8.4 compatible formatting of doubles} \
-    {expr 1e187} \
+    {expr {1e187}} \
     9.9999999999999991e+186
 test util-16.1.17.188 {8.4 compatible formatting of doubles} \
-    {expr 1e188} \
+    {expr {1e188}} \
     1e+188
 test util-16.1.17.189 {8.4 compatible formatting of doubles} \
-    {expr 1e189} \
+    {expr {1e189}} \
     1e+189
 test util-16.1.17.190 {8.4 compatible formatting of doubles} \
-    {expr 1e190} \
+    {expr {1e190}} \
     1.0000000000000001e+190
 test util-16.1.17.191 {8.4 compatible formatting of doubles} \
-    {expr 1e191} \
+    {expr {1e191}} \
     1.0000000000000001e+191
 test util-16.1.17.192 {8.4 compatible formatting of doubles} \
-    {expr 1e192} \
+    {expr {1e192}} \
     1e+192
 test util-16.1.17.193 {8.4 compatible formatting of doubles} \
-    {expr 1e193} \
+    {expr {1e193}} \
     1.0000000000000001e+193
 test util-16.1.17.194 {8.4 compatible formatting of doubles} \
-    {expr 1e194} \
+    {expr {1e194}} \
     9.9999999999999994e+193
 test util-16.1.17.195 {8.4 compatible formatting of doubles} \
-    {expr 1e195} \
+    {expr {1e195}} \
     9.9999999999999998e+194
 test util-16.1.17.196 {8.4 compatible formatting of doubles} \
-    {expr 1e196} \
+    {expr {1e196}} \
     9.9999999999999995e+195
 test util-16.1.17.197 {8.4 compatible formatting of doubles} \
-    {expr 1e197} \
+    {expr {1e197}} \
     9.9999999999999995e+196
 test util-16.1.17.198 {8.4 compatible formatting of doubles} \
-    {expr 1e198} \
+    {expr {1e198}} \
     1e+198
 test util-16.1.17.199 {8.4 compatible formatting of doubles} \
-    {expr 1e199} \
+    {expr {1e199}} \
     1.0000000000000001e+199
 test util-16.1.17.200 {8.4 compatible formatting of doubles} \
-    {expr 1e200} \
+    {expr {1e200}} \
     9.9999999999999997e+199
 test util-16.1.17.201 {8.4 compatible formatting of doubles} \
-    {expr 1e201} \
+    {expr {1e201}} \
     1e+201
 test util-16.1.17.202 {8.4 compatible formatting of doubles} \
-    {expr 1e202} \
+    {expr {1e202}} \
     9.999999999999999e+201
 test util-16.1.17.203 {8.4 compatible formatting of doubles} \
-    {expr 1e203} \
+    {expr {1e203}} \
     9.9999999999999999e+202
 test util-16.1.17.204 {8.4 compatible formatting of doubles} \
-    {expr 1e204} \
+    {expr {1e204}} \
     9.9999999999999999e+203
 test util-16.1.17.205 {8.4 compatible formatting of doubles} \
-    {expr 1e205} \
+    {expr {1e205}} \
     1e+205
 test util-16.1.17.206 {8.4 compatible formatting of doubles} \
-    {expr 1e206} \
+    {expr {1e206}} \
     1e+206
 test util-16.1.17.207 {8.4 compatible formatting of doubles} \
-    {expr 1e207} \
+    {expr {1e207}} \
     1e+207
 test util-16.1.17.208 {8.4 compatible formatting of doubles} \
-    {expr 1e208} \
+    {expr {1e208}} \
     9.9999999999999998e+207
 test util-16.1.17.209 {8.4 compatible formatting of doubles} \
-    {expr 1e209} \
+    {expr {1e209}} \
     1.0000000000000001e+209
 test util-16.1.17.210 {8.4 compatible formatting of doubles} \
-    {expr 1e210} \
+    {expr {1e210}} \
     9.9999999999999993e+209
 test util-16.1.17.211 {8.4 compatible formatting of doubles} \
-    {expr 1e211} \
+    {expr {1e211}} \
     9.9999999999999996e+210
 test util-16.1.17.212 {8.4 compatible formatting of doubles} \
-    {expr 1e212} \
+    {expr {1e212}} \
     9.9999999999999991e+211
 test util-16.1.17.213 {8.4 compatible formatting of doubles} \
-    {expr 1e213} \
+    {expr {1e213}} \
     9.9999999999999998e+212
 test util-16.1.17.214 {8.4 compatible formatting of doubles} \
-    {expr 1e214} \
+    {expr {1e214}} \
     9.9999999999999995e+213
 test util-16.1.17.215 {8.4 compatible formatting of doubles} \
-    {expr 1e215} \
+    {expr {1e215}} \
     9.9999999999999991e+214
 test util-16.1.17.216 {8.4 compatible formatting of doubles} \
-    {expr 1e216} \
+    {expr {1e216}} \
     1e+216
 test util-16.1.17.217 {8.4 compatible formatting of doubles} \
-    {expr 1e217} \
+    {expr {1e217}} \
     9.9999999999999996e+216
 test util-16.1.17.218 {8.4 compatible formatting of doubles} \
-    {expr 1e218} \
+    {expr {1e218}} \
     1.0000000000000001e+218
 test util-16.1.17.219 {8.4 compatible formatting of doubles} \
-    {expr 1e219} \
+    {expr {1e219}} \
     9.9999999999999997e+218
 test util-16.1.17.220 {8.4 compatible formatting of doubles} \
-    {expr 1e220} \
+    {expr {1e220}} \
     1e+220
 test util-16.1.17.221 {8.4 compatible formatting of doubles} \
-    {expr 1e221} \
+    {expr {1e221}} \
     1e+221
 test util-16.1.17.222 {8.4 compatible formatting of doubles} \
-    {expr 1e222} \
+    {expr {1e222}} \
     1e+222
 test util-16.1.17.223 {8.4 compatible formatting of doubles} \
-    {expr 1e223} \
+    {expr {1e223}} \
     1e+223
 test util-16.1.17.224 {8.4 compatible formatting of doubles} \
-    {expr 1e224} \
+    {expr {1e224}} \
     9.9999999999999997e+223
 test util-16.1.17.225 {8.4 compatible formatting of doubles} \
-    {expr 1e225} \
+    {expr {1e225}} \
     9.9999999999999993e+224
 test util-16.1.17.226 {8.4 compatible formatting of doubles} \
-    {expr 1e226} \
+    {expr {1e226}} \
     9.9999999999999996e+225
 test util-16.1.17.227 {8.4 compatible formatting of doubles} \
-    {expr 1e227} \
+    {expr {1e227}} \
     1.0000000000000001e+227
 test util-16.1.17.228 {8.4 compatible formatting of doubles} \
-    {expr 1e228} \
+    {expr {1e228}} \
     9.9999999999999992e+227
 test util-16.1.17.229 {8.4 compatible formatting of doubles} \
-    {expr 1e229} \
+    {expr {1e229}} \
     9.9999999999999999e+228
 test util-16.1.17.230 {8.4 compatible formatting of doubles} \
-    {expr 1e230} \
+    {expr {1e230}} \
     1.0000000000000001e+230
 test util-16.1.17.231 {8.4 compatible formatting of doubles} \
-    {expr 1e231} \
+    {expr {1e231}} \
     1.0000000000000001e+231
 test util-16.1.17.232 {8.4 compatible formatting of doubles} \
-    {expr 1e232} \
+    {expr {1e232}} \
     1.0000000000000001e+232
 test util-16.1.17.233 {8.4 compatible formatting of doubles} \
-    {expr 1e233} \
+    {expr {1e233}} \
     9.9999999999999997e+232
 test util-16.1.17.234 {8.4 compatible formatting of doubles} \
-    {expr 1e234} \
+    {expr {1e234}} \
     1e+234
 test util-16.1.17.235 {8.4 compatible formatting of doubles} \
-    {expr 1e235} \
+    {expr {1e235}} \
     1.0000000000000001e+235
 test util-16.1.17.236 {8.4 compatible formatting of doubles} \
-    {expr 1e236} \
+    {expr {1e236}} \
     1.0000000000000001e+236
 test util-16.1.17.237 {8.4 compatible formatting of doubles} \
-    {expr 1e237} \
+    {expr {1e237}} \
     9.9999999999999994e+236
 test util-16.1.17.238 {8.4 compatible formatting of doubles} \
-    {expr 1e238} \
+    {expr {1e238}} \
     1e+238
 test util-16.1.17.239 {8.4 compatible formatting of doubles} \
-    {expr 1e239} \
+    {expr {1e239}} \
     9.9999999999999999e+238
 test util-16.1.17.240 {8.4 compatible formatting of doubles} \
-    {expr 1e240} \
+    {expr {1e240}} \
     1e+240
 test util-16.1.17.241 {8.4 compatible formatting of doubles} \
-    {expr 1e241} \
+    {expr {1e241}} \
     1.0000000000000001e+241
 test util-16.1.17.242 {8.4 compatible formatting of doubles} \
-    {expr 1e242} \
+    {expr {1e242}} \
     1.0000000000000001e+242
 test util-16.1.17.243 {8.4 compatible formatting of doubles} \
-    {expr 1e243} \
+    {expr {1e243}} \
     1.0000000000000001e+243
 test util-16.1.17.244 {8.4 compatible formatting of doubles} \
-    {expr 1e244} \
+    {expr {1e244}} \
     1.0000000000000001e+244
 test util-16.1.17.245 {8.4 compatible formatting of doubles} \
-    {expr 1e245} \
+    {expr {1e245}} \
     1e+245
 test util-16.1.17.246 {8.4 compatible formatting of doubles} \
-    {expr 1e246} \
+    {expr {1e246}} \
     1.0000000000000001e+246
 test util-16.1.17.247 {8.4 compatible formatting of doubles} \
-    {expr 1e247} \
+    {expr {1e247}} \
     9.9999999999999995e+246
 test util-16.1.17.248 {8.4 compatible formatting of doubles} \
-    {expr 1e248} \
+    {expr {1e248}} \
     1e+248
 test util-16.1.17.249 {8.4 compatible formatting of doubles} \
-    {expr 1e249} \
+    {expr {1e249}} \
     9.9999999999999992e+248
 test util-16.1.17.250 {8.4 compatible formatting of doubles} \
-    {expr 1e250} \
+    {expr {1e250}} \
     9.9999999999999992e+249
 test util-16.1.17.251 {8.4 compatible formatting of doubles} \
-    {expr 1e251} \
+    {expr {1e251}} \
     1e+251
 test util-16.1.17.252 {8.4 compatible formatting of doubles} \
-    {expr 1e252} \
+    {expr {1e252}} \
     1.0000000000000001e+252
 test util-16.1.17.253 {8.4 compatible formatting of doubles} \
-    {expr 1e253} \
+    {expr {1e253}} \
     9.9999999999999994e+252
 test util-16.1.17.254 {8.4 compatible formatting of doubles} \
-    {expr 1e254} \
+    {expr {1e254}} \
     9.9999999999999994e+253
 test util-16.1.17.255 {8.4 compatible formatting of doubles} \
-    {expr 1e255} \
+    {expr {1e255}} \
     9.9999999999999999e+254
 test util-16.1.17.256 {8.4 compatible formatting of doubles} \
-    {expr 1e256} \
+    {expr {1e256}} \
     1e+256
 test util-16.1.17.257 {8.4 compatible formatting of doubles} \
-    {expr 1e257} \
+    {expr {1e257}} \
     1e+257
 test util-16.1.17.258 {8.4 compatible formatting of doubles} \
-    {expr 1e258} \
+    {expr {1e258}} \
     1.0000000000000001e+258
 test util-16.1.17.259 {8.4 compatible formatting of doubles} \
-    {expr 1e259} \
+    {expr {1e259}} \
     9.9999999999999993e+258
 test util-16.1.17.260 {8.4 compatible formatting of doubles} \
-    {expr 1e260} \
+    {expr {1e260}} \
     1.0000000000000001e+260
 test util-16.1.17.261 {8.4 compatible formatting of doubles} \
-    {expr 1e261} \
+    {expr {1e261}} \
     9.9999999999999993e+260
 test util-16.1.17.262 {8.4 compatible formatting of doubles} \
-    {expr 1e262} \
+    {expr {1e262}} \
     1e+262
 test util-16.1.17.263 {8.4 compatible formatting of doubles} \
-    {expr 1e263} \
+    {expr {1e263}} \
     1e+263
 test util-16.1.17.264 {8.4 compatible formatting of doubles} \
-    {expr 1e264} \
+    {expr {1e264}} \
     1e+264
 test util-16.1.17.265 {8.4 compatible formatting of doubles} \
-    {expr 1e265} \
+    {expr {1e265}} \
     1.0000000000000001e+265
 test util-16.1.17.266 {8.4 compatible formatting of doubles} \
-    {expr 1e266} \
+    {expr {1e266}} \
     1e+266
 test util-16.1.17.267 {8.4 compatible formatting of doubles} \
-    {expr 1e267} \
+    {expr {1e267}} \
     9.9999999999999997e+266
 test util-16.1.17.268 {8.4 compatible formatting of doubles} \
-    {expr 1e268} \
+    {expr {1e268}} \
     9.9999999999999997e+267
 test util-16.1.17.269 {8.4 compatible formatting of doubles} \
-    {expr 1e269} \
+    {expr {1e269}} \
     1e+269
 test util-16.1.17.270 {8.4 compatible formatting of doubles} \
-    {expr 1e270} \
+    {expr {1e270}} \
     1e+270
 test util-16.1.17.271 {8.4 compatible formatting of doubles} \
-    {expr 1e271} \
+    {expr {1e271}} \
     9.9999999999999995e+270
 test util-16.1.17.272 {8.4 compatible formatting of doubles} \
-    {expr 1e272} \
+    {expr {1e272}} \
     1.0000000000000001e+272
 test util-16.1.17.273 {8.4 compatible formatting of doubles} \
-    {expr 1e273} \
+    {expr {1e273}} \
     9.9999999999999995e+272
 test util-16.1.17.274 {8.4 compatible formatting of doubles} \
-    {expr 1e274} \
+    {expr {1e274}} \
     9.9999999999999992e+273
 test util-16.1.17.275 {8.4 compatible formatting of doubles} \
-    {expr 1e275} \
+    {expr {1e275}} \
     9.9999999999999996e+274
 test util-16.1.17.276 {8.4 compatible formatting of doubles} \
-    {expr 1e276} \
+    {expr {1e276}} \
     1.0000000000000001e+276
 test util-16.1.17.277 {8.4 compatible formatting of doubles} \
-    {expr 1e277} \
+    {expr {1e277}} \
     1e+277
 test util-16.1.17.278 {8.4 compatible formatting of doubles} \
-    {expr 1e278} \
+    {expr {1e278}} \
     9.9999999999999996e+277
 test util-16.1.17.279 {8.4 compatible formatting of doubles} \
-    {expr 1e279} \
+    {expr {1e279}} \
     1.0000000000000001e+279
 test util-16.1.17.280 {8.4 compatible formatting of doubles} \
-    {expr 1e280} \
+    {expr {1e280}} \
     1e+280
 test util-16.1.17.281 {8.4 compatible formatting of doubles} \
-    {expr 1e281} \
+    {expr {1e281}} \
     1e+281
 test util-16.1.17.282 {8.4 compatible formatting of doubles} \
-    {expr 1e282} \
+    {expr {1e282}} \
     1e+282
 test util-16.1.17.283 {8.4 compatible formatting of doubles} \
-    {expr 1e283} \
+    {expr {1e283}} \
     9.9999999999999996e+282
 test util-16.1.17.284 {8.4 compatible formatting of doubles} \
-    {expr 1e284} \
+    {expr {1e284}} \
     1.0000000000000001e+284
 test util-16.1.17.285 {8.4 compatible formatting of doubles} \
-    {expr 1e285} \
+    {expr {1e285}} \
     9.9999999999999998e+284
 test util-16.1.17.286 {8.4 compatible formatting of doubles} \
-    {expr 1e286} \
+    {expr {1e286}} \
     1e+286
 test util-16.1.17.287 {8.4 compatible formatting of doubles} \
-    {expr 1e287} \
+    {expr {1e287}} \
     1.0000000000000001e+287
 test util-16.1.17.288 {8.4 compatible formatting of doubles} \
-    {expr 1e288} \
+    {expr {1e288}} \
     1e+288
 test util-16.1.17.289 {8.4 compatible formatting of doubles} \
-    {expr 1e289} \
+    {expr {1e289}} \
     1.0000000000000001e+289
 test util-16.1.17.290 {8.4 compatible formatting of doubles} \
-    {expr 1e290} \
+    {expr {1e290}} \
     1.0000000000000001e+290
 test util-16.1.17.291 {8.4 compatible formatting of doubles} \
-    {expr 1e291} \
+    {expr {1e291}} \
     9.9999999999999996e+290
 test util-16.1.17.292 {8.4 compatible formatting of doubles} \
-    {expr 1e292} \
+    {expr {1e292}} \
     1e+292
 test util-16.1.17.293 {8.4 compatible formatting of doubles} \
-    {expr 1e293} \
+    {expr {1e293}} \
     9.9999999999999992e+292
 test util-16.1.17.294 {8.4 compatible formatting of doubles} \
-    {expr 1e294} \
+    {expr {1e294}} \
     1.0000000000000001e+294
 test util-16.1.17.295 {8.4 compatible formatting of doubles} \
-    {expr 1e295} \
+    {expr {1e295}} \
     9.9999999999999998e+294
 test util-16.1.17.296 {8.4 compatible formatting of doubles} \
-    {expr 1e296} \
+    {expr {1e296}} \
     9.9999999999999998e+295
 test util-16.1.17.297 {8.4 compatible formatting of doubles} \
-    {expr 1e297} \
+    {expr {1e297}} \
     1e+297
 test util-16.1.17.298 {8.4 compatible formatting of doubles} \
-    {expr 1e298} \
+    {expr {1e298}} \
     9.9999999999999996e+297
 test util-16.1.17.299 {8.4 compatible formatting of doubles} \
-    {expr 1e299} \
+    {expr {1e299}} \
     1.0000000000000001e+299
 test util-16.1.17.300 {8.4 compatible formatting of doubles} \
-    {expr 1e300} \
+    {expr {1e300}} \
     1.0000000000000001e+300
 test util-16.1.17.301 {8.4 compatible formatting of doubles} \
-    {expr 1e301} \
+    {expr {1e301}} \
     1.0000000000000001e+301
 test util-16.1.17.302 {8.4 compatible formatting of doubles} \
-    {expr 1e302} \
+    {expr {1e302}} \
     1.0000000000000001e+302
 test util-16.1.17.303 {8.4 compatible formatting of doubles} \
-    {expr 1e303} \
+    {expr {1e303}} \
     1e+303
 test util-16.1.17.304 {8.4 compatible formatting of doubles} \
-    {expr 1e304} \
+    {expr {1e304}} \
     9.9999999999999994e+303
 test util-16.1.17.305 {8.4 compatible formatting of doubles} \
-    {expr 1e305} \
+    {expr {1e305}} \
     9.9999999999999994e+304
 test util-16.1.17.306 {8.4 compatible formatting of doubles} \
-    {expr 1e306} \
+    {expr {1e306}} \
     1e+306
 test util-16.1.17.307 {8.4 compatible formatting of doubles} \
-    {expr 1e307} \
+    {expr {1e307}} \
     9.9999999999999999e+306
 
 test util-17.1 {bankers' rounding [Bug 3349507]} {ieeeFloatingPoint} {
@@ -4043,9 +4043,9 @@ test util-17.1 {bankers' rounding [Bug 3349507]} {ieeeFloatingPoint} {
 	0x1fffffffffffff000
 	0x1fffffffffffff800
     } {
-	binary scan [binary format q [expr double($input)]] wu x
+	binary scan [binary format q [expr {double($input)}]] wu x
 	lappend r [format %#llx $x]
-	binary scan [binary format q [expr double(-$input)]] wu x
+	binary scan [binary format q [expr {double(-$input)}]] wu x
 	lappend r [format %#llx $x]
     }
     set r
-- 
cgit v0.12