diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-28 12:06:41 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-28 12:06:41 (GMT) |
| commit | 18f90309e43e13dde5891a7548dad46e248e2c9a (patch) | |
| tree | b2e217691102055a0bd2f5d761a00c640ee0d5aa /tests/link.test | |
| parent | bc23abb929451954a6d17be2d8e22c9fdefbc1bf (diff) | |
| download | tcl-18f90309e43e13dde5891a7548dad46e248e2c9a.zip tcl-18f90309e43e13dde5891a7548dad46e248e2c9a.tar.gz tcl-18f90309e43e13dde5891a7548dad46e248e2c9a.tar.bz2 | |
Use Tcl_Size for ArithSeries.len
Diffstat (limited to 'tests/link.test')
| -rw-r--r-- | tests/link.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/link.test b/tests/link.test index 69ebb02..43a85fb 100644 --- a/tests/link.test +++ b/tests/link.test @@ -71,7 +71,7 @@ test link-2.1 {writing C variables from Tcl} -constraints {testlink} -setup { set float 1.0987654321 set uwide 12345678901234567890 concat [testlink get] | $int $real $bool $string $wide $char $uchar $short $ushort $uint $long $ulong $float $uwide -} -result {465 -10.5 1 abcdef 135135 79 161 8000 40000 -1073628482 34543 567890 1.0987653732299805 -6101065172474983726 | 0o0721 -10.5 true abcdef 135135 79 161 8000 40000 0xc001babe 34543 567890 1.0987654321 12345678901234567890} +} -result {465 -10.5 1 abcdef 135135 79 161 8000 40000 -1073628482 34543 567890 1.0987653732299805 12345678901234567890 | 0o0721 -10.5 true abcdef 135135 79 161 8000 40000 0xc001babe 34543 567890 1.0987654321 12345678901234567890} test link-2.2 {writing bad values into variables} -setup { testlink delete } -constraints {testlink} -body { |