Index: test/lock2.test
==================================================================
--- test/lock2.test
+++ test/lock2.test
@@ -9,11 +9,11 @@
 #
 #***********************************************************************
 # This file implements regression tests for SQLite library.  The
 # focus of this script is database locks between competing processes.
 #
-# $Id: lock2.test,v 1.10 2009/02/05 16:31:46 drh Exp $
+# $Id: lock2.test,v 1.11 2009/05/01 10:55:34 danielk1977 Exp $
 
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 
@@ -40,10 +40,13 @@
   while { 1 } {
     set line [gets $chan]
     if { $line == "OVER" } { 
       return $r
     }
+    if {[eof $chan]} {
+      return "ERROR: Child process hung up"
+    }
     append r $line
   }
 }
 
 # Write the main loop for the child testfixture processes into file