Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Test iocmd-23.11 demos another segfault. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | core-8-5-branch |
Files: | files | file ages | folders |
SHA1: |
d237824bfd9e9eeacd027cb5a1f79f29 |
User & Date: | dgp 2014-03-27 19:14:01 |
Context
2014-03-27
| ||
21:35 | Minimal patch to fix iocmd-23.11. Might not be the best fix, but is *a* fix. check-in: b846182cdc user: dgp tags: core-8-5-branch | |
19:15 | Test iocmd-23.11 demos another segfault. check-in: 045e8076eb user: dgp tags: trunk | |
19:14 | Test iocmd-23.11 demos another segfault. check-in: d237824bfd user: dgp tags: core-8-5-branch | |
16:44 | Test iogt-2.4 is another segfault demo for [721ec69271]. check-in: ee4b5c6c43 user: dgp tags: core-8-5-branch | |
Changes
Changes to tests/ioCmd.test.
︙ | ︙ | |||
1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 | note [eof $c] set res } -cleanup { close $c rename foo {} unset res } -result {{read rc* 4096} {} 0} # --- === *** ########################### # method write test iocmd-24.1 {chan write, regular write} -match glob -body { set res {} proc foo {args} { | > > > > > > > > > > > > > > > | 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 | note [eof $c] set res } -cleanup { close $c rename foo {} unset res } -result {{read rc* 4096} {} 0} test iocmd-23.11 {chan read, close pulls the rug out} -match glob -body { set res {} proc foo {args} { oninit; onfinal; track set args [lassign $args sub id] if {$sub ne "read"} {return} close $id return {} } set c [chan create {r} foo] note [read $c] close $c rename foo {} set res } -result {{read rc* 4096} {read rc* 4096} snarfsnarf} # --- === *** ########################### # method write test iocmd-24.1 {chan write, regular write} -match glob -body { set res {} proc foo {args} { |
︙ | ︙ |