Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | fixes [87a89c9a927db943]: apply "-load" test-option for child interpreter in tests "sfbug-254" and "sfbug-257" (provides library-path to pkgIndex or loads Itcl directly). |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
0155e66402b9599cc409f489e2f30f7f |
| User & Date: | sebres 2019-02-08 17:59:36 |
References
|
2019-02-09
| ||
| 17:39 | • Ticket [87a89c9a92] Test "sfbug-254" fails for 4.0.5 on Win status still Closed with 4 other changes artifact: 943c898942 user: oehhar | |
Context
|
2019-02-08
| ||
| 23:51 | merge bug-1dc2d851eb: fixes several segfault, see [1dc2d851eb] check-in: e0601c3371 user: sebres tags: trunk | |
| 18:50 | merge trunk (all tests now available in dev-environment) check-in: bb070ae8b6 user: sebres tags: sebres-memopt-perf-branch | |
| 17:59 | fixes [87a89c9a927db943]: apply "-load" test-option for child interpreter in tests "sfbug-254" and "sfbug-257" (provides library-path to pkgIndex or loads Itcl directly). check-in: 0155e66402 user: sebres tags: trunk | |
|
2019-02-07
| ||
| 19:19 | Use TCL_INTEGER_SPACE to size the buffer. check-in: 8ab8b442af user: dgp tags: trunk | |
Changes
Changes to tests/sfbugs.test.
270
271
272
273
274
275
276
277
278
279
280
281
282
283
...
363
364
365
366
367
368
369
370
371
372
373
374
375
376
|
[foo #auto] kerplunk hello world
} -result {{foo0 kerplunk hello world} {foo0 kerplunk hello world} {foo0 kerplunk hello world}} \
-cleanup {::itcl::delete class foo}
test sfbug-254 { SF bug #254
} -body {
set interp [interp create]
$interp eval {
package require itcl
set ::test_status ""
oo::class destroy
lappend ::test_status "::oo::class destroy worked"
}
................................................................................
[::sfbug_256_testclass tc] api-call
} -result {TestClass::api-call TestClass::internal-helper value {TestClass::api-call TestClass::internal-helper value} TestClass::internal-helper value {TestClass::api-call TestClass::internal-helper value {TestClass::api-call TestClass::internal-helper value} TestClass::internal-helper value} value value} \
-cleanup {::itcl::delete class TestClass256}
test sfbug-257 { SF bug #257
} -body {
set interp [interp create]
$interp eval {
package require itcl
set ::test_status ""
::itcl::class ::cl1 {
method m1 {} {
::oo::class destroy
lappend ::test_status "method Hello World"
|
>
>
|
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
...
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
|
[foo #auto] kerplunk hello world
} -result {{foo0 kerplunk hello world} {foo0 kerplunk hello world} {foo0 kerplunk hello world}} \
-cleanup {::itcl::delete class foo}
test sfbug-254 { SF bug #254
} -body {
set interp [interp create]
$interp eval [::tcltest::loadScript]
$interp eval {
package require itcl
set ::test_status ""
oo::class destroy
lappend ::test_status "::oo::class destroy worked"
}
................................................................................
[::sfbug_256_testclass tc] api-call
} -result {TestClass::api-call TestClass::internal-helper value {TestClass::api-call TestClass::internal-helper value} TestClass::internal-helper value {TestClass::api-call TestClass::internal-helper value {TestClass::api-call TestClass::internal-helper value} TestClass::internal-helper value} value value} \
-cleanup {::itcl::delete class TestClass256}
test sfbug-257 { SF bug #257
} -body {
set interp [interp create]
$interp eval [::tcltest::loadScript]
$interp eval {
package require itcl
set ::test_status ""
::itcl::class ::cl1 {
method m1 {} {
::oo::class destroy
lappend ::test_status "method Hello World"
|