* README:

	* generic/tcl.h:
	* library/init.tcl:
	* library/reg1.0/pkgIndex.tcl:
	* library/tcltest1.0/tcltest.tcl:
	* mac/README:
	* tools/tcl.hpj.in:
	* tools/tcl.wse.in:
	* unix/README:
	* unix/configure.in:
	* unix/tcl.spec:
	* win/README:
	* win/README.binary:
	* win/configure.in:
	* win/makefile.vc:
	* win/tcl.m4: updated patchlevel to 8.4a1

5 files changed, 12 insertions, 12 deletions

diff --git a/library/init.tcl b/library/init.tcl
index 0b3d546..941c5d6 100644
--- a/library/init.tcl
+++ b/library/init.tcl
@@ -3,7 +3,7 @@
 # Default system startup file for Tcl-based applications.  Defines
 # "unknown" procedure and auto-load facilities.
 #
-# RCS: @(#) $Id: init.tcl,v 1.39 2000/02/01 19:26:08 ericm Exp $
+# RCS: @(#) $Id: init.tcl,v 1.40 2000/05/03 00:15:06 hobbs Exp $
 #
 # Copyright (c) 1991-1993 The Regents of the University of California.
 # Copyright (c) 1994-1996 Sun Microsystems, Inc.
@@ -16,7 +16,7 @@
 if {[info commands package] == ""} {
     error "version mismatch: library\nscripts expect Tcl version 7.5b1 or later but the loaded version is\nonly [info patchlevel]"
 }
-package require -exact Tcl 8.3
+package require -exact Tcl 8.4
 
 # Compute the auto path to use in this interpreter.
 # The values on the path come from several locations:
diff --git a/library/reg/pkgIndex.tcl b/library/reg/pkgIndex.tcl
index d3e39dd..b32c71b 100755
--- a/library/reg/pkgIndex.tcl
+++ b/library/reg/pkgIndex.tcl
@@ -1,7 +1,7 @@
 if {[info exists tcl_platform(debug)]} {
     package ifneeded registry 1.0 \
-            [list load [file join $dir tclreg83d.dll] registry]
+            [list load [file join $dir tclreg84d.dll] registry]
 } else {
     package ifneeded registry 1.0 \
-            [list load [file join $dir tclreg83.dll] registry]
+            [list load [file join $dir tclreg84.dll] registry]
 }
diff --git a/library/reg1.0/pkgIndex.tcl b/library/reg1.0/pkgIndex.tcl
index d3e39dd..b32c71b 100755
--- a/library/reg1.0/pkgIndex.tcl
+++ b/library/reg1.0/pkgIndex.tcl
@@ -1,7 +1,7 @@
 if {[info exists tcl_platform(debug)]} {
     package ifneeded registry 1.0 \
-            [list load [file join $dir tclreg83d.dll] registry]
+            [list load [file join $dir tclreg84d.dll] registry]
 } else {
     package ifneeded registry 1.0 \
-            [list load [file join $dir tclreg83.dll] registry]
+            [list load [file join $dir tclreg84.dll] registry]
 }
diff --git a/library/tcltest/tcltest.tcl b/library/tcltest/tcltest.tcl
index 5898cf6..8a56371 100644
--- a/library/tcltest/tcltest.tcl
+++ b/library/tcltest/tcltest.tcl
@@ -12,7 +12,7 @@
 # Copyright (c) 1998-1999 by Scriptics Corporation.
 # All rights reserved.
 # 
-# RCS: @(#) $Id: tcltest.tcl,v 1.24 2000/04/11 01:04:19 welch Exp $
+# RCS: @(#) $Id: tcltest.tcl,v 1.25 2000/05/03 00:15:07 hobbs Exp $
 
 package provide tcltest 1.0
 
@@ -267,10 +267,10 @@ namespace eval tcltest {
 
     # Tcl version numbers
     if {![info exists version]} {
-	variable version 8.3
+	variable version 8.4
     }
     if {![info exists patchLevel]} {
-	variable patchLevel 8.3.0
+	variable patchLevel 8.4a1
     }
 }   
 
diff --git a/library/tcltest1.0/tcltest.tcl b/library/tcltest1.0/tcltest.tcl
index 5898cf6..8a56371 100644
--- a/library/tcltest1.0/tcltest.tcl
+++ b/library/tcltest1.0/tcltest.tcl
@@ -12,7 +12,7 @@
 # Copyright (c) 1998-1999 by Scriptics Corporation.
 # All rights reserved.
 # 
-# RCS: @(#) $Id: tcltest.tcl,v 1.24 2000/04/11 01:04:19 welch Exp $
+# RCS: @(#) $Id: tcltest.tcl,v 1.25 2000/05/03 00:15:07 hobbs Exp $
 
 package provide tcltest 1.0
 
@@ -267,10 +267,10 @@ namespace eval tcltest {
 
     # Tcl version numbers
     if {![info exists version]} {
-	variable version 8.3
+	variable version 8.4
     }
     if {![info exists patchLevel]} {
-	variable patchLevel 8.3.0
+	variable patchLevel 8.4a1
     }
 }