Tk Library Source Code

Artifact [3198fd72bc]
Login

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