Accepting request 247812 from devel:languages:tcl
- avoid %nil to pass download_files service
- Update license tag to SPDX 1.2.
- Update to 8.6.2:
* TIP 429: New command [string cat].
* [lsearch -integer], [lsort -integer] operate on wide ints.
*** POTENTIAL INCOMPATIBILITY ***
* [dict replace], [dict remove] return canonical dicts.
*** POTENTIAL INCOMPATIBILITY ***
* Improved ::env synchronization with environment.
* transchans converted blocked writes to errors.
* [info class subclasses ::oo::object] includes ::oo::class .
* Fix: [chan configure -error] breaks [socket -async] connection.
* Better handle NUL in filenames.
* Fix: failures in nested ensemble bytecode compiler.
* Fixed crashes in...
- [apply {{} {while 1 {a {*}
[return -level 0 -code continue]}}}]
- [apply {{} {namespace upvar a b [x]}}]
- [coroutine X coroutine Y info frame]
- multi-interp font teardown
- oo chain deletion
* Plugged memory leaks in...
- execution traced coroutine deletion
- [close [zlib push ... -dictionary ...]]
- AtForkChild()
- managing oo instance lists
* Performance addressed in...
- [lappend l $multiple $arg] compile: quadratic -> linear
OBS-URL: https://build.opensuse.org/request/show/247812
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/tcl?expand=0&rev=44
This commit is contained in:
Stephan Kulow
Git OBS Bridge
commit
fff9cc1962
@ -1,24 +0,0 @@
|
||||
--- generic/tclLoad.c.orig
|
||||
+++ generic/tclLoad.c
|
||||
@@ -795,9 +795,7 @@ Tcl_UnloadObjCmd(
|
||||
|
||||
if (unLoadProcPtr != NULL) {
|
||||
Tcl_MutexLock(&packageMutex);
|
||||
- if ((pkgPtr->unloadProc != NULL) || (unLoadProcPtr == TclFSUnloadTempFile)) {
|
||||
- (*unLoadProcPtr)(pkgPtr->loadHandle);
|
||||
- }
|
||||
+ (*unLoadProcPtr)(pkgPtr->loadHandle);
|
||||
|
||||
/*
|
||||
* Remove this library from the loaded library cache.
|
||||
@@ -1154,9 +1152,7 @@ TclFinalizeLoad(void)
|
||||
|
||||
if (pkgPtr->fileName[0] != '\0') {
|
||||
Tcl_FSUnloadFileProc *unLoadProcPtr = pkgPtr->unLoadProcPtr;
|
||||
- if ((unLoadProcPtr != NULL)
|
||||
- && ((pkgPtr->unloadProc != NULL)
|
||||
- || (unLoadProcPtr == TclFSUnloadTempFile))) {
|
||||
+ if (unLoadProcPtr != NULL) {
|
||||
(*unLoadProcPtr)(pkgPtr->loadHandle);
|
||||
}
|
||||
}
|
||||
58
tcl.changes
58
tcl.changes
@ -1,3 +1,61 @@
|
||||
-------------------------------------------------------------------
|
||||
Sat Sep 6 10:23:13 UTC 2014 - coolo@suse.de
|
||||
|
||||
- avoid %nil to pass download_files service
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Mon Sep 1 07:45:22 UTC 2014 - fcrozat@suse.com
|
||||
|
||||
- Update license tag to SPDX 1.2.
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Thu Aug 28 14:24:16 UTC 2014 - vwallfahrer@suse.com
|
||||
|
||||
- Update to 8.6.2:
|
||||
* TIP 429: New command [string cat].
|
||||
* [lsearch -integer], [lsort -integer] operate on wide ints.
|
||||
*** POTENTIAL INCOMPATIBILITY ***
|
||||
* [dict replace], [dict remove] return canonical dicts.
|
||||
*** POTENTIAL INCOMPATIBILITY ***
|
||||
* Improved ::env synchronization with environment.
|
||||
* transchans converted blocked writes to errors.
|
||||
* [info class subclasses ::oo::object] includes ::oo::class .
|
||||
* Fix: [chan configure -error] breaks [socket -async] connection.
|
||||
* Better handle NUL in filenames.
|
||||
* Fix: failures in nested ensemble bytecode compiler.
|
||||
* Fixed crashes in...
|
||||
- [apply {{} {while 1 {a {*}
|
||||
[return -level 0 -code continue]}}}]
|
||||
- [apply {{} {namespace upvar a b [x]}}]
|
||||
- [coroutine X coroutine Y info frame]
|
||||
- multi-interp font teardown
|
||||
- oo chain deletion
|
||||
* Plugged memory leaks in...
|
||||
- execution traced coroutine deletion
|
||||
- [close [zlib push ... -dictionary ...]]
|
||||
- AtForkChild()
|
||||
- managing oo instance lists
|
||||
* Performance addressed in...
|
||||
- [lappend l $multiple $arg] compile: quadratic -> linear
|
||||
- binary [chan copy]: move bytes instead of copy
|
||||
- Improved bytecode: [catch], [foreach], [lmap],
|
||||
num. conversion
|
||||
* Bytecode compiled: [concat], [linsert], [namespace origin],
|
||||
[next], [nextto], [string is], [string replace],
|
||||
[string tolower], [string totitle], [string toupper],
|
||||
[string trim], [string trimleft],
|
||||
[string trimright] [yieldto]
|
||||
* New package releases:
|
||||
http 2.8.8: Accept upper case schemes in URLs
|
||||
tcltest 2.3.7: cleanup runs before output comparisons
|
||||
platform 1.0.13: Update macosx-* variant compatibilities
|
||||
TclOO 1.0.2
|
||||
itcl 4.0.1
|
||||
thread 2.7.1
|
||||
sqlite3 3.8.6
|
||||
tdbc* 1.0.1
|
||||
- removed tcl-unload.patch and tcl.patch
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Fri Sep 20 07:53:52 UTC 2013 - max@suse.com
|
||||
|
||||
|
||||
32
tcl.patch
32
tcl.patch
@ -1,32 +0,0 @@
|
||||
Index: tcl8.5.2/library/init.tcl
|
||||
===================================================================
|
||||
--- library/init.tcl
|
||||
+++ library/init.tcl
|
||||
@@ -53,11 +53,6 @@ namespace eval tcl {
|
||||
lappend ::auto_path $Dir
|
||||
}
|
||||
}
|
||||
- set Dir [file join [file dirname [file dirname \
|
||||
- [info nameofexecutable]]] lib]
|
||||
- if {$Dir ni $::auto_path} {
|
||||
- lappend ::auto_path $Dir
|
||||
- }
|
||||
catch {
|
||||
foreach Dir $::tcl_pkgPath {
|
||||
if {$Dir ni $::auto_path} {
|
||||
Index: tcl8.5.2/library/tm.tcl
|
||||
===================================================================
|
||||
--- library/tm.tcl
|
||||
+++ library/tm.tcl
|
||||
@@ -310,10 +310,7 @@ proc ::tcl::tm::Defaults {} {
|
||||
|
||||
# Note that we're using [::list], not [list] because [list] means
|
||||
# something other than [::list] in this namespace.
|
||||
- roots [::list \
|
||||
- [file dirname [info library]] \
|
||||
- [file join [file dirname [file dirname $exe]] lib] \
|
||||
- ]
|
||||
+ roots [lreverse $::tcl_pkgPath]
|
||||
|
||||
if {$tcl_platform(platform) eq "windows"} {
|
||||
set sep ";"
|
||||
10
tcl.spec
10
tcl.spec
@ -1,7 +1,7 @@
|
||||
#
|
||||
# spec file for package tcl
|
||||
#
|
||||
# Copyright (c) 2013 SUSE LINUX Products GmbH, Nuernberg, Germany.
|
||||
# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany.
|
||||
#
|
||||
# All modifications and additions to the file contributed by third parties
|
||||
# remain the property of their copyright owners, unless otherwise agreed
|
||||
@ -18,13 +18,13 @@
|
||||
|
||||
Name: tcl
|
||||
Url: http://www.tcl.tk
|
||||
Version: 8.6.1
|
||||
Version: 8.6.2
|
||||
Release: 0
|
||||
%define rrc %nil
|
||||
%define rrc %{nil}
|
||||
%define TCL_MINOR %(echo %version | cut -c1-3)
|
||||
BuildRoot: %{_tmppath}/%{name}-%{version}-build
|
||||
Summary: The Tcl Programming Language
|
||||
License: SUSE-TCL
|
||||
License: TCL
|
||||
Group: Development/Languages/Tcl
|
||||
# bug437293
|
||||
%ifarch ppc64
|
||||
@ -36,7 +36,7 @@ Provides: tclsh%{TCL_MINOR}
|
||||
Obsoletes: itcl < 4.0.0
|
||||
Provides: itcl = 4.0.0
|
||||
PreReq: /bin/rm
|
||||
Source0: ftp://ftp.tcl.tk/pub/tcl/tcl8_6/%name%{version}%{rrc}-src.tar.gz
|
||||
Source0: ftp://ftp.tcl.tk/pub/tcl/tcl8_6/%{name}%{version}%{rrc}-src.tar.gz
|
||||
Source1: tcl-rpmlintrc
|
||||
Source2: baselibs.conf
|
||||
Source3: macros.tcl
|
||||
|
||||
@ -1,3 +0,0 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:16ee769248e64ba1cae6b4834fcc4e4edd7470d881410e8d58f7dd1434343514
|
||||
size 8755700
|
||||
3
tcl8.6.2-src.tar.gz
Normal file
3
tcl8.6.2-src.tar.gz
Normal file
@ -0,0 +1,3 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:86f7ae5f581dd0904d04415637ab3aef5a50986c1b6d04c340e2b1b0258da9c4
|
||||
size 8857161
|
||||
Loading…
Reference in New Issue
Block a user