* tests/unixNotfy.test (1.1,2): Update error message whitespace to

        match changes in code.

        * tests/expr-old.test (expr-32.52):     Use int(.) to restrict
        result of left shift to the C long range.

1 files changed, 2 insertions, 2 deletions

diff --git a/tests/expr-old.test b/tests/expr-old.test
index 86c7e5a..971ea05 100644
--- a/tests/expr-old.test
+++ b/tests/expr-old.test
@@ -13,7 +13,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: expr-old.test,v 1.29 2005/10/21 20:44:17 dgp Exp $
+# RCS: @(#) $Id: expr-old.test,v 1.30 2005/11/01 16:41:20 dgp Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest 2.1
@@ -875,7 +875,7 @@ test expr-old-32.51 {math functions in expressions} knownBug {
     list [catch {expr {srand([lindex "6ty" 0])}} msg] $msg
 } {1 {argument to math function didn't have numeric value}}
 test expr-old-32.52 {math functions in expressions} {
-    expr {srand(1<<37) < 1}
+    expr {srand(int(1<<37)) < 1}
 } {1}
 test expr-old-32.53 {math functions in expressions} {
     expr {srand((1<<31) - 1) > 0}