Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | missing testevent delete |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
5942243a741b379aa47f69ef6ed8dbe4 |
| User & Date: | dgp 2013-01-30 22:08:05 |
Context
|
2013-01-30
| ||
| 22:40 | Remove old vars and tests, now unused, one that collides with tcltest. check-in: 744155fc38 user: dgp tags: trunk | |
| 22:08 | missing testevent delete check-in: 5942243a74 user: dgp tags: trunk | |
| 20:51 | For Parse/eval & msgcat, select modernizations from Patrick Fradin + -debug fix check-in: 886f2784c1 user: dgp tags: trunk | |
Changes
Changes to tests/parse.test.
| ︙ | ︙ | |||
1092 1093 1094 1095 1096 1097 1098 1099 |
} {- {\x12X} 1 word {\x12X} 2 backslash {\x12} 0 text X 0 {}}
test parse-21.0 {Bug 1884496} testevent {
set ::script {set a [p]; return -level 0 $a}
proc ::p {} {string first s $::script}
testevent queue a head $::script
update
} {}
| > < | 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 |
} {- {\x12X} 1 word {\x12X} 2 backslash {\x12} 0 text X 0 {}}
test parse-21.0 {Bug 1884496} testevent {
set ::script {set a [p]; return -level 0 $a}
proc ::p {} {string first s $::script}
testevent queue a head $::script
update
testevent delete a
} {}
cleanupTests
}
namespace delete ::tcl::test::parse
return
|