Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Test of shimmer segfault. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | tip-421 |
| Files: | files | file ages | folders |
| SHA3-256: |
d7d48d477c962c077f911069c2cd96a3 |
| User & Date: | dgp 2018-04-17 03:48:47 |
Context
|
2018-04-17
| ||
| 11:11 | Satisfy test var-23.14 check-in: d18e291b03 user: dgp tags: tip-421 | |
| 03:48 | Test of shimmer segfault. check-in: d7d48d477c user: dgp tags: tip-421 | |
|
2018-04-16
| ||
| 14:15 | Memleak fix from Brad Lanam. check-in: d5fefc5a1d user: dgp tags: tip-421 | |
Changes
Changes to tests/var.test.
1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 |
}
set ::countarrayfor
} -cleanup {
unset -nocomplain ::countarrayfor
unset -nocomplain ::a
unset -nocomplain reslist
} -result 3
catch {namespace delete ns}
catch {unset arr}
catch {unset v}
catch {rename getbytes ""}
catch {rename p ""}
|
> > > > > > > > > |
1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 |
}
set ::countarrayfor
} -cleanup {
unset -nocomplain ::countarrayfor
unset -nocomplain ::a
unset -nocomplain reslist
} -result 3
test var-23.14 {array for, shared arguments} -setup {
set vn {k v}
unset -nocomplain $vn
} -body {
array set $vn {a 1 b 2 c 3}
array for $vn $vn {}
} -cleanup {
unset -nocomplain $vn vn
} -result {}
catch {namespace delete ns}
catch {unset arr}
catch {unset v}
catch {rename getbytes ""}
catch {rename p ""}
|