diff options
Diffstat (limited to 'meta/recipes-devtools/tcltk/tcl')
-rw-r--r-- | meta/recipes-devtools/tcltk/tcl/0001-tcl-Add-tcltk-from-OE.dev-but-with-legacy-staging-fu.patch (renamed from meta/recipes-devtools/tcltk/tcl/tcl-add-soname.patch) | 20 | ||||
-rw-r--r-- | meta/recipes-devtools/tcltk/tcl/0002-tcl-fix-a-build-issue.patch (renamed from meta/recipes-devtools/tcltk/tcl/fix_non_native_build_issue.patch) | 28 | ||||
-rw-r--r-- | meta/recipes-devtools/tcltk/tcl/0003-tcl-install-tcl-to-lib64-instead-of-lib-on-64bit-tar.patch (renamed from meta/recipes-devtools/tcltk/tcl/tcl-remove-hardcoded-install-path.patch) | 14 | ||||
-rw-r--r-- | meta/recipes-devtools/tcltk/tcl/0004-tcl-update-the-header-location.patch (renamed from meta/recipes-devtools/tcltk/tcl/alter-includedir.patch) | 22 | ||||
-rw-r--r-- | meta/recipes-devtools/tcltk/tcl/0005-tcl-fix-race-in-interp.test.patch (renamed from meta/recipes-devtools/tcltk/tcl/interp.patch) | 18 | ||||
-rw-r--r-- | meta/recipes-devtools/tcltk/tcl/run-ptest | 9 |
6 files changed, 60 insertions, 51 deletions
diff --git a/meta/recipes-devtools/tcltk/tcl/tcl-add-soname.patch b/meta/recipes-devtools/tcltk/tcl/0001-tcl-Add-tcltk-from-OE.dev-but-with-legacy-staging-fu.patch index a0195e263c..cefcb24433 100644 --- a/meta/recipes-devtools/tcltk/tcl/tcl-add-soname.patch +++ b/meta/recipes-devtools/tcltk/tcl/0001-tcl-Add-tcltk-from-OE.dev-but-with-legacy-staging-fu.patch | |||
@@ -1,19 +1,25 @@ | |||
1 | From b89fd73daf9b3eb2f889f65baba5f90d8a930c82 Mon Sep 17 00:00:00 2001 | 1 | From 822a73a5dec13549cb20e6c7338b059ece2ea95a Mon Sep 17 00:00:00 2001 |
2 | From: Richard Purdie <rpurdie@linux.intel.com> | 2 | From: Richard Purdie <rpurdie@linux.intel.com> |
3 | Date: Wed, 9 Dec 2009 23:59:44 +0000 | 3 | Date: Wed, 9 Dec 2009 23:59:44 +0000 |
4 | Subject: [PATCH] tcl: Add tcltk from OE.dev but with legacy staging function | 4 | Subject: [PATCH] tcl: add .0 to libtcl.so filename |
5 | 5 | ||
6 | Upstream-Status: Pending | 6 | This patch is fixing the issue after the fact; the issue |
7 | is that upstream defines the shared library filename as | ||
8 | libtcl.so (without version) for all platforms in unix/tcl.m4, | ||
9 | and I (AlexK) suspect they won't be interested in | ||
10 | changing that. | ||
11 | |||
12 | Upstream-Status: Inappropriate [see above] | ||
7 | --- | 13 | --- |
8 | unix/Makefile.in | 5 ++++- | 14 | unix/Makefile.in | 5 ++++- |
9 | unix/tcl.m4 | 3 +++ | 15 | unix/tcl.m4 | 3 +++ |
10 | 2 files changed, 7 insertions(+), 1 deletion(-) | 16 | 2 files changed, 7 insertions(+), 1 deletion(-) |
11 | 17 | ||
12 | diff --git a/unix/Makefile.in b/unix/Makefile.in | 18 | diff --git a/unix/Makefile.in b/unix/Makefile.in |
13 | index 7619afc..9dd053d 100644 | 19 | index b72b0da..2de7b2f 100644 |
14 | --- a/unix/Makefile.in | 20 | --- a/unix/Makefile.in |
15 | +++ b/unix/Makefile.in | 21 | +++ b/unix/Makefile.in |
16 | @@ -904,7 +904,10 @@ install-binaries: binaries | 22 | @@ -1021,7 +1021,10 @@ install-binaries: binaries |
17 | done | 23 | done |
18 | @echo "Installing $(LIB_FILE) to $(DLL_INSTALL_DIR)/" | 24 | @echo "Installing $(LIB_FILE) to $(DLL_INSTALL_DIR)/" |
19 | @@INSTALL_LIB@ | 25 | @@INSTALL_LIB@ |
@@ -26,10 +32,10 @@ index 7619afc..9dd053d 100644 | |||
26 | @$(INSTALL_PROGRAM) ${TCL_EXE} "$(BIN_INSTALL_DIR)/tclsh$(VERSION)${EXE_SUFFIX}" | 32 | @$(INSTALL_PROGRAM) ${TCL_EXE} "$(BIN_INSTALL_DIR)/tclsh$(VERSION)${EXE_SUFFIX}" |
27 | @echo "Installing tclConfig.sh to $(CONFIG_INSTALL_DIR)/" | 33 | @echo "Installing tclConfig.sh to $(CONFIG_INSTALL_DIR)/" |
28 | diff --git a/unix/tcl.m4 b/unix/tcl.m4 | 34 | diff --git a/unix/tcl.m4 b/unix/tcl.m4 |
29 | index 0307a06..37c4d67 100644 | 35 | index 4265832..49ad5ab 100644 |
30 | --- a/unix/tcl.m4 | 36 | --- a/unix/tcl.m4 |
31 | +++ b/unix/tcl.m4 | 37 | +++ b/unix/tcl.m4 |
32 | @@ -1378,6 +1378,9 @@ AC_DEFUN([SC_CONFIG_CFLAGS], [ | 38 | @@ -1269,6 +1269,9 @@ AC_DEFUN([SC_CONFIG_CFLAGS], [ |
33 | # get rid of the warnings. | 39 | # get rid of the warnings. |
34 | #CFLAGS_OPTIMIZE="${CFLAGS_OPTIMIZE} -D__NO_STRING_INLINES -D__NO_MATH_INLINES" | 40 | #CFLAGS_OPTIMIZE="${CFLAGS_OPTIMIZE} -D__NO_STRING_INLINES -D__NO_MATH_INLINES" |
35 | 41 | ||
diff --git a/meta/recipes-devtools/tcltk/tcl/fix_non_native_build_issue.patch b/meta/recipes-devtools/tcltk/tcl/0002-tcl-fix-a-build-issue.patch index 09c49daa2c..a2d5622528 100644 --- a/meta/recipes-devtools/tcltk/tcl/fix_non_native_build_issue.patch +++ b/meta/recipes-devtools/tcltk/tcl/0002-tcl-fix-a-build-issue.patch | |||
@@ -1,18 +1,18 @@ | |||
1 | From 371aa300369e9ea3234cba22d5c0babc7d40dfdf Mon Sep 17 00:00:00 2001 | 1 | From 363d9d8fb329b26d1e59ece7f269a7a28e6722c5 Mon Sep 17 00:00:00 2001 |
2 | From: Nitin A Kamble <nitin.a.kamble@intel.com> | 2 | From: Nitin A Kamble <nitin.a.kamble@intel.com> |
3 | Date: Fri, 13 Aug 2010 12:24:00 -0700 | 3 | Date: Fri, 13 Aug 2010 12:24:00 -0700 |
4 | Subject: [PATCH] tcl: fix a build issue | 4 | Subject: [PATCH] tcl: fix a build issue |
5 | 5 | ||
6 | Upstream-Status: Inappropriate [upstream does not support installed tests] | 6 | Upstream-Status: Inappropriate [upstream does not support installed tests] |
7 | --- | 7 | --- |
8 | unix/Makefile.in | 20 ++++++++++---------- | 8 | unix/Makefile.in | 19 +++++++++---------- |
9 | 1 file changed, 10 insertions(+), 10 deletions(-) | 9 | 1 file changed, 9 insertions(+), 10 deletions(-) |
10 | 10 | ||
11 | diff --git a/unix/Makefile.in b/unix/Makefile.in | 11 | diff --git a/unix/Makefile.in b/unix/Makefile.in |
12 | index 9dd053d..a3b7d69 100644 | 12 | index 2de7b2f..b5f9ab7 100644 |
13 | --- a/unix/Makefile.in | 13 | --- a/unix/Makefile.in |
14 | +++ b/unix/Makefile.in | 14 | +++ b/unix/Makefile.in |
15 | @@ -815,7 +815,7 @@ tcltest-real: | 15 | @@ -912,7 +912,7 @@ tcltest-real: |
16 | test: test-tcl test-packages | 16 | test: test-tcl test-packages |
17 | 17 | ||
18 | test-tcl: ${TCLTEST_EXE} | 18 | test-tcl: ${TCLTEST_EXE} |
@@ -20,15 +20,12 @@ index 9dd053d..a3b7d69 100644 | |||
20 | + $(SHELL_ENV) ${TCLTEST_EXE} $(TOP_DIR)/tests/all.tcl $(TESTFLAGS) | 20 | + $(SHELL_ENV) ${TCLTEST_EXE} $(TOP_DIR)/tests/all.tcl $(TESTFLAGS) |
21 | 21 | ||
22 | gdb-test: ${TCLTEST_EXE} | 22 | gdb-test: ${TCLTEST_EXE} |
23 | @printf '%s ' set env @LD_LIBRARY_PATH_VAR@=\"`pwd`$${@LD_LIBRARY_PATH_VAR@:+:$${@LD_LIBRARY_PATH_VAR}}\" > gdb.run | 23 | $(SHELL_ENV) $(GDB) --args ./${TCLTEST_EXE} $(TOP_DIR)/tests/all.tcl \ |
24 | @@ -824,17 +824,17 @@ gdb-test: ${TCLTEST_EXE} | 24 | @@ -922,15 +922,14 @@ lldb-test: ${TCLTEST_EXE} |
25 | @printf '\n' >>gdb.run | 25 | $(SHELL_ENV) $(LLDB) -- ./${TCLTEST_EXE} $(TOP_DIR)/tests/all.tcl \ |
26 | @printf '%s ' set args $(call shquotequote,$(TOP_DIR))/tests/all.tcl\ | 26 | $(TESTFLAGS) -singleproc 1 |
27 | $(call shquotequote,$(TESTFLAGS)) -singleproc 1 >> gdb.run | ||
28 | - $(GDB) ./${TCLTEST_EXE} --command=gdb.run | ||
29 | + $(GDB) ${TCLTEST_EXE} --command=gdb.run | ||
30 | rm gdb.run | ||
31 | 27 | ||
28 | - | ||
32 | # Useful target to launch a built tcltest with the proper path,... | 29 | # Useful target to launch a built tcltest with the proper path,... |
33 | runtest: ${TCLTEST_EXE} | 30 | runtest: ${TCLTEST_EXE} |
34 | - $(SHELL_ENV) ./${TCLTEST_EXE} | 31 | - $(SHELL_ENV) ./${TCLTEST_EXE} |
@@ -42,7 +39,7 @@ index 9dd053d..a3b7d69 100644 | |||
42 | 39 | ||
43 | # The following target generates the shared libraries in dltest/ that are used | 40 | # The following target generates the shared libraries in dltest/ that are used |
44 | # for testing; they are included as part of the "tcltest" target (via the | 41 | # for testing; they are included as part of the "tcltest" target (via the |
45 | @@ -852,28 +852,28 @@ dltest.marker: ${STUB_LIB_FILE} | 42 | @@ -948,17 +947,17 @@ dltest.marker: ${STUB_LIB_FILE} |
46 | # This target can be used to run tclsh from the build directory | 43 | # This target can be used to run tclsh from the build directory |
47 | # via `make shell SCRIPT=/tmp/foo.tcl` | 44 | # via `make shell SCRIPT=/tmp/foo.tcl` |
48 | shell: ${TCL_EXE} | 45 | shell: ${TCL_EXE} |
@@ -63,6 +60,9 @@ index 9dd053d..a3b7d69 100644 | |||
63 | $(TOP_DIR)/tests/all.tcl -singleproc 1 -constraints valgrind \ | 60 | $(TOP_DIR)/tests/all.tcl -singleproc 1 -constraints valgrind \ |
64 | $(TESTFLAGS) | 61 | $(TESTFLAGS) |
65 | 62 | ||
63 | @@ -984,13 +983,13 @@ valgrind_each: $(addprefix testresults/valgrind/,$(addsuffix .success,$(notdir\ | ||
64 | |||
65 | |||
66 | valgrindshell: ${TCL_EXE} | 66 | valgrindshell: ${TCL_EXE} |
67 | - $(SHELL_ENV) $(VALGRIND) $(VALGRINDARGS) ./${TCL_EXE} $(SCRIPT) | 67 | - $(SHELL_ENV) $(VALGRIND) $(VALGRINDARGS) ./${TCL_EXE} $(SCRIPT) |
68 | + $(SHELL_ENV) $(VALGRIND) $(VALGRINDARGS) ${TCL_EXE} $(SCRIPT) | 68 | + $(SHELL_ENV) $(VALGRIND) $(VALGRINDARGS) ${TCL_EXE} $(SCRIPT) |
diff --git a/meta/recipes-devtools/tcltk/tcl/tcl-remove-hardcoded-install-path.patch b/meta/recipes-devtools/tcltk/tcl/0003-tcl-install-tcl-to-lib64-instead-of-lib-on-64bit-tar.patch index 93e7877256..8a425637c6 100644 --- a/meta/recipes-devtools/tcltk/tcl/tcl-remove-hardcoded-install-path.patch +++ b/meta/recipes-devtools/tcltk/tcl/0003-tcl-install-tcl-to-lib64-instead-of-lib-on-64bit-tar.patch | |||
@@ -1,4 +1,4 @@ | |||
1 | From 050fc597fbfa4da2c31bd0df58c871892a490470 Mon Sep 17 00:00:00 2001 | 1 | From 964b9649f8d044d38fdc8c4201075692e5f537a0 Mon Sep 17 00:00:00 2001 |
2 | From: "Song.Li" <Song.Li@windriver.com> | 2 | From: "Song.Li" <Song.Li@windriver.com> |
3 | Date: Wed, 1 Aug 2012 19:05:51 +0800 | 3 | Date: Wed, 1 Aug 2012 19:05:51 +0800 |
4 | Subject: [PATCH] tcl:install tcl to lib64 instead of lib on 64bit target | 4 | Subject: [PATCH] tcl:install tcl to lib64 instead of lib on 64bit target |
@@ -13,14 +13,14 @@ Signed-off-by: Song.Li <Song.Li@windriver.com> | |||
13 | Signed-off-by: Kai Kang <kai.kang@windriver.com> | 13 | Signed-off-by: Kai Kang <kai.kang@windriver.com> |
14 | Signed-off-by: Yi Zhao <yi.zhao@windriver.com> | 14 | Signed-off-by: Yi Zhao <yi.zhao@windriver.com> |
15 | --- | 15 | --- |
16 | unix/configure.in | 2 +- | 16 | unix/configure.ac | 2 +- |
17 | 1 file changed, 1 insertion(+), 1 deletion(-) | 17 | 1 file changed, 1 insertion(+), 1 deletion(-) |
18 | 18 | ||
19 | diff --git a/unix/configure.in b/unix/configure.in | 19 | diff --git a/unix/configure.ac b/unix/configure.ac |
20 | index 4f62510..4974fb6 100644 | 20 | index 7f012d4..43ec7e4 100644 |
21 | --- a/unix/configure.in | 21 | --- a/unix/configure.ac |
22 | +++ b/unix/configure.in | 22 | +++ b/unix/configure.ac |
23 | @@ -775,7 +775,7 @@ eval "TCL_LIB_FILE=libtcl${LIB_SUFFIX}" | 23 | @@ -725,7 +725,7 @@ eval "TCL_LIB_FILE=libtcl${LIB_SUFFIX}" |
24 | 24 | ||
25 | eval "TCL_LIB_FILE=${TCL_LIB_FILE}" | 25 | eval "TCL_LIB_FILE=${TCL_LIB_FILE}" |
26 | 26 | ||
diff --git a/meta/recipes-devtools/tcltk/tcl/alter-includedir.patch b/meta/recipes-devtools/tcltk/tcl/0004-tcl-update-the-header-location.patch index bfc718cfd3..50a4a27256 100644 --- a/meta/recipes-devtools/tcltk/tcl/alter-includedir.patch +++ b/meta/recipes-devtools/tcltk/tcl/0004-tcl-update-the-header-location.patch | |||
@@ -1,4 +1,4 @@ | |||
1 | From 3130dca60636dc12d0d12df75b002fd123349e21 Mon Sep 17 00:00:00 2001 | 1 | From d2fa5a1efa5e4f07b294660c2513766c168137ce Mon Sep 17 00:00:00 2001 |
2 | From: Mingli Yu <mingli.yu@windriver.com> | 2 | From: Mingli Yu <mingli.yu@windriver.com> |
3 | Date: Tue, 22 Nov 2022 18:48:27 +0800 | 3 | Date: Tue, 22 Nov 2022 18:48:27 +0800 |
4 | Subject: [PATCH] tcl: update the header location | 4 | Subject: [PATCH] tcl: update the header location |
@@ -21,16 +21,16 @@ Signed-off-by: Yi Zhao <yi.zhao@windriver.com> | |||
21 | Signed-off-by: Mingli Yu <mingli.yu@windriver.com> | 21 | Signed-off-by: Mingli Yu <mingli.yu@windriver.com> |
22 | --- | 22 | --- |
23 | unix/Makefile.in | 2 +- | 23 | unix/Makefile.in | 2 +- |
24 | unix/configure.in | 4 ++-- | 24 | unix/configure.ac | 4 ++-- |
25 | unix/tcl.pc.in | 2 +- | 25 | unix/tcl.pc.in | 2 +- |
26 | 3 files changed, 4 insertions(+), 4 deletions(-) | 26 | 3 files changed, 4 insertions(+), 4 deletions(-) |
27 | 27 | ||
28 | diff --git a/unix/Makefile.in b/unix/Makefile.in | 28 | diff --git a/unix/Makefile.in b/unix/Makefile.in |
29 | index a3b7d69..969ddb8 100644 | 29 | index b5f9ab7..fbc87a2 100644 |
30 | --- a/unix/Makefile.in | 30 | --- a/unix/Makefile.in |
31 | +++ b/unix/Makefile.in | 31 | +++ b/unix/Makefile.in |
32 | @@ -57,7 +57,7 @@ SCRIPT_INSTALL_DIR = $(INSTALL_ROOT)$(TCL_LIBRARY) | 32 | @@ -57,7 +57,7 @@ SCRIPT_INSTALL_DIR = $(INSTALL_ROOT)$(TCL_LIBRARY) |
33 | MODULE_INSTALL_DIR = $(SCRIPT_INSTALL_DIR)/../tcl8 | 33 | MODULE_INSTALL_DIR = $(SCRIPT_INSTALL_DIR)/../tcl9 |
34 | 34 | ||
35 | # Directory in which to install the include file tcl.h: | 35 | # Directory in which to install the include file tcl.h: |
36 | -INCLUDE_INSTALL_DIR = $(INSTALL_ROOT)$(includedir) | 36 | -INCLUDE_INSTALL_DIR = $(INSTALL_ROOT)$(includedir) |
@@ -38,11 +38,11 @@ index a3b7d69..969ddb8 100644 | |||
38 | 38 | ||
39 | # Path to the private tcl header dir: | 39 | # Path to the private tcl header dir: |
40 | PRIVATE_INCLUDE_DIR = @PRIVATE_INCLUDE_DIR@ | 40 | PRIVATE_INCLUDE_DIR = @PRIVATE_INCLUDE_DIR@ |
41 | diff --git a/unix/configure.in b/unix/configure.in | 41 | diff --git a/unix/configure.ac b/unix/configure.ac |
42 | index 4974fb6..a72934f 100644 | 42 | index 43ec7e4..19524d1 100644 |
43 | --- a/unix/configure.in | 43 | --- a/unix/configure.ac |
44 | +++ b/unix/configure.in | 44 | +++ b/unix/configure.ac |
45 | @@ -776,7 +776,7 @@ eval "TCL_LIB_FILE=libtcl${LIB_SUFFIX}" | 45 | @@ -726,7 +726,7 @@ eval "TCL_LIB_FILE=libtcl${LIB_SUFFIX}" |
46 | eval "TCL_LIB_FILE=${TCL_LIB_FILE}" | 46 | eval "TCL_LIB_FILE=${TCL_LIB_FILE}" |
47 | 47 | ||
48 | test -z "$TCL_LIBRARY" && TCL_LIBRARY='$(libdir)/tcl$(VERSION)' | 48 | test -z "$TCL_LIBRARY" && TCL_LIBRARY='$(libdir)/tcl$(VERSION)' |
@@ -51,7 +51,7 @@ index 4974fb6..a72934f 100644 | |||
51 | HTML_DIR='$(DISTDIR)/html' | 51 | HTML_DIR='$(DISTDIR)/html' |
52 | 52 | ||
53 | # Note: in the following variable, it's important to use the absolute | 53 | # Note: in the following variable, it's important to use the absolute |
54 | @@ -897,7 +897,7 @@ TCL_BUILD_STUB_LIB_PATH="`pwd`/${TCL_STUB_LIB_FILE}" | 54 | @@ -893,7 +893,7 @@ TCL_BUILD_STUB_LIB_PATH="`pwd`/${TCL_STUB_LIB_FILE}" |
55 | TCL_STUB_LIB_PATH="${TCL_STUB_LIB_DIR}/${TCL_STUB_LIB_FILE}" | 55 | TCL_STUB_LIB_PATH="${TCL_STUB_LIB_DIR}/${TCL_STUB_LIB_FILE}" |
56 | 56 | ||
57 | # Install time header dir can be set via --includedir | 57 | # Install time header dir can be set via --includedir |
@@ -61,7 +61,7 @@ index 4974fb6..a72934f 100644 | |||
61 | #------------------------------------------------------------------------ | 61 | #------------------------------------------------------------------------ |
62 | # tclConfig.sh refers to this by a different name | 62 | # tclConfig.sh refers to this by a different name |
63 | diff --git a/unix/tcl.pc.in b/unix/tcl.pc.in | 63 | diff --git a/unix/tcl.pc.in b/unix/tcl.pc.in |
64 | index 93b5e69..dcd51d7 100644 | 64 | index 9c6da82..8aa5ae8 100644 |
65 | --- a/unix/tcl.pc.in | 65 | --- a/unix/tcl.pc.in |
66 | +++ b/unix/tcl.pc.in | 66 | +++ b/unix/tcl.pc.in |
67 | @@ -3,7 +3,7 @@ | 67 | @@ -3,7 +3,7 @@ |
diff --git a/meta/recipes-devtools/tcltk/tcl/interp.patch b/meta/recipes-devtools/tcltk/tcl/0005-tcl-fix-race-in-interp.test.patch index 2e0dc94cff..07912da5b3 100644 --- a/meta/recipes-devtools/tcltk/tcl/interp.patch +++ b/meta/recipes-devtools/tcltk/tcl/0005-tcl-fix-race-in-interp.test.patch | |||
@@ -1,4 +1,4 @@ | |||
1 | From 426aa2ff62dda77fd011e8f630b9d4ea17984817 Mon Sep 17 00:00:00 2001 | 1 | From fd75e3613613726786c54a25ee611c5176b33510 Mon Sep 17 00:00:00 2001 |
2 | From: Ross Burton <ross.burton@arm.com> | 2 | From: Ross Burton <ross.burton@arm.com> |
3 | Date: Mon, 12 Jul 2021 14:50:13 +0100 | 3 | Date: Mon, 12 Jul 2021 14:50:13 +0100 |
4 | Subject: [PATCH] tcl: fix race in interp.test | 4 | Subject: [PATCH] tcl: fix race in interp.test |
@@ -13,20 +13,20 @@ Signed-off-by: Ross Burton <ross.burton@arm.com> | |||
13 | 1 file changed, 4 insertions(+), 3 deletions(-) | 13 | 1 file changed, 4 insertions(+), 3 deletions(-) |
14 | 14 | ||
15 | diff --git a/tests/interp.test b/tests/interp.test | 15 | diff --git a/tests/interp.test b/tests/interp.test |
16 | index d742484..fc90990 100644 | 16 | index 0092a03..eecfd3b 100644 |
17 | --- a/tests/interp.test | 17 | --- a/tests/interp.test |
18 | +++ b/tests/interp.test | 18 | +++ b/tests/interp.test |
19 | @@ -3595,17 +3595,18 @@ test interp-36.7 {ChildBgerror sets error handler of child [1999035]} -setup { | 19 | @@ -3614,17 +3614,18 @@ test interp-36.7 {ChildBgerror sets error handler of child [1999035]} -setup { |
20 | variable result | 20 | variable result |
21 | set result [lindex $args 0] | 21 | set result [lindex $args 0] |
22 | } | 22 | } |
23 | + set tout [after 5000 {set result timeout}] | 23 | + set tout [after 5000 {set result timeout}] |
24 | } -body { | 24 | } -body { |
25 | child eval { | 25 | child eval { |
26 | variable done {} | 26 | variable done {} |
27 | after 0 error foo | 27 | after 0 error foo |
28 | - after 10 [list ::set [namespace which -variable done] {}] | 28 | - after 10 [list ::set [namespace which -variable done] {}] |
29 | - vwait [namespace which -variable done] | 29 | - vwait [namespace which -variable done] |
30 | } | 30 | } |
31 | + vwait result | 31 | + vwait result |
32 | set result | 32 | set result |
diff --git a/meta/recipes-devtools/tcltk/tcl/run-ptest b/meta/recipes-devtools/tcltk/tcl/run-ptest index a403a74bb6..be067f13ea 100644 --- a/meta/recipes-devtools/tcltk/tcl/run-ptest +++ b/meta/recipes-devtools/tcltk/tcl/run-ptest | |||
@@ -1,9 +1,8 @@ | |||
1 | #!/bin/sh | 1 | #!/bin/sh |
2 | 2 | ||
3 | # clock.test needs a timezone to be set | 3 | export TCL_LIBRARY=@libdir@/tcl/ptest/library |
4 | export TZ="Europe/London" | ||
5 | export TCL_LIBRARY=library | ||
6 | export ERROR_ON_FAILURES=1 | 4 | export ERROR_ON_FAILURES=1 |
5 | export LANG=en-US.UTF-8 | ||
7 | 6 | ||
8 | # Some tests are overly strict with timings and fail on loaded systems. | 7 | # Some tests are overly strict with timings and fail on loaded systems. |
9 | SKIP="" | 8 | SKIP="" |
@@ -15,8 +14,12 @@ SKIP="$SKIP cmdMZ-6.6" | |||
15 | SKIP="$SKIP exit-1.\*" | 14 | SKIP="$SKIP exit-1.\*" |
16 | # 15407 15421 | 15 | # 15407 15421 |
17 | SKIP="$SKIP \*io-46.1" | 16 | SKIP="$SKIP \*io-46.1" |
17 | # io-13.6 explicitly says it can fail on slow/loaded machines | ||
18 | SKIP="$SKIP io-13.6" | ||
18 | # 14825 | 19 | # 14825 |
19 | SKIP="$SKIP socket-\* socket_inet-\*" | 20 | SKIP="$SKIP socket-\* socket_inet-\*" |
21 | # tries to access google.com | ||
22 | SKIP="$SKIP httpProxy-\*" | ||
20 | 23 | ||
21 | for i in tests/*.test; do | 24 | for i in tests/*.test; do |
22 | i=$(basename $i) | 25 | i=$(basename $i) |