Artifact
3198fd72bc1665c363f50997a1862eb86cdc7e02:
Attachment "crcbugs.out" to
ticket [709375ffff]
added by
lvirden
2003-04-01 17:57:29.
tcllib tests
Tests running in working dir: /vol/tclsrcsol/tcl84/tcllib
Only running tests that match: *
Skipping test files that match: l.*.test
Only sourcing test files that match: *.test
Tests began at Tue Apr 01 05:40:46 EST 2003
Module: crc
modules/crc/cksum.test
modules/crc/crc16.test
modules/crc/crc32.test
==== crc32-2.2 crc32 and unsigned integer FAILED
==== Contents of test case:
::crc::crc32 $msg
---- Result was:
1136572392
---- Result should have been (exact matching):
3904355907
==== crc32-2.2 FAILED
==== crc32-2.3 crc32 and unsigned integer FAILED
==== Contents of test case:
::crc::crc32 $msg
---- Result was:
3259049013
---- Result should have been (exact matching):
891568578
==== crc32-2.3 FAILED
==== crc32-2.4 crc32 and unsigned integer FAILED
==== Contents of test case:
::crc::crc32 $msg
---- Result was:
2141000992
---- Result should have been (exact matching):
538287487
==== crc32-2.4 FAILED
==== crc32-2.5 crc32 and unsigned integer FAILED
==== Contents of test case:
::crc::crc32 $msg
---- Result was:
3176146764
---- Result should have been (exact matching):
1277644989
==== crc32-2.5 FAILED
==== crc32-2.6 crc32 and unsigned integer FAILED
==== Contents of test case:
::crc::crc32 $msg
---- Result was:
3538338335
---- Result should have been (exact matching):
532866770
==== crc32-2.6 FAILED
==== crc32-2.7 crc32 and unsigned integer FAILED
==== Contents of test case:
::crc::crc32 $msg
---- Result was:
1917495676
---- Result should have been (exact matching):
2091469426
==== crc32-2.7 FAILED
==== crc32-2.8 crc32 and unsigned integer FAILED
==== Contents of test case:
::crc::crc32 $msg
---- Result was:
3857639600
---- Result should have been (exact matching):
2968055525
==== crc32-2.8 FAILED
==== crc32-3.2 crc32 as hexadecimal string FAILED
==== Contents of test case:
::crc::crc32 -format 0x%X $msg
---- Result was:
0x43BEB7E8
---- Result should have been (exact matching):
0xE8B7BE43
==== crc32-3.2 FAILED
==== crc32-3.3 crc32 as hexadecimal string FAILED
==== Contents of test case:
::crc::crc32 -format 0x%X $msg
---- Result was:
0xC2412435
---- Result should have been (exact matching):
0x352441C2
==== crc32-3.3 FAILED
==== crc32-3.4 crc32 as hexadecimal string FAILED
==== Contents of test case:
::crc::crc32 -format 0x%X $msg
---- Result was:
0x7F9D1520
---- Result should have been (exact matching):
0x20159D7F
==== crc32-3.4 FAILED
==== crc32-3.5 crc32 as hexadecimal string FAILED
==== Contents of test case:
::crc::crc32 -format 0x%X $msg
---- Result was:
0xBD50274C
---- Result should have been (exact matching):
0x4C2750BD
==== crc32-3.5 FAILED
==== crc32-3.6 crc32 as hexadecimal string FAILED
==== Contents of test case:
::crc::crc32 -format 0x%X $msg
---- Result was:
0xD2E6C21F
---- Result should have been (exact matching):
0x1FC2E6D2
==== crc32-3.6 FAILED
==== crc32-3.7 crc32 as hexadecimal string FAILED
==== Contents of test case:
::crc::crc32 -format 0x%X $msg
---- Result was:
0x724AA97C
---- Result should have been (exact matching):
0x7CA94A72
==== crc32-3.7 FAILED
==== crc32-3.8 crc32 as hexadecimal string FAILED
==== Contents of test case:
::crc::crc32 -format 0x%X $msg
---- Result was:
0xE5EEE8B0
---- Result should have been (exact matching):
0xB0E8EEE5
==== crc32-3.8 FAILED
==== crc32-5.0 crc32 check Tcl and Trf version identity FAILED
==== Contents of test case:
set data [crc::loaddata $crc::testfile]
set r1 [::crc::Crc32_trf $data]
set r2 [::crc::Crc32_tcl $data]
if {int($r1) != int($r2)} {
set r "differing results: $r1 != $r2"
} else {
set r ok
}
---- Result was:
differing results: -1834522554 != 1181263762
---- Result should have been (exact matching):
ok
==== crc32-5.0 FAILED
modules/crc/crc32bugs.test
==== crcbugs-0.0 get platform info - THIS IS SUPPOSED TO FAIL FAILED
==== Contents of test case:
array get tcl_platform
---- Result was:
osVersion 5.6 byteOrder bigEndian machine sun4u platform unix os SunOS user lwv26 wordSize 4
---- Result should have been (exact matching):
==== crcbugs-0.0 FAILED
==== crc32bugs-2.2 crc32 and crc-32 comparison FAILED
==== Contents of test case:
list [catch {
list [::crc::crc32 -format %x $msg] [::crc::crc-32 -format %x $msg]
} msg] $msg
---- Result was:
0 {8def02d2 d202ef8d}
---- Result should have been (exact matching):
0 {d202ef8d d202ef8d}
==== crc32bugs-2.2 FAILED
==== crc32bugs-2.3 crc32 and crc-32 comparison FAILED
==== Contents of test case:
list [catch {
list [::crc::crc32 -format %x $msg] [::crc::crc-32 -format %x $msg]
} msg] $msg
---- Result was:
0 {ff12d941 41d912ff}
---- Result should have been (exact matching):
0 {41d912ff 41d912ff}
==== crc32bugs-2.3 FAILED
==== crc32bugs-2.4 crc32 and crc-32 comparison FAILED
==== Contents of test case:
list [catch {
list [::crc::crc32 -format %x $msg] [::crc::crc-32 -format %x $msg]
} msg] $msg
---- Result was:
0 {12d941ff ff41d912}
---- Result should have been (exact matching):
0 {ff41d912 ff41d912}
==== crc32bugs-2.4 FAILED
==== crc32bugs-2.5 crc32 and crc-32 comparison FAILED
==== Contents of test case:
list [catch {
list [::crc::crc32 -format %x $msg] [::crc::crc-32 -format %x $msg]
} msg] $msg
---- Result was:
0 {1cdf4421 2144df1c}
---- Result should have been (exact matching):
0 {2144df1c 2144df1c}
==== crc32bugs-2.5 FAILED
==== crc32bugs-2.6 crc32 and crc-32 comparison FAILED
==== Contents of test case:
list [catch {
list [::crc::crc32 -format %x $msg] [::crc::crc-32 -format %x $msg]
} msg] $msg
---- Result was:
0 {ff ff000000}
---- Result should have been (exact matching):
0 {ff000000 ff000000}
==== crc32bugs-2.6 FAILED
==== crc32bugs-2.7 crc32 and crc-32 comparison FAILED
==== Contents of test case:
list [catch {
list [::crc::crc32 -format %x $msg] [::crc::crc-32 -format %x $msg]
} msg] $msg
---- Result was:
0 {ffff ffff0000}
---- Result should have been (exact matching):
0 {ffff0000 ffff0000}
==== crc32bugs-2.7 FAILED
==== crc32bugs-2.8 crc32 and crc-32 comparison FAILED
==== Contents of test case:
list [catch {
list [::crc::crc32 -format %x $msg] [::crc::crc-32 -format %x $msg]
} msg] $msg
---- Result was:
0 {ffffff ffffff00}
---- Result should have been (exact matching):
0 {ffffff00 ffffff00}
==== crc32bugs-2.8 FAILED
==== crc32bugs-2.10 crc32 and crc-32 comparison FAILED
==== Contents of test case:
list [catch {
list [::crc::crc32 -format %x $msg] [::crc::crc-32 -format %x $msg]
} msg] $msg
---- Result was:
0 {8aef4356 5643ef8a}
---- Result should have been (exact matching):
0 {5643ef8a 5643ef8a}
==== crc32bugs-2.10 FAILED
==== crc32bugs-2.11 crc32 and crc-32 comparison FAILED
==== Contents of test case:
list [catch {
list [::crc::crc32 -format %x $msg] [::crc::crc-32 -format %x $msg]
} msg] $msg
---- Result was:
0 {27691dcc cc1d6927}
---- Result should have been (exact matching):
0 {cc1d6927 cc1d6927}
==== crc32bugs-2.11 FAILED
modules/crc/sum.test
Tests ended at Tue Apr 01 05:40:49 EST 2003
all.tcl: Total 104 Passed 79 Skipped 0 Failed 25
Sourced 5 Test Files.
Files with failing tests: crc/crc32.test crc/crc32bugs.test