diff options
author | das <das@noemail.net> | 2002-08-31 06:09:45 (GMT) |
---|---|---|
committer | das <das@noemail.net> | 2002-08-31 06:09:45 (GMT) |
commit | d50c1eda5fc1d5e85db3f3a7903ef5d8a17dc477 (patch) | |
tree | a04dce9b4970c608d3bd9a81f627bd20b9081064 /library/auto.tcl | |
parent | 006f057117e46efad80611958a7ba5671adcfb0b (diff) | |
download | tcl-d50c1eda5fc1d5e85db3f3a7903ef5d8a17dc477.zip tcl-d50c1eda5fc1d5e85db3f3a7903ef5d8a17dc477.tar.gz tcl-d50c1eda5fc1d5e85db3f3a7903ef5d8a17dc477.tar.bz2 |
*** macosx-8-4-branch merged into the mainline [tcl patch #602770] ***macosx-8-4-merge-2002-08-31-trunk
* generic/tcl.decls: added new macosx specific entry to stubs table.
* tools/genStubs.tcl: added generation of platform guards for
macosx. This is a little more complex than it seems, because MacOS
X IS "unix" plus a little bit, for the purposes of Tcl. BUT
unfortunately, Tk uses "unix" to mean X11. So added platform keys
for macosx (the little added to "unix"), "aqua" and "x11" to
distinguish these for Tk.
* generic/tcl.h: added a #ifnded RESOURCE_INCLUDED so that tcl.h
can be passed to the resource compiler.
* generic/tcl.h:
* generic/tclNotify.c: added a few Notifier procs, to be able to
modify more bits of the Tcl notifier dynamically. Required to get
Mac OS X Tk to live on top of the Tcl Unix threaded notifier.
Changes the size of the Tcl_NotifierProcs structure, but doesn't
move any elements around.
* unix/tclUnixNotfy.c: moved the call to Tcl_ConditionNotify till
AFTER we are done mucking with the pointer swap. Fixes cases where
the thread waiting on the condition wakes & accesses the
waitingListPtr before it gets reset, causing a hang.
* library/auto.tcl (tcl_findLibrary): added checking the
directories in the tcl_pkgPath for library files on macosx to
enable support of the standard Mac OSX library locations
* unix/Makefile.in:
* unix/configure.in:
* unix/tcl.m4: added MAC_OSX_DIR. Added PLAT_OBJS to the OBJS:
there are some MacOS X specific files now for Tcl, and when I get
he resource & applescript stuff ported over, and restore support
for FindFiles, etc, there will be a few more.
Added LD_LIBRARY_PATH_VAR configure variable to avoid having to set
all possible LD_LIBRARY_PATH analogues on all platforms.
LD_LIBRARY_PATH_VAR is "LD_LIBRARY_PATH" by default, "LIBPATH" on
AIX, "SHLIB_PATH" on HPUX and "DYLD_LIBRARY_PATH" on Mac OSX.
Added configure option to package Tcl as a framework on Mac OSX.
* macosx/tclMacOSXBundle.c (new): support for finding Tcl extension
packaged as 'bundles' in the standard Mac OSX library locations.
* unix/tclUnixInit.c: added support for findig the tcl script
library inside Tcl packaged as a framework on Mac OSX.
* macosx/Tcl.pbproj/jingham.pbxuser (new):
* macosx/Tcl.pbproj/project.pbxproj (new): project for Apple's
ProjectBuilder IDE.
* macosx/Makefile (new): simple makefile for building the project
from the command line via the ProjectBuilder tool 'pbxbuild'.
* unix/configure:
* generic/tclStubInit.c:
* generic/tclPlatDecls.h: regen
FossilOrigin-Name: ac07f034c74f71777e9da22338ccbace40e9984a
Diffstat (limited to 'library/auto.tcl')
-rw-r--r-- | library/auto.tcl | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/library/auto.tcl b/library/auto.tcl index 296764f..b023f59 100644 --- a/library/auto.tcl +++ b/library/auto.tcl @@ -3,7 +3,7 @@ # utility procs formerly in init.tcl dealing with auto execution # of commands and can be auto loaded themselves. # -# RCS: @(#) $Id: auto.tcl,v 1.9 2002/07/03 19:40:31 dgp Exp $ +# RCS: @(#) $Id: auto.tcl,v 1.10 2002/08/31 06:09:45 das Exp $ # # Copyright (c) 1991-1993 The Regents of the University of California. # Copyright (c) 1994-1998 Sun Microsystems, Inc. @@ -97,6 +97,14 @@ proc tcl_findLibrary {basename version patch initScript enVarName varName} { lappend dirs [file join $grandParentDir $basename$patch library] lappend dirs [file join [file dirname $grandParentDir] \ $basename$patch library] + + # 4. On MacOSX, check the directories in the tcl_pkgPath + if {[string equal $::tcl_platform(platform) "unix"] && \ + [string equal $::tcl_platform(os) "Darwin"]} { + foreach d $::tcl_pkgPath { + lappend dirs [file join $d $basename$version] + } + } } foreach i $dirs { set the_library $i |