From: drh Date: Fri, 11 May 2012 20:43:47 +0000 (+0000) Subject: Fix a bug in the wal.test script so that it works on big-endian systems. X-Git-Tag: version-3.7.12~7 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=ed1d84e395597f86a2d83abc7b974c246db974fc;p=thirdparty%2Fsqlite.git Fix a bug in the wal.test script so that it works on big-endian systems. FossilOrigin-Name: 40fe9088fb73eee7b37b574a1dda422266a58638 --- diff --git a/manifest b/manifest index d0ddf48695..c2c16f5412 100644 --- a/manifest +++ b/manifest @@ -1,5 +1,5 @@ -C Fix\sa\sharmless\scompiler\swarning\sinside\san\sassert()\sstatement\swithin\stest\scode. -D 2012-05-11T15:53:18.956 +C Fix\sa\sbug\sin\sthe\swal.test\sscript\sso\sthat\sit\sworks\son\sbig-endian\ssystems. +D 2012-05-11T20:43:47.467 F Makefile.arm-wince-mingw32ce-gcc d6df77f1f48d690bd73162294bbba7f59507c72f F Makefile.in 2f37e468503dbe79d35c9f6dffcf3fae1ae9ec20 F Makefile.linux-gcc 91d710bdc4998cb015f39edf3cb314ec4f4d7e23 @@ -917,7 +917,7 @@ F test/vtabF.test fd5ad376f5a34fe0891df1f3cddb4fe7c3eb077e F test/vtab_alter.test 9e374885248f69e251bdaacf480b04a197f125e5 F test/vtab_err.test 0d4d8eb4def1d053ac7c5050df3024fd47a3fbd8 F test/vtab_shared.test 82f463886e18d7f8395a4b6167c91815efe54839 -F test/wal.test 2fbf4bbd0cb03aff6ada8150f29808c79370d50b +F test/wal.test b3d28d655371bf3f6500c679f526e9860544fe70 F test/wal2.test 8871e7fd2c86711ff415a5817d68ea3101a15312 F test/wal3.test 6504bbf348b2d6dfade64a064f1050fd617e8706 F test/wal4.test 4744e155cd6299c6bd99d3eab1c82f77db9cdb3c @@ -997,7 +997,7 @@ F tool/tostr.awk e75472c2f98dd76e06b8c9c1367f4ab07e122d06 F tool/vdbe-compress.tcl d70ea6d8a19e3571d7ab8c9b75cba86d1173ff0f F tool/warnings-clang.sh a8a0a3babda96dfb1ff51adda3cbbf3dfb7266c2 F tool/warnings.sh fbc018d67fd7395f440c28f33ef0f94420226381 -P 2b074085911d066a4411e46ce8e26a9d08cc0ce3 -R 161aa839758206b0695969d32edff9eb +P e68a3527decb434e8d0ac6b23a3cedba5992cedd +R a090b3c3a973af6805a2cab405f07118 U drh -Z 603a567c9eef7bb7ecf3ae51493c1e1b +Z 0f7a2e9e8b15e03cc250b2aa8f971bbe diff --git a/manifest.uuid b/manifest.uuid index 449a15051a..7c22ccaef2 100644 --- a/manifest.uuid +++ b/manifest.uuid @@ -1 +1 @@ -e68a3527decb434e8d0ac6b23a3cedba5992cedd \ No newline at end of file +40fe9088fb73eee7b37b574a1dda422266a58638 \ No newline at end of file diff --git a/test/wal.test b/test/wal.test index 9d2c6b14b4..32b2608d2a 100644 --- a/test/wal.test +++ b/test/wal.test @@ -1223,10 +1223,11 @@ proc logcksum {ckv1 ckv2 blob} { upvar $ckv1 c1 upvar $ckv2 c2 - set scanpattern I* - if {$::tcl_platform(byteOrder) eq "littleEndian"} { - set scanpattern i* - } + # Since the magic number at the start of the -wal file header is + # 931071618 that indicates that the content should always be read as + # little-endian. + # + set scanpattern i* binary scan $blob $scanpattern values foreach {v1 v2} $values {