Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Make test clearer to future maintainers. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | bug-3466099 |
| Files: | files | file ages | folders |
| SHA1: |
a1ab7b1a0cae2a31f724373c6be2fd44 |
| User & Date: | dkf 2012-02-20 11:55:56 |
Context
|
2012-02-29
| ||
| 21:17 | [Bug 3466099] BOM in Unicode check-in: e17fc0e07b user: jan.nijtmans tags: core-8-4-branch | |
|
2012-02-20
| ||
| 11:55 | Make test clearer to future maintainers. Closed-Leaf check-in: a1ab7b1a0c user: dkf tags: bug-3466099 | |
|
2012-02-19
| ||
| 15:21 | [Bug 3466099] BOM in Unicode check-in: f019af39bd user: jan.nijtmans tags: bug-3466099 | |
Changes
Changes to tests/source.test.
| ︙ | ︙ | |||
117 118 119 120 121 122 123 124 125 126 127 |
} -match listGlob -result [list 1 \
{couldn't read file "*_non_existent_": no such file or directory} \
{POSIX ENOENT {no such file or directory}}]
test source-2.7 {utf-8 with BOM} -setup {
set sourcefile [makeFile {} source.file]
set saveencoding [encoding system]
encoding system utf-8
set out [open $sourcefile w]
puts $out "\ufffeset y new-y"
close $out
| > < | | | | 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 |
} -match listGlob -result [list 1 \
{couldn't read file "*_non_existent_": no such file or directory} \
{POSIX ENOENT {no such file or directory}}]
test source-2.7 {utf-8 with BOM} -setup {
set sourcefile [makeFile {} source.file]
set saveencoding [encoding system]
} -body {
encoding system utf-8
set out [open $sourcefile w]
puts $out "\ufffeset y new-y"
close $out
set y old-y
source $sourcefile
return $y
} -cleanup {
removeFile $sourcefile
encoding system $saveencoding
} -result {new-y}
test source-3.1 {return in middle of source file} -setup {
set sourcefile [makeFile {
set x new-x
return allDone
|
| ︙ | ︙ |