Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Changes to test/pragma.test.

     8      8   #    May you share freely, never taking more than you give.
     9      9   #
    10     10   #***********************************************************************
    11     11   # This file implements regression tests for SQLite library.
    12     12   #
    13     13   # This file implements tests for the PRAGMA command.
    14     14   #
    15         -# $Id: pragma.test,v 1.50 2007/01/27 14:11:42 drh Exp $
           15  +# $Id: pragma.test,v 1.51 2007/01/27 14:26:07 drh Exp $
    16     16   
    17     17   set testdir [file dirname $argv0]
    18     18   source $testdir/tester.tcl
    19     19   
    20     20   # Test organization:
    21     21   #
    22     22   # pragma-1.*: Test cache_size, default_cache_size and synchronous on main db.
................................................................................
   286    286   
   287    287     # Add additional corruption by appending unused pages to the end of
   288    288     # the database file testerr.db
   289    289     #
   290    290     do_test pragma-3.8 {
   291    291       execsql {DETACH t2}
   292    292       file delete -force testerr.db testerr.db-journal
   293         -    set out [open testerr.db wb]
   294         -    set in [open test.db rb]
          293  +    set out [open testerr.db w]
          294  +    fconfigure $out -translation binary
          295  +    set in [open test.db r]
          296  +    fconfigure $in -translation binary
   295    297       puts -nonewline $out [read $in]
   296    298       seek $in 0
   297    299       puts -nonewline $out [read $in]
   298    300       close $in
   299    301       close $out
   300    302       execsql {REINDEX t2}
   301    303       execsql {PRAGMA integrity_check}