CritLib test (critcl 0.30) ========================== iadd 123 456 : 579 iadd 1 : wrong # args: should be "iadd x y" iadd 1 2 3 : wrong # args: should be "iadd x y" iadd 0 zero : expected integer but got "zero" Tcl nop: 0.01 microseconds per iteration C nop: 0.74 microseconds per iteration Tcl expr: 0.35 microseconds per iteration Tcl vars: 1.74 microseconds per iteration Tcl esum: 2.95 microseconds per iteration C iadd: 1.09 microseconds per iteration C vars: 2.64 microseconds per iteration Tcl expr: 0.6 microseconds per iteration Tcl vars: 2.71 microseconds per iteration Tcl pow3: 3.19 microseconds per iteration C cube: 0.98 microseconds per iteration C vars: 1.79 microseconds per iteration Hello world! _______________________________________________________________________________ ASCENC 0.11 =========== 123456789 = MTIzNDU2Nzg5 = 123456789 -> -> 1 -> MQ== -> 1 12 -> MTI= -> 12 123 -> MTIz -> 123 1234 -> MTIzNA== -> 1234 12345 -> MTIzNDU= -> 12345 0 -> MA== -> 0 00 -> MDA= -> 00 000 -> MDAw -> 000 0000 -> MDAwMA== -> 0000 00000 -> MDAwMDA= -> 00000 this is a test! -> dGhpcyBpcyBhIHRlc3Qh -> this is a test! MDEyMzQ1Njc4OTAxMjM0NTY3ODkwMTIzNDU2Nzg5MDEyMzQ1Njc4OTAxMjM0 NTY3ODkwMTIzNDU2Nzg5 012345678901234567890123456789012345678901234567890123456789 _______________________________________________________________________________ BLOWFISH 0.10 ============= plain = Hello world! coded = 258d3a52bf61df2467bade73 clear = Hello world! _______________________________________________________________________________ CBLAS 0.11 ========== 11.0 14.0 17.0 20.0 _______________________________________________________________________________ DYNCALL 0.11 ============ wrong # args: should be "dyncall symptr args" _______________________________________________________________________________ HEXDUMP 0.10 ============ 00000000 23205175 69636b20 68657820 64756d70 *# Quick hex dump* 00000010 20696e20 432c2066 726f6d20 4d617474 * in C, from Matt* 00000020 204e6577 6d616e27 73202270 77622220 * Newman's "pwb" * 00000030 666f7220 54636c4b 69740a0a 7061636b *for TclKit..pack* 00000040 61676520 70726f76 69646520 68657864 *age provide hexd* 00000050 756d7020 302e3130 0a706163 6b616765 *ump 0.10.package* 00000060 20726571 75697265 20637269 74636c0a * require critcl.* 00000070 0a637269 74636c3a 3a63636f 6d6d616e *.critcl::ccomman* 00000080 64206865 7864756d 70207b64 756d6d79 *d hexdump {dummy* 00000090 20696e74 65727020 6f626a63 206f626a * interp objc obj* 000000a0 767d207b 0a202073 74617469 63206368 *v} {. static ch* 000000b0 61722068 65785b5d 203d2022 30313233 *ar hex[] = "0123* 000000c0 34353637 38396162 63646566 223b0a20 *456789abcdef";. * 000000d0 2054636c 5f4f626a 202a6f62 6a507472 * Tcl_Obj *objPtr* 000000e0 3b0a2020 756e7369 676e6564 20636861 *;. unsigned cha* 000000f0 72202a73 63702c20 2a646370 3b0a2020 *r *scp, *dcp;. * 00000100 756e7369 676e6564 20636861 72206331 *unsigned char c1* 00000110 203d2027 5c30273b 0a202063 68617220 * = '\0';. char * 00000120 2a707265 66697820 3d204e55 4c4c3b0a **prefix = NULL;.* 00000130 2020696e 74207363 6c656e2c 2064636c * int sclen, dcl* 00000140 656e2c20 706c656e 203d2030 2c20692c *en, plen = 0, i,* 00000150 20696478 2c20636f 75 * idx, cou * _______________________________________________________________________________ IHASH 0.11 ========== new length = 3 new data = 1 one 2 two 3 three new keys = 1 2 3 new values = one two three new map = 0 -1 0 -1 0 -1 0 -1 2105051955 2 -2061914958 4 0 -1 1977051568 0 new get 1 = one new get 2 = two new get 3 = three new get 4 = set length = 4 set data = 1 one 2 deux 3 three 4 quattre set map = 0 -1 0 -1 -1933914571 6 0 -1 2105051955 2 -2061914958 4 0 -1 1977051568 0 set get 1 = one set get 2 = deux set get 3 = three set get 4 = quattre unset length = 3 unset data = 1 one 4 quattre 3 three unset map = 0 -1 0 -1 -1933914571 2 0 -1 -1 -1 -2061914958 4 0 -1 1977051568 0 unset get 1 = one unset get 2 = unset get 3 = three unset get 4 = quattre create 1 = 20 ihash, vs. 20 array create 10 = 18 ihash, vs. 44 array create 100 = -224 ihash, vs. 328 array create 1000 = 386 ihash, vs. 2619 array create 10000 = 13644 ihash, vs. 37195 array get 0: 0 <-> 0 get 1000: 2000 <-> 2000 get abc: <-> can't read "b(abc)": no such element in array 10x h = 34 microseconds per iteration 10x a = 18 microseconds per iteration h all = 57201 microseconds per iteration a all = 54075 microseconds per iteration same = 1 h list = 20984 microseconds per iteration a list = 59270 microseconds per iteration _______________________________________________________________________________ LZRW1 0.10 ========== compress = 00000000001048656c6c6f20776f726c642c0f076f726c0000642c20776f726c6421 restored = Hello world, world, world, world, world! _______________________________________________________________________________ MATHF 0.10 ========== 1 foot = 30.48 cm timing = 8 microseconds per iteration _______________________________________________________________________________ MD5C 0.11 ========= testing: md5 "" computed: d41d8cd98f00b204e9800998ecf8427e testing: md5 "a" computed: 0cc175b9c0f1b6a831c399e269772661 testing: md5 "abc" computed: 900150983cd24fb0d6963f7d28e17f72 testing: md5 "message digest" computed: f96b697d7cb7938d525a2f31aaf161d0 testing: md5 "abcdefghijklmnopqrstuvwxyz" computed: c3fcd3d76192e4007dfb496cca67e13b testing: md5 "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789" computed: d174ab98d277d9f5a5611c2c9f419d9f testing: md5 "12345678901234567890123456789012345678901234567890123456789012345678901234567890" computed: 57edf4a22be3c955ac49da2e2107b67a input length 10: 1 microseconds per iteration input length 50: 5 microseconds per iteration input length 100: 5 microseconds per iteration input length 500: 17 microseconds per iteration input length 1000: 34 microseconds per iteration input length 5000: 153 microseconds per iteration input length 10000: 305 microseconds per iteration _______________________________________________________________________________ MD5PURE 1.2 =========== _______________________________________________________________________________ MVEC 0.12 ========= compile: 761685 microseconds per iteration _______________________________________________________________________________ NOOP 0.10 ========= compile: 238128 microseconds per iteration run 100: 74 microseconds per iteration _______________________________________________________________________________ RCHAN 0.10 ========== compile: 1152125 microseconds per iteration _______________________________________________________________________________ SCRATCH 0.10 ============ T {X {L set} {L a} {X {L c} {A d {L 1}}}} T {X {L 0 3} {L 4 1} {X {L 7 1} {A 10 1 {L 12 1}}}} T {X {L set} {L a} {M {L {b }} {S c} {C 32} {A d {L e}} {C 32} {X {L set} {L f} {X {S g} {L h} {A i {S j}}}}}} T {X {L 0 3} {L 4 1} {M {L 7 2} {S 10 1} {C 32} {A 13 1 {L 15 1}} {C 32} {X {L 19 3} {L 23 1} {X {S 27 1} {L 29 1} {A 32 1 {S 35 1}}}}}} B + {B + {L 1} {B * {L 2} {S a}}} {X {L b} {S c}} B + {B + {L 0 1} {B * {L 4 1} {S 9 1}}} {X {L 14 1} {S 17 1}} _______________________________________________________________________________ TYPCL 0.12 ========== no test code _______________________________________________________________________________ VFS 0.12 ======== ERROR IN PACKAGE vfs 0.12: conflicting versions provided for package "vfs": 1.0, then 0.12 while executing "package provide vfs 0.12" (file "vfs.tcl" line 3) invoked from within "source $f" _______________________________________________________________________________ XRE 0.10 ======== ok! xre _______________________________________________________________________________ ZIPPER 0.10 =========== no test code _______________________________________________________________________________ ZLIB 0.10 ========= adler = 26f00e2e crc32 = 5e4c0b61 compress = 789cf348cdc9c95728cf2fca49d1c14329020026f00e2e restored = Hello world, world, world, world, world! deflated = f348cdc9c95728cf2fca49d1c143290200 restored = Hello world, world, world, world, world! _______________________________________________________________________________ 1 errors