Tcl Source Code

Check-in [f55d921665]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:[86ceb4e2b6] Improve reaction when multiple *tm files purport to offer the same version of the same package. Prefer the file that comes first on the tm path. Makes TCL*_TM_PATH variables more useful. Thanks to Gustaf Neumann for the suggestion.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-5-branch
Files: files | file ages | folders
SHA1: f55d92166541ec1ea50e3c705ccb0f265f692d0a
User & Date: dgp 2013-09-07 21:36:37
Context
2013-09-13
14:09
[bdd91c7e43] Stop crash due to error in execution stack memory management. Thanks to azazel for the ... check-in: f26faa61b9 user: dgp tags: core-8-5-branch
10:53
Suggested fix for [bdd91c7e43]: tclsh crashes in [interp delete] Closed-Leaf check-in: c910b7341a user: jan.nijtmans tags: bug-bdd91c7e43
2013-09-08
14:59
*BACKPORT* [3600057]: Filled out missing parts of implementation of [string is double].

DGP - I'm... Closed-Leaf check-in: 2759df9850 user: dkf tags: bug-3600057-85

03:26
merge 8.5. update changes. check-in: 6a7083949d user: dgp tags: core-8-5-15-rc
2013-09-07
22:19
[86ceb4e2b6] Improve reaction when multiple *tm files purport to offer the same version of the same ... check-in: d041733320 user: dgp tags: trunk
21:36
[86ceb4e2b6] Improve reaction when multiple *tm files purport to offer the same version of the same ... check-in: f55d921665 user: dgp tags: core-8-5-branch
21:19
merge trunk Closed-Leaf check-in: b4df43a7b3 user: dgp tags: bug-86ceb4e2b6
18:49
Partial revert of [a16752c252] bug fix to stop crashes in buggy tclcompiler. check-in: d7ad86353f user: dgp tags: core-8-5-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to library/tm.tcl.

243
244
245
246
247
248
249









250
251
252
253
254
255
256
			continue
		    }
		    if {[catch {package vcompare $pkgversion 0}]} {
			# Ignore everything where the version part is
			# not acceptable to "package vcompare".
			continue
		    }










		    # We have found a candidate, generate a "provide
		    # script" for it, and remember it.  Note that we
		    # are using ::list to do this; locally [list]
		    # means something else without the namespace
		    # specifier.








>
>
>
>
>
>
>
>
>







243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
			continue
		    }
		    if {[catch {package vcompare $pkgversion 0}]} {
			# Ignore everything where the version part is
			# not acceptable to "package vcompare".
			continue
		    }

		    if {[package ifneeded $pkgname $pkgversion] ne {}} {
			# There's already a provide script registered for
			# this version of this package.  Since all units of
			# code claiming to be the same version of the same
			# package ought to be identical, just stick with
			# the one we already have.
			continue
		    }

		    # We have found a candidate, generate a "provide
		    # script" for it, and remember it.  Note that we
		    # are using ::list to do this; locally [list]
		    # means something else without the namespace
		    # specifier.