Fixes to 'configure' build system. Also extra coverage for main.c. (CVS 2204)

FossilOrigin-Name: 8378455f32c3010ccc28181048c746ecb8a9fa67
diff --git a/test/malloc.test b/test/malloc.test
index cd42a1d..33e2b63 100644
--- a/test/malloc.test
+++ b/test/malloc.test
@@ -14,7 +14,7 @@
 # special feature is used to see what happens in the library if a malloc
 # were to really fail due to an out-of-memory situation.
 #
-# $Id: malloc.test,v 1.17 2005/01/12 13:04:55 danielk1977 Exp $
+# $Id: malloc.test,v 1.18 2005/01/13 02:14:25 danielk1977 Exp $
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
@@ -485,7 +485,8 @@
 # This block tests malloc() failures that occur within calls to
 # sqlite3_create_function().
 do_malloc_test 11  -tclbody {
-  if {[string match [sqlite3_create_function $::DB] SQLITE_NOMEM]==0} {
+  set rc [sqlite3_create_function $::DB]
+  if {[string match $rc SQLITE_NOMEM]} {
     error "out of memory"
   }
 }