Artifact
ec597b7db5177df7108705961171200d7ffcd786:
- File
tool/omittest.tcl
— part of check-in
[668b91db]
at
2011-03-12 05:55:38
on branch branch-3.7.2
— Backport the SQLITE_OMIT_UNIQUE_ENFORCEMENT change from check-in [b86999436e] on the trunk.
(user:
shaneh
size: 7388)
0000: 0a 73 65 74 20 72 63 73 69 64 20 7b 24 49 64 3a .set rcsid {$Id:
0010: 20 6f 6d 69 74 74 65 73 74 2e 74 63 6c 2c 76 20 omittest.tcl,v
0020: 31 2e 38 20 32 30 30 38 2f 31 30 2f 31 33 20 31 1.8 2008/10/13 1
0030: 35 3a 33 35 3a 30 39 20 64 72 68 20 45 78 70 20 5:35:09 drh Exp
0040: 24 7d 0a 0a 23 20 44 6f 63 75 6d 65 6e 74 61 74 $}..# Documentat
0050: 69 6f 6e 20 66 6f 72 20 74 68 69 73 20 73 63 72 ion for this scr
0060: 69 70 74 2e 20 54 68 69 73 20 6d 61 79 20 62 65 ipt. This may be
0070: 20 6f 75 74 70 75 74 20 74 6f 20 73 74 64 65 72 output to stder
0080: 72 0a 23 20 69 66 20 74 68 65 20 73 63 72 69 70 r.# if the scrip
0090: 74 20 69 73 20 69 6e 76 6f 6b 65 64 20 69 6e 63 t is invoked inc
00a0: 6f 72 72 65 63 74 6c 79 2e 0a 73 65 74 20 3a 3a orrectly..set ::
00b0: 55 53 41 47 45 5f 4d 45 53 53 41 47 45 20 7b 0a USAGE_MESSAGE {.
00c0: 54 68 69 73 20 54 63 6c 20 73 63 72 69 70 74 20 This Tcl script
00d0: 69 73 20 75 73 65 64 20 74 6f 20 74 65 73 74 20 is used to test
00e0: 74 68 65 20 76 61 72 69 6f 75 73 20 63 6f 6d 70 the various comp
00f0: 69 6c 65 20 74 69 6d 65 20 6f 70 74 69 6f 6e 73 ile time options
0100: 20 0a 61 76 61 69 6c 61 62 6c 65 20 66 6f 72 20 .available for
0110: 6f 6d 69 74 74 69 6e 67 20 63 6f 64 65 20 28 74 omitting code (t
0120: 68 65 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 78 he SQLITE_OMIT_x
0130: 78 78 20 6f 70 74 69 6f 6e 73 29 2e 20 49 74 0a xx options). It.
0140: 73 68 6f 75 6c 64 20 62 65 20 69 6e 76 6f 6b 65 should be invoke
0150: 64 20 61 73 20 66 6f 6c 6c 6f 77 73 3a 0a 0a 20 d as follows:..
0160: 20 20 20 3c 73 63 72 69 70 74 3e 20 3f 2d 6d 61 <script> ?-ma
0170: 6b 65 66 69 6c 65 20 50 41 54 48 2d 54 4f 2d 4d kefile PATH-TO-M
0180: 41 4b 45 46 49 4c 45 3f 0a 0a 54 68 65 20 64 65 AKEFILE?..The de
0190: 66 61 75 6c 74 20 76 61 6c 75 65 20 66 6f 72 20 fault value for
01a0: 3a 3a 4d 41 4b 45 46 49 4c 45 20 69 73 20 22 2e ::MAKEFILE is ".
01b0: 2e 2f 4d 61 6b 65 66 69 6c 65 2e 6c 69 6e 75 78 ./Makefile.linux
01c0: 2e 67 63 63 22 2e 0a 0a 54 68 69 73 20 73 63 72 .gcc"...This scr
01d0: 69 70 74 20 62 75 69 6c 64 73 20 74 68 65 20 74 ipt builds the t
01e0: 65 73 74 66 69 78 74 75 72 65 20 70 72 6f 67 72 estfixture progr
01f0: 61 6d 20 61 6e 64 20 72 75 6e 73 20 74 68 65 20 am and runs the
0200: 53 51 4c 69 74 65 20 74 65 73 74 20 73 75 69 74 SQLite test suit
0210: 65 0a 6f 6e 63 65 20 77 69 74 68 20 65 61 63 68 e.once with each
0220: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 20 6f 70 SQLITE_OMIT_ op
0230: 74 69 6f 6e 20 64 65 66 69 6e 65 64 20 61 6e 64 tion defined and
0240: 20 74 68 65 6e 20 6f 6e 63 65 20 77 69 74 68 20 then once with
0250: 61 6c 6c 20 6f 70 74 69 6f 6e 73 0a 64 65 66 69 all options.defi
0260: 6e 65 64 20 74 6f 67 65 74 68 65 72 2e 20 45 61 ned together. Ea
0270: 63 68 20 72 75 6e 20 69 73 20 70 65 72 66 6f 72 ch run is perfor
0280: 6d 65 64 20 69 6e 20 61 20 73 65 70 65 72 61 74 med in a seperat
0290: 65 20 64 69 72 65 63 74 6f 72 79 20 63 72 65 61 e directory crea
02a0: 74 65 64 0a 61 73 20 61 20 73 75 62 2d 64 69 72 ted.as a sub-dir
02b0: 65 63 74 6f 72 79 20 6f 66 20 74 68 65 20 63 75 ectory of the cu
02c0: 72 72 65 6e 74 20 64 69 72 65 63 74 6f 72 79 20 rrent directory
02d0: 62 79 20 74 68 65 20 73 63 72 69 70 74 2e 20 54 by the script. T
02e0: 68 65 20 6f 75 74 70 75 74 0a 6f 66 20 74 68 65 he output.of the
02f0: 20 62 75 69 6c 64 20 69 73 20 73 61 76 65 64 20 build is saved
0300: 69 6e 20 3c 73 75 62 2d 64 69 72 65 63 74 6f 72 in <sub-director
0310: 79 3e 2f 62 75 69 6c 64 2e 6c 6f 67 2e 20 54 68 y>/build.log. Th
0320: 65 20 6f 75 74 70 75 74 20 6f 66 20 74 68 65 0a e output of the.
0330: 74 65 73 74 2d 73 75 69 74 65 20 69 73 20 73 61 test-suite is sa
0340: 76 65 64 20 69 6e 20 3c 73 75 62 2d 64 69 72 65 ved in <sub-dire
0350: 63 74 6f 72 79 3e 2f 74 65 73 74 2e 6c 6f 67 2e ctory>/test.log.
0360: 0a 0a 41 6c 6d 6f 73 74 20 61 6e 79 20 53 51 4c ..Almost any SQL
0370: 69 74 65 20 6d 61 6b 65 66 69 6c 65 20 28 65 78 ite makefile (ex
0380: 63 65 70 74 20 74 68 6f 73 65 20 67 65 6e 65 72 cept those gener
0390: 61 74 65 64 20 62 79 20 63 6f 6e 66 69 67 75 72 ated by configur
03a0: 65 20 2d 20 73 65 65 20 62 65 6c 6f 77 29 0a 73 e - see below).s
03b0: 68 6f 75 6c 64 20 77 6f 72 6b 2e 20 54 68 65 20 hould work. The
03c0: 66 6f 6c 6c 6f 77 69 6e 67 20 70 72 6f 70 65 72 following proper
03d0: 74 69 65 73 20 61 72 65 20 72 65 71 75 69 72 65 ties are require
03e0: 64 3a 0a 0a 20 20 2a 20 54 68 65 20 6d 61 6b 65 d:.. * The make
03f0: 66 69 6c 65 20 73 68 6f 75 6c 64 20 73 75 70 70 file should supp
0400: 6f 72 74 20 74 68 65 20 22 74 65 73 74 66 69 78 ort the "testfix
0410: 74 75 72 65 22 20 74 61 72 67 65 74 2e 0a 20 20 ture" target..
0420: 2a 20 54 68 65 20 6d 61 6b 65 66 69 6c 65 20 73 * The makefile s
0430: 68 6f 75 6c 64 20 73 75 70 70 6f 72 74 20 74 68 hould support th
0440: 65 20 22 74 65 73 74 22 20 74 61 72 67 65 74 2e e "test" target.
0450: 0a 20 20 2a 20 54 68 65 20 6d 61 6b 65 66 69 6c . * The makefil
0460: 65 20 73 68 6f 75 6c 64 20 73 75 70 70 6f 72 74 e should support
0470: 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 22 4f the variable "O
0480: 50 54 53 22 20 61 73 20 61 20 77 61 79 20 74 6f PTS" as a way to
0490: 20 70 61 73 73 0a 20 20 20 20 6f 70 74 69 6f 6e pass. option
04a0: 73 20 66 72 6f 6d 20 74 68 65 20 6d 61 6b 65 20 s from the make
04b0: 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 20 74 6f 20 command line to
04c0: 6c 65 6d 6f 6e 20 61 6e 64 20 74 68 65 20 43 20 lemon and the C
04d0: 63 6f 6d 70 69 6c 65 72 2e 0a 0a 4d 6f 72 65 20 compiler...More
04e0: 70 72 65 63 69 73 65 6c 79 2c 20 74 68 65 20 66 precisely, the f
04f0: 6f 6c 6c 6f 77 69 6e 67 20 74 77 6f 20 69 6e 76 ollowing two inv
0500: 6f 63 61 74 69 6f 6e 73 20 6d 75 73 74 20 62 65 ocations must be
0510: 20 73 75 70 70 6f 72 74 65 64 3a 0a 0a 20 20 6d supported:.. m
0520: 61 6b 65 20 2d 66 20 24 3a 3a 4d 41 4b 45 46 49 ake -f $::MAKEFI
0530: 4c 45 20 74 65 73 74 66 69 78 74 75 72 65 20 4f LE testfixture O
0540: 50 54 53 3d 22 2d 44 53 51 4c 49 54 45 5f 4f 4d PTS="-DSQLITE_OM
0550: 49 54 5f 41 4c 54 45 52 54 41 42 4c 45 3d 31 22 IT_ALTERTABLE=1"
0560: 0a 20 20 6d 61 6b 65 20 2d 66 20 24 3a 3a 4d 41 . make -f $::MA
0570: 4b 45 46 49 4c 45 20 74 65 73 74 0a 0a 4d 61 6b KEFILE test..Mak
0580: 65 66 69 6c 65 73 20 67 65 6e 65 72 61 74 65 64 efiles generated
0590: 20 62 79 20 74 68 65 20 73 71 6c 69 74 65 20 63 by the sqlite c
05a0: 6f 6e 66 69 67 75 72 65 20 70 72 6f 67 72 61 6d onfigure program
05b0: 20 63 61 6e 6e 6f 74 20 62 65 20 75 73 65 64 20 cannot be used
05c0: 61 73 0a 74 68 65 79 20 64 6f 20 6e 6f 74 20 72 as.they do not r
05d0: 65 73 70 65 63 74 20 74 68 65 20 4f 50 54 53 20 espect the OPTS
05e0: 76 61 72 69 61 62 6c 65 2e 0a 7d 0a 0a 0a 23 20 variable..}...#
05f0: 42 75 69 6c 64 20 61 20 74 65 73 74 66 69 78 74 Build a testfixt
0600: 75 72 65 20 65 78 65 63 75 74 61 62 6c 65 20 61 ure executable a
0610: 6e 64 20 72 75 6e 20 71 75 69 63 6b 2e 74 65 73 nd run quick.tes
0620: 74 20 75 73 69 6e 67 20 69 74 2e 20 54 68 65 20 t using it. The
0630: 66 69 72 73 74 0a 23 20 70 61 72 61 6d 65 74 65 first.# paramete
0640: 72 20 69 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 r is the name of
0650: 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 74 the directory t
0660: 6f 20 63 72 65 61 74 65 20 61 6e 64 20 75 73 65 o create and use
0670: 20 74 6f 20 72 75 6e 20 74 68 65 0a 23 20 74 65 to run the.# te
0680: 73 74 20 69 6e 2e 20 54 68 65 20 73 65 63 6f 6e st in. The secon
0690: 64 20 70 61 72 61 6d 65 74 65 72 20 69 73 20 61 d parameter is a
06a0: 20 6c 69 73 74 20 6f 66 20 4f 4d 49 54 20 73 79 list of OMIT sy
06b0: 6d 62 6f 6c 73 20 74 6f 20 64 65 66 69 6e 65 0a mbols to define.
06c0: 23 20 77 68 65 6e 20 64 6f 69 6e 67 20 73 6f 2e # when doing so.
06d0: 20 46 6f 72 20 65 78 61 6d 70 6c 65 3a 0a 23 0a For example:.#.
06e0: 23 20 20 20 20 20 72 75 6e 5f 71 75 69 63 6b 5f # run_quick_
06f0: 74 65 73 74 20 2f 74 6d 70 2f 74 65 73 74 64 69 test /tmp/testdi
0700: 72 20 7b 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 54 r {SQLITE_OMIT_T
0710: 52 49 47 47 45 52 20 53 51 4c 49 54 45 5f 4f 4d RIGGER SQLITE_OM
0720: 49 54 5f 56 49 45 57 7d 0a 23 0a 23 0a 70 72 6f IT_VIEW}.#.#.pro
0730: 63 20 72 75 6e 5f 71 75 69 63 6b 5f 74 65 73 74 c run_quick_test
0740: 20 7b 64 69 72 20 6f 6d 69 74 5f 73 79 6d 62 6f {dir omit_symbo
0750: 6c 5f 6c 69 73 74 7d 20 7b 0a 20 20 23 20 43 6f l_list} {. # Co
0760: 6d 70 69 6c 65 20 74 68 65 20 76 61 6c 75 65 20 mpile the value
0770: 6f 66 20 74 68 65 20 4f 50 54 53 20 4d 61 6b 65 of the OPTS Make
0780: 66 69 6c 65 20 76 61 72 69 61 62 6c 65 2e 0a 20 file variable..
0790: 20 73 65 74 20 6f 70 74 73 20 22 2d 44 53 51 4c set opts "-DSQL
07a0: 49 54 45 5f 4d 45 4d 44 45 42 55 47 20 2d 44 53 ITE_MEMDEBUG -DS
07b0: 51 4c 49 54 45 5f 44 45 42 55 47 20 2d 44 53 51 QLITE_DEBUG -DSQ
07c0: 4c 49 54 45 5f 4e 4f 5f 53 59 4e 43 22 20 0a 20 LITE_NO_SYNC" .
07d0: 20 69 66 20 7b 24 3a 3a 74 63 6c 5f 70 6c 61 74 if {$::tcl_plat
07e0: 66 6f 72 6d 28 70 6c 61 74 66 6f 72 6d 29 3d 3d form(platform)==
07f0: 22 77 69 6e 64 6f 77 73 22 7d 20 7b 0a 20 20 20 "windows"} {.
0800: 20 61 70 70 65 6e 64 20 6f 70 74 73 20 22 20 2d append opts " -
0810: 44 53 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 3d 31 DSQLITE_OS_WIN=1
0820: 22 0a 20 20 7d 20 65 6c 73 65 69 66 20 7b 24 3a ". } elseif {$:
0830: 3a 74 63 6c 5f 70 6c 61 74 66 6f 72 6d 28 70 6c :tcl_platform(pl
0840: 61 74 66 6f 72 6d 29 3d 3d 22 6f 73 32 22 7d 20 atform)=="os2"}
0850: 7b 0a 20 20 20 20 61 70 70 65 6e 64 20 6f 70 74 {. append opt
0860: 73 20 22 20 2d 44 53 51 4c 49 54 45 5f 4f 53 5f s " -DSQLITE_OS_
0870: 4f 53 32 3d 31 22 0a 20 20 7d 20 65 6c 73 65 20 OS2=1". } else
0880: 7b 0a 20 20 20 20 61 70 70 65 6e 64 20 6f 70 74 {. append opt
0890: 73 20 22 20 2d 44 53 51 4c 49 54 45 5f 4f 53 5f s " -DSQLITE_OS_
08a0: 55 4e 49 58 3d 31 22 0a 20 20 7d 0a 20 20 66 6f UNIX=1". }. fo
08b0: 72 65 61 63 68 20 73 79 6d 20 24 6f 6d 69 74 5f reach sym $omit_
08c0: 73 79 6d 62 6f 6c 5f 6c 69 73 74 20 7b 0a 20 20 symbol_list {.
08d0: 20 20 61 70 70 65 6e 64 20 6f 70 74 73 20 22 20 append opts "
08e0: 2d 44 24 7b 73 79 6d 7d 3d 31 22 0a 20 20 7d 0a -D${sym}=1". }.
08f0: 0a 20 20 23 20 43 72 65 61 74 65 20 74 68 65 20 . # Create the
0900: 64 69 72 65 63 74 6f 72 79 20 61 6e 64 20 64 6f directory and do
0910: 20 74 68 65 20 62 75 69 6c 64 2e 20 49 66 20 61 the build. If a
0920: 6e 20 65 72 72 6f 72 20 6f 63 63 75 72 73 20 72 n error occurs r
0930: 65 74 75 72 6e 0a 20 20 23 20 65 61 72 6c 79 20 eturn. # early
0940: 77 69 74 68 6f 75 74 20 61 74 74 65 6d 70 74 69 without attempti
0950: 6e 67 20 74 6f 20 72 75 6e 20 74 68 65 20 74 65 ng to run the te
0960: 73 74 20 73 75 69 74 65 2e 0a 20 20 66 69 6c 65 st suite.. file
0970: 20 6d 6b 64 69 72 20 24 64 69 72 0a 20 20 70 75 mkdir $dir. pu
0980: 74 73 20 2d 6e 6f 6e 65 77 6c 69 6e 65 20 22 42 ts -nonewline "B
0990: 75 69 6c 64 69 6e 67 20 24 64 69 72 2e 2e 2e 22 uilding $dir..."
09a0: 0a 20 20 66 6c 75 73 68 20 73 74 64 6f 75 74 0a . flush stdout.
09b0: 63 61 74 63 68 20 7b 0a 20 20 66 69 6c 65 20 63 catch {. file c
09c0: 6f 70 79 20 2d 66 6f 72 63 65 20 2e 2f 63 6f 6e opy -force ./con
09d0: 66 69 67 2e 68 20 24 64 69 72 0a 20 20 66 69 6c fig.h $dir. fil
09e0: 65 20 63 6f 70 79 20 2d 66 6f 72 63 65 20 2e 2f e copy -force ./
09f0: 6c 69 62 74 6f 6f 6c 20 24 64 69 72 0a 7d 0a 20 libtool $dir.}.
0a00: 20 73 65 74 20 72 63 20 5b 63 61 74 63 68 20 7b set rc [catch {
0a10: 0a 20 20 20 20 65 78 65 63 20 6d 61 6b 65 20 2d . exec make -
0a20: 43 20 24 64 69 72 20 2d 66 20 24 3a 3a 4d 41 4b C $dir -f $::MAK
0a30: 45 46 49 4c 45 20 74 65 73 74 66 69 78 74 75 72 EFILE testfixtur
0a40: 65 20 4f 50 54 53 3d 24 6f 70 74 73 20 3e 26 20 e OPTS=$opts >&
0a50: 24 64 69 72 2f 62 75 69 6c 64 2e 6c 6f 67 0a 20 $dir/build.log.
0a60: 20 7d 5d 0a 20 20 69 66 20 7b 24 72 63 7d 20 7b }]. if {$rc} {
0a70: 0a 20 20 20 20 70 75 74 73 20 22 4e 6f 20 67 6f . puts "No go
0a80: 6f 64 2e 20 53 65 65 20 24 64 69 72 2f 62 75 69 od. See $dir/bui
0a90: 6c 64 2e 6c 6f 67 2e 22 0a 20 20 20 20 72 65 74 ld.log.". ret
0aa0: 75 72 6e 0a 20 20 7d 20 65 6c 73 65 20 7b 0a 20 urn. } else {.
0ab0: 20 20 20 70 75 74 73 20 22 4f 6b 22 0a 20 20 7d puts "Ok". }
0ac0: 0a 20 20 0a 20 20 23 20 43 72 65 61 74 65 20 61 . . # Create a
0ad0: 6e 20 65 6d 70 74 79 20 66 69 6c 65 20 22 24 64 n empty file "$d
0ae0: 69 72 2f 73 71 6c 69 74 65 33 22 2e 20 54 68 69 ir/sqlite3". Thi
0af0: 73 20 69 73 20 74 6f 20 74 72 69 63 6b 20 74 68 s is to trick th
0b00: 65 20 6d 61 6b 65 66 69 6c 65 20 6f 75 74 20 0a e makefile out .
0b10: 20 20 23 20 6f 66 20 74 72 79 69 6e 67 20 74 6f # of trying to
0b20: 20 62 75 69 6c 64 20 74 68 65 20 73 71 6c 69 74 build the sqlit
0b30: 65 20 73 68 65 6c 6c 2e 20 54 68 65 20 73 71 6c e shell. The sql
0b40: 69 74 65 20 73 68 65 6c 6c 20 77 6f 6e 27 74 20 ite shell won't
0b50: 62 75 69 6c 64 20 0a 20 20 23 20 77 69 74 68 20 build . # with
0b60: 73 6f 6d 65 20 6f 66 20 74 68 65 20 4f 4d 49 54 some of the OMIT
0b70: 20 6f 70 74 69 6f 6e 73 20 28 69 2e 65 20 4f 4d options (i.e OM
0b80: 49 54 5f 43 4f 4d 50 4c 45 54 45 29 2e 0a 20 20 IT_COMPLETE)..
0b90: 73 65 74 20 73 71 6c 69 74 65 33 5f 64 75 6d 6d set sqlite3_dumm
0ba0: 79 20 24 64 69 72 2f 73 71 6c 69 74 65 33 0a 20 y $dir/sqlite3.
0bb0: 20 69 66 20 7b 24 3a 3a 74 63 6c 5f 70 6c 61 74 if {$::tcl_plat
0bc0: 66 6f 72 6d 28 70 6c 61 74 66 6f 72 6d 29 3d 3d form(platform)==
0bd0: 22 77 69 6e 64 6f 77 73 22 20 7c 7c 20 24 3a 3a "windows" || $::
0be0: 74 63 6c 5f 70 6c 61 74 66 6f 72 6d 28 70 6c 61 tcl_platform(pla
0bf0: 74 66 6f 72 6d 29 3d 3d 22 6f 73 32 22 7d 20 7b tform)=="os2"} {
0c00: 0a 20 20 20 20 61 70 70 65 6e 64 20 73 71 6c 69 . append sqli
0c10: 74 65 33 5f 64 75 6d 6d 79 20 22 2e 65 78 65 22 te3_dummy ".exe"
0c20: 0a 20 20 7d 0a 20 20 69 66 20 7b 21 5b 66 69 6c . }. if {![fil
0c30: 65 20 65 78 69 73 74 73 20 24 73 71 6c 69 74 65 e exists $sqlite
0c40: 33 5f 64 75 6d 6d 79 5d 7d 20 7b 0a 20 20 20 20 3_dummy]} {.
0c50: 73 65 74 20 77 72 20 5b 6f 70 65 6e 20 24 73 71 set wr [open $sq
0c60: 6c 69 74 65 33 5f 64 75 6d 6d 79 20 77 5d 0a 20 lite3_dummy w].
0c70: 20 20 20 70 75 74 73 20 24 77 72 20 22 64 75 6d puts $wr "dum
0c80: 6d 79 22 0a 20 20 20 20 63 6c 6f 73 65 20 24 77 my". close $w
0c90: 72 0a 20 20 7d 0a 0a 20 20 23 20 52 75 6e 20 74 r. }.. # Run t
0ca0: 68 65 20 74 65 73 74 20 73 75 69 74 65 2e 0a 20 he test suite..
0cb0: 20 70 75 74 73 20 2d 6e 6f 6e 65 77 6c 69 6e 65 puts -nonewline
0cc0: 20 22 54 65 73 74 69 6e 67 20 24 64 69 72 2e 2e "Testing $dir..
0cd0: 2e 22 0a 20 20 66 6c 75 73 68 20 73 74 64 6f 75 .". flush stdou
0ce0: 74 0a 20 20 73 65 74 20 72 63 20 5b 63 61 74 63 t. set rc [catc
0cf0: 68 20 7b 0a 20 20 20 20 65 78 65 63 20 6d 61 6b h {. exec mak
0d00: 65 20 2d 43 20 24 64 69 72 20 2d 66 20 24 3a 3a e -C $dir -f $::
0d10: 4d 41 4b 45 46 49 4c 45 20 74 65 73 74 20 4f 50 MAKEFILE test OP
0d20: 54 53 3d 24 6f 70 74 73 20 3e 26 20 24 64 69 72 TS=$opts >& $dir
0d30: 2f 74 65 73 74 2e 6c 6f 67 0a 20 20 7d 5d 0a 20 /test.log. }].
0d40: 20 69 66 20 7b 24 72 63 7d 20 7b 0a 20 20 20 20 if {$rc} {.
0d50: 70 75 74 73 20 22 4e 6f 20 67 6f 6f 64 2e 20 53 puts "No good. S
0d60: 65 65 20 24 64 69 72 2f 74 65 73 74 2e 6c 6f 67 ee $dir/test.log
0d70: 2e 22 0a 20 20 7d 20 65 6c 73 65 20 7b 0a 20 20 .". } else {.
0d80: 20 20 70 75 74 73 20 22 4f 6b 22 0a 20 20 7d 0a puts "Ok". }.
0d90: 7d 0a 0a 0a 23 20 54 68 69 73 20 70 72 6f 63 20 }...# This proc
0da0: 70 72 6f 63 65 73 73 65 73 20 74 68 65 20 63 6f processes the co
0db0: 6d 6d 61 6e 64 20 6c 69 6e 65 20 6f 70 74 69 6f mmand line optio
0dc0: 6e 73 20 70 61 73 73 65 64 20 74 6f 20 74 68 69 ns passed to thi
0dd0: 73 20 73 63 72 69 70 74 2e 0a 23 20 43 75 72 72 s script..# Curr
0de0: 65 6e 74 6c 79 20 74 68 65 20 6f 6e 6c 79 20 6f ently the only o
0df0: 70 74 69 6f 6e 20 73 75 70 70 6f 72 74 65 64 20 ption supported
0e00: 69 73 20 22 2d 6d 61 6b 65 66 69 6c 65 22 2c 20 is "-makefile",
0e10: 64 65 66 61 75 6c 74 0a 23 20 22 2e 2e 2f 4d 61 default.# "../Ma
0e20: 6b 65 66 69 6c 65 2e 6c 69 6e 75 78 2d 67 63 63 kefile.linux-gcc
0e30: 22 2e 20 53 65 74 20 74 68 65 20 3a 3a 4d 41 4b ". Set the ::MAK
0e40: 45 46 49 4c 45 20 76 61 72 69 61 62 6c 65 20 74 EFILE variable t
0e50: 6f 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 o the value of t
0e60: 68 69 73 0a 23 20 6f 70 74 69 6f 6e 2e 0a 23 0a his.# option..#.
0e70: 70 72 6f 63 20 70 72 6f 63 65 73 73 5f 6f 70 74 proc process_opt
0e80: 69 6f 6e 73 20 7b 61 72 67 76 7d 20 7b 0a 20 20 ions {argv} {.
0e90: 69 66 20 7b 24 3a 3a 74 63 6c 5f 70 6c 61 74 66 if {$::tcl_platf
0ea0: 6f 72 6d 28 70 6c 61 74 66 6f 72 6d 29 3d 3d 22 orm(platform)=="
0eb0: 77 69 6e 64 6f 77 73 22 20 7c 7c 20 24 3a 3a 74 windows" || $::t
0ec0: 63 6c 5f 70 6c 61 74 66 6f 72 6d 28 70 6c 61 74 cl_platform(plat
0ed0: 66 6f 72 6d 29 3d 3d 22 6f 73 32 22 7d 20 7b 0a form)=="os2"} {.
0ee0: 20 20 20 20 20 20 73 65 74 20 3a 3a 4d 41 4b 45 set ::MAKE
0ef0: 46 49 4c 45 20 2e 2e 2f 4d 61 6b 65 66 69 6c 65 FILE ../Makefile
0f00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0f10: 20 20 20 20 20 20 20 20 3b 23 20 44 65 66 61 75 ;# Defau
0f20: 6c 74 20 76 61 6c 75 65 0a 20 20 7d 20 65 6c 73 lt value. } els
0f30: 65 20 7b 0a 20 20 20 20 20 20 73 65 74 20 3a 3a e {. set ::
0f40: 4d 41 4b 45 46 49 4c 45 20 2e 2e 2f 4d 61 6b 65 MAKEFILE ../Make
0f50: 66 69 6c 65 2e 6c 69 6e 75 78 2d 67 63 63 20 20 file.linux-gcc
0f60: 20 20 20 20 20 20 20 20 20 20 20 20 3b 23 20 44 ;# D
0f70: 65 66 61 75 6c 74 20 76 61 6c 75 65 0a 20 20 7d efault value. }
0f80: 0a 20 20 66 6f 72 20 7b 73 65 74 20 69 20 30 7d . for {set i 0}
0f90: 20 7b 24 69 20 3c 20 5b 6c 6c 65 6e 67 74 68 20 {$i < [llength
0fa0: 24 61 72 67 76 5d 7d 20 7b 69 6e 63 72 20 69 7d $argv]} {incr i}
0fb0: 20 7b 0a 20 20 20 20 73 77 69 74 63 68 20 2d 2d {. switch --
0fc0: 20 5b 6c 69 6e 64 65 78 20 24 61 72 67 76 20 24 [lindex $argv $
0fd0: 69 5d 20 7b 0a 20 20 20 20 20 20 2d 6d 61 6b 65 i] {. -make
0fe0: 66 69 6c 65 20 7b 0a 20 20 20 20 20 20 20 20 69 file {. i
0ff0: 6e 63 72 20 69 0a 20 20 20 20 20 20 20 20 73 65 ncr i. se
1000: 74 20 3a 3a 4d 41 4b 45 46 49 4c 45 20 5b 6c 69 t ::MAKEFILE [li
1010: 6e 64 65 78 20 24 61 72 67 76 20 24 69 5d 0a 20 ndex $argv $i].
1020: 20 20 20 20 20 7d 0a 20 20 0a 20 20 20 20 20 20 }. .
1030: 64 65 66 61 75 6c 74 20 7b 0a 20 20 20 20 20 20 default {.
1040: 20 20 70 75 74 73 20 73 74 64 65 72 72 20 5b 73 puts stderr [s
1050: 74 72 69 6e 67 20 74 72 69 6d 20 24 3a 3a 55 53 tring trim $::US
1060: 41 47 45 5f 4d 45 53 53 41 47 45 5d 0a 20 20 20 AGE_MESSAGE].
1070: 20 20 20 20 20 65 78 69 74 20 2d 31 0a 20 20 20 exit -1.
1080: 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 73 }. }. s
1090: 65 74 20 3a 3a 4d 41 4b 45 46 49 4c 45 20 5b 66 et ::MAKEFILE [f
10a0: 69 6c 65 20 6e 6f 72 6d 61 6c 69 7a 65 20 24 3a ile normalize $:
10b0: 3a 4d 41 4b 45 46 49 4c 45 5d 0a 20 20 7d 0a 7d :MAKEFILE]. }.}
10c0: 0a 0a 23 20 4d 61 69 6e 20 72 6f 75 74 69 6e 65 ..# Main routine
10d0: 2e 0a 23 0a 0a 70 72 6f 63 20 6d 61 69 6e 20 7b ..#..proc main {
10e0: 61 72 67 76 7d 20 7b 0a 20 20 23 20 4c 69 73 74 argv} {. # List
10f0: 20 6f 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f of SQLITE_OMIT_
1100: 58 58 58 20 73 79 6d 62 6f 6c 73 20 73 75 70 70 XXX symbols supp
1110: 6f 72 74 65 64 20 62 79 20 53 51 4c 69 74 65 2e orted by SQLite.
1120: 0a 20 20 73 65 74 20 3a 3a 53 59 4d 42 4f 4c 53 . set ::SYMBOLS
1130: 20 5b 6c 69 73 74 20 20 20 20 20 20 20 20 20 20 [list
1140: 20 20 20 20 20 20 20 20 5c 0a 20 20 20 20 53 51 \. SQ
1150: 4c 49 54 45 5f 4f 4d 49 54 5f 41 4c 54 45 52 54 LITE_OMIT_ALTERT
1160: 41 42 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 ABLE
1170: 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d \. SQLITE_OM
1180: 49 54 5f 41 4e 41 4c 59 5a 45 20 20 20 20 20 20 IT_ANALYZE
1190: 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20 20 20 \.
11a0: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 41 54 54 41 SQLITE_OMIT_ATTA
11b0: 43 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CH
11c0: 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f \. SQLITE_
11d0: 4f 4d 49 54 5f 41 55 54 48 4f 52 49 5a 41 54 49 OMIT_AUTHORIZATI
11e0: 4f 4e 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20 ON \.
11f0: 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 41 55 SQLITE_OMIT_AU
1200: 54 4f 49 4e 43 52 45 4d 45 4e 54 20 20 20 20 20 TOINCREMENT
1210: 20 20 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 \. SQLIT
1220: 45 5f 4f 4d 49 54 5f 41 55 54 4f 49 4e 49 54 20 E_OMIT_AUTOINIT
1230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5c 0a \.
1240: 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f SQLITE_OMIT_
1250: 41 55 54 4f 56 41 43 55 55 4d 20 20 20 20 20 20 AUTOVACUUM
1260: 20 20 20 20 20 20 20 5c 0a 20 20 20 20 53 51 4c \. SQL
1270: 49 54 45 5f 4f 4d 49 54 5f 42 45 54 57 45 45 4e ITE_OMIT_BETWEEN
1280: 5f 4f 50 54 49 4d 49 5a 41 54 49 4f 4e 20 20 20 _OPTIMIZATION
1290: 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 \. SQLITE_OMI
12a0: 54 5f 42 4c 4f 42 5f 4c 49 54 45 52 41 4c 20 20 T_BLOB_LITERAL
12b0: 20 20 20 20 20 20 20 20 20 5c 0a 20 20 20 20 53 \. S
12c0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 42 55 49 4c 54 QLITE_OMIT_BUILT
12d0: 49 4e 5f 54 45 53 54 20 20 20 20 20 20 20 20 20 IN_TEST
12e0: 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f \. SQLITE_O
12f0: 4d 49 54 5f 43 41 53 54 20 20 20 20 20 20 20 20 MIT_CAST
1300: 20 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20 20 \.
1310: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 48 45 SQLITE_OMIT_CHE
1320: 43 4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CK
1330: 20 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 \. SQLITE
1340: 5f 4f 4d 49 54 5f 43 4f 4d 50 4c 45 54 45 20 20 _OMIT_COMPLETE
1350: 20 20 20 20 20 20 20 20 20 20 20 20 20 5c 0a 20 \.
1360: 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 SQLITE_OMIT_C
1370: 4f 4d 50 4f 55 4e 44 5f 53 45 4c 45 43 54 20 20 OMPOUND_SELECT
1380: 20 20 20 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 \. SQLI
1390: 54 45 5f 4f 4d 49 54 5f 43 4f 4e 46 4c 49 43 54 TE_OMIT_CONFLICT
13a0: 5f 43 4c 41 55 53 45 20 20 20 20 20 20 20 20 5c _CLAUSE \
13b0: 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 . SQLITE_OMIT
13c0: 5f 44 41 54 45 54 49 4d 45 5f 46 55 4e 43 53 20 _DATETIME_FUNCS
13d0: 20 20 20 20 20 20 20 20 5c 0a 20 20 20 20 53 51 \. SQ
13e0: 4c 49 54 45 5f 4f 4d 49 54 5f 44 45 43 4c 54 59 LITE_OMIT_DECLTY
13f0: 50 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PE
1400: 20 5c 0a 20 20 20 20 6f 66 66 5f 53 51 4c 49 54 \. off_SQLIT
1410: 45 5f 4f 4d 49 54 5f 44 49 53 4b 49 4f 20 20 20 E_OMIT_DISKIO
1420: 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20 20 20 \.
1430: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 45 58 50 4c SQLITE_OMIT_EXPL
1440: 41 49 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 AIN
1450: 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f \. SQLITE_
1460: 4f 4d 49 54 5f 46 4c 41 47 5f 50 52 41 47 4d 41 OMIT_FLAG_PRAGMA
1470: 53 20 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20 S \.
1480: 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c SQLITE_OMIT_FL
1490: 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 20 20 20 20 OATING_POINT
14a0: 20 20 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 \. SQLIT
14b0: 45 5f 4f 4d 49 54 5f 46 4f 52 45 49 47 4e 5f 4b E_OMIT_FOREIGN_K
14c0: 45 59 20 20 20 20 20 20 20 20 20 20 20 20 5c 0a EY \.
14d0: 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f SQLITE_OMIT_
14e0: 47 45 54 5f 54 41 42 4c 45 20 20 20 20 20 20 20 GET_TABLE
14f0: 20 20 20 20 20 20 20 5c 0a 20 20 20 20 53 51 4c \. SQL
1500: 49 54 45 5f 4f 4d 49 54 5f 47 4c 4f 42 41 4c 52 ITE_OMIT_GLOBALR
1510: 45 43 4f 56 45 52 20 20 20 20 20 20 20 20 20 20 ECOVER
1520: 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 \. SQLITE_OMI
1530: 54 5f 49 4e 43 52 42 4c 4f 42 20 20 20 20 20 20 T_INCRBLOB
1540: 20 20 20 20 20 20 20 20 20 5c 0a 20 20 20 20 53 \. S
1550: 51 4c 49 54 45 5f 4f 4d 49 54 5f 49 4e 54 45 47 QLITE_OMIT_INTEG
1560: 52 49 54 59 5f 43 48 45 43 4b 20 20 20 20 20 20 RITY_CHECK
1570: 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f \. SQLITE_O
1580: 4d 49 54 5f 4c 49 4b 45 5f 4f 50 54 49 4d 49 5a MIT_LIKE_OPTIMIZ
1590: 41 54 49 4f 4e 20 20 20 20 20 20 5c 0a 20 20 20 ATION \.
15a0: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 4c 4f 41 SQLITE_OMIT_LOA
15b0: 44 5f 45 58 54 45 4e 53 49 4f 4e 20 20 20 20 20 D_EXTENSION
15c0: 20 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 \. SQLITE
15d0: 5f 4f 4d 49 54 5f 4c 4f 43 41 4c 54 49 4d 45 20 _OMIT_LOCALTIME
15e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 5c 0a 20 \.
15f0: 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 4d SQLITE_OMIT_M
1600: 45 4d 4f 52 59 44 42 20 20 20 20 20 20 20 20 20 EMORYDB
1610: 20 20 20 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 \. SQLI
1620: 54 45 5f 4f 4d 49 54 5f 4f 52 5f 4f 50 54 49 4d TE_OMIT_OR_OPTIM
1630: 49 5a 41 54 49 4f 4e 20 20 20 20 20 20 20 20 5c IZATION \
1640: 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 . SQLITE_OMIT
1650: 5f 50 41 47 45 52 5f 50 52 41 47 4d 41 53 20 20 _PAGER_PRAGMAS
1660: 20 20 20 20 20 20 20 20 5c 0a 20 20 20 20 53 51 \. SQ
1670: 4c 49 54 45 5f 4f 4d 49 54 5f 50 52 41 47 4d 41 LITE_OMIT_PRAGMA
1680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1690: 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d \. SQLITE_OM
16a0: 49 54 5f 50 52 4f 47 52 45 53 53 5f 43 41 4c 4c IT_PROGRESS_CALL
16b0: 42 41 43 4b 20 20 20 20 20 20 5c 0a 20 20 20 20 BACK \.
16c0: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 51 55 49 43 SQLITE_OMIT_QUIC
16d0: 4b 42 41 4c 41 4e 43 45 20 20 20 20 20 20 20 20 KBALANCE
16e0: 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f \. SQLITE_
16f0: 4f 4d 49 54 5f 52 45 49 4e 44 45 58 20 20 20 20 OMIT_REINDEX
1700: 20 20 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20 \.
1710: 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 53 43 SQLITE_OMIT_SC
1720: 48 45 4d 41 5f 50 52 41 47 4d 41 53 20 20 20 20 HEMA_PRAGMAS
1730: 20 20 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 \. SQLIT
1740: 45 5f 4f 4d 49 54 5f 53 43 48 45 4d 41 5f 56 45 E_OMIT_SCHEMA_VE
1750: 52 53 49 4f 4e 5f 50 52 41 47 4d 41 53 20 5c 0a RSION_PRAGMAS \.
1760: 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f SQLITE_OMIT_
1770: 53 48 41 52 45 44 5f 43 41 43 48 45 20 20 20 20 SHARED_CACHE
1780: 20 20 20 20 20 20 20 5c 0a 20 20 20 20 53 51 4c \. SQL
1790: 49 54 45 5f 4f 4d 49 54 5f 53 55 42 51 55 45 52 ITE_OMIT_SUBQUER
17a0: 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y
17b0: 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 \. SQLITE_OMI
17c0: 54 5f 54 43 4c 5f 56 41 52 49 41 42 4c 45 20 20 T_TCL_VARIABLE
17d0: 20 20 20 20 20 20 20 20 20 5c 0a 20 20 20 20 53 \. S
17e0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 54 45 4d 50 44 QLITE_OMIT_TEMPD
17f0: 42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B
1800: 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f \. SQLITE_O
1810: 4d 49 54 5f 54 52 41 43 45 20 20 20 20 20 20 20 MIT_TRACE
1820: 20 20 20 20 20 20 20 20 20 20 20 5c 0a 20 20 20 \.
1830: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 54 52 49 SQLITE_OMIT_TRI
1840: 47 47 45 52 20 20 20 20 20 20 20 20 20 20 20 20 GGER
1850: 20 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 \. SQLITE
1860: 5f 4f 4d 49 54 5f 54 52 55 4e 43 41 54 45 5f 4f _OMIT_TRUNCATE_O
1870: 50 54 49 4d 49 5a 41 54 49 4f 4e 20 20 5c 0a 20 PTIMIZATION \.
1880: 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 55 SQLITE_OMIT_U
1890: 4e 49 51 55 45 5f 45 4e 46 4f 52 43 45 4d 45 4e NIQUE_ENFORCEMEN
18a0: 54 20 20 20 20 20 5c 0a 20 20 20 20 53 51 4c 49 T \. SQLI
18b0: 54 45 5f 4f 4d 49 54 5f 55 54 46 31 36 20 5c 0a TE_OMIT_UTF16 \.
18c0: 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f SQLITE_OMIT_
18d0: 56 41 43 55 55 4d 20 5c 0a 20 20 20 20 53 51 4c VACUUM \. SQL
18e0: 49 54 45 5f 4f 4d 49 54 5f 56 49 45 57 20 5c 0a ITE_OMIT_VIEW \.
18f0: 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f SQLITE_OMIT_
1900: 56 49 52 54 55 41 4c 54 41 42 4c 45 20 5c 0a 20 VIRTUALTABLE \.
1910: 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 57 SQLITE_OMIT_W
1920: 41 4c 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f AL \. SQLITE_
1930: 4f 4d 49 54 5f 57 53 44 20 5c 0a 20 20 20 20 53 OMIT_WSD \. S
1940: 51 4c 49 54 45 5f 4f 4d 49 54 5f 58 46 45 52 5f QLITE_OMIT_XFER_
1950: 4f 50 54 20 5c 0a 20 20 5d 0a 0a 20 20 23 20 50 OPT \. ].. # P
1960: 72 6f 63 65 73 73 20 61 6e 79 20 63 6f 6d 6d 61 rocess any comma
1970: 6e 64 20 6c 69 6e 65 20 6f 70 74 69 6f 6e 73 2e nd line options.
1980: 0a 20 20 70 72 6f 63 65 73 73 5f 6f 70 74 69 6f . process_optio
1990: 6e 73 20 24 61 72 67 76 0a 20 20 0a 20 20 23 20 ns $argv. . #
19a0: 46 69 72 73 74 20 74 72 79 20 61 20 74 65 73 74 First try a test
19b0: 20 77 69 74 68 20 61 6c 6c 20 4f 4d 49 54 20 73 with all OMIT s
19c0: 79 6d 62 6f 6c 73 20 65 78 63 65 70 74 20 53 51 ymbols except SQ
19d0: 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 LITE_OMIT_FLOATI
19e0: 4e 47 5f 50 4f 49 4e 54 20 0a 20 20 23 20 61 6e NG_POINT . # an
19f0: 64 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 50 52 d SQLITE_OMIT_PR
1a00: 41 47 4d 41 20 64 65 66 69 6e 65 64 2e 20 54 68 AGMA defined. Th
1a10: 65 20 66 6f 72 6d 65 72 20 64 6f 65 73 6e 27 74 e former doesn't
1a20: 20 77 6f 72 6b 20 28 63 61 75 73 65 73 20 73 65 work (causes se
1a30: 67 66 61 75 6c 74 73 29 0a 20 20 23 20 61 6e 64 gfaults). # and
1a40: 20 74 68 65 20 6c 61 74 74 65 72 20 69 73 20 63 the latter is c
1a50: 75 72 72 65 6e 74 6c 79 20 69 6e 63 6f 6d 70 61 urrently incompa
1a60: 74 69 62 6c 65 20 77 69 74 68 20 74 68 65 20 74 tible with the t
1a70: 65 73 74 20 73 75 69 74 65 20 28 74 68 69 73 20 est suite (this
1a80: 73 68 6f 75 6c 64 0a 20 20 23 20 62 65 20 66 69 should. # be fi
1a90: 78 65 64 2c 20 62 75 74 20 69 74 20 77 69 6c 6c xed, but it will
1aa0: 20 62 65 20 61 20 6c 6f 74 20 6f 66 20 77 6f 72 be a lot of wor
1ab0: 6b 29 2e 0a 20 20 73 65 74 20 61 6c 6c 73 79 6d k).. set allsym
1ac0: 73 20 5b 6c 69 73 74 5d 0a 20 20 66 6f 72 65 61 s [list]. forea
1ad0: 63 68 20 73 20 24 3a 3a 53 59 4d 42 4f 4c 53 20 ch s $::SYMBOLS
1ae0: 7b 0a 20 20 20 20 69 66 20 7b 24 73 21 3d 22 53 {. if {$s!="S
1af0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 QLITE_OMIT_FLOAT
1b00: 49 4e 47 5f 50 4f 49 4e 54 22 20 26 26 20 24 73 ING_POINT" && $s
1b10: 21 3d 22 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 50 !="SQLITE_OMIT_P
1b20: 52 41 47 4d 41 22 7d 20 7b 0a 20 20 20 20 20 20 RAGMA"} {.
1b30: 6c 61 70 70 65 6e 64 20 61 6c 6c 73 79 6d 73 20 lappend allsyms
1b40: 24 73 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 $s. }. }. r
1b50: 75 6e 5f 71 75 69 63 6b 5f 74 65 73 74 20 74 65 un_quick_test te
1b60: 73 74 5f 4f 4d 49 54 5f 45 56 45 52 59 54 48 49 st_OMIT_EVERYTHI
1b70: 4e 47 20 24 61 6c 6c 73 79 6d 73 0a 0a 20 20 23 NG $allsyms.. #
1b80: 20 4e 6f 77 20 74 72 79 20 6f 6e 65 20 71 75 69 Now try one qui
1b90: 63 6b 2e 74 65 73 74 20 77 69 74 68 20 65 61 63 ck.test with eac
1ba0: 68 20 6f 66 20 74 68 65 20 4f 4d 49 54 20 73 79 h of the OMIT sy
1bb0: 6d 62 6f 6c 73 20 64 65 66 69 6e 65 64 2e 20 49 mbols defined. I
1bc0: 6e 63 6c 75 64 65 64 0a 20 20 23 20 61 72 65 20 ncluded. # are
1bd0: 74 68 65 20 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e the OMIT_FLOATIN
1be0: 47 5f 50 4f 49 4e 54 20 61 6e 64 20 4f 4d 49 54 G_POINT and OMIT
1bf0: 5f 50 52 41 47 4d 41 20 73 79 6d 62 6f 6c 73 2c _PRAGMA symbols,
1c00: 20 65 76 65 6e 20 74 68 6f 75 67 68 20 77 65 0a even though we.
1c10: 20 20 23 20 6b 6e 6f 77 20 74 68 65 79 20 77 69 # know they wi
1c20: 6c 6c 20 66 61 69 6c 2e 20 49 74 27 73 20 67 6f ll fail. It's go
1c30: 6f 64 20 74 6f 20 62 65 20 72 65 6d 69 6e 64 65 od to be reminde
1c40: 64 20 6f 66 20 74 68 69 73 20 66 72 6f 6d 20 74 d of this from t
1c50: 69 6d 65 20 74 6f 20 74 69 6d 65 2e 0a 20 20 66 ime to time.. f
1c60: 6f 72 65 61 63 68 20 73 79 6d 20 24 3a 3a 53 59 oreach sym $::SY
1c70: 4d 42 4f 4c 53 20 7b 0a 20 20 20 20 73 65 74 20 MBOLS {. set
1c80: 64 69 72 6e 61 6d 65 20 22 74 65 73 74 5f 5b 73 dirname "test_[s
1c90: 74 72 69 6e 67 20 72 61 6e 67 65 20 24 73 79 6d tring range $sym
1ca0: 20 37 20 65 6e 64 5d 22 0a 20 20 20 20 72 75 6e 7 end]". run
1cb0: 5f 71 75 69 63 6b 5f 74 65 73 74 20 24 64 69 72 _quick_test $dir
1cc0: 6e 61 6d 65 20 24 73 79 6d 0a 20 20 7d 0a 7d 0a name $sym. }.}.
1cd0: 0a 6d 61 69 6e 20 24 61 72 67 76 0a .main $argv.