Index: src/test1.c
==================================================================
--- src/test1.c
+++ src/test1.c
@@ -6390,11 +6390,11 @@
   unsigned int i;
   if( objc!=2 ){
     Tcl_WrongNumArgs(interp, 1, objv, "PRNG-SEED-TEXT");
     return TCL_ERROR;
   }
-  if( Tcl_GetIntFromObj(objv[0],&i) ) return TCL_ERROR;
+  if( Tcl_GetIntFromObj(interp,objv[0],&i) ) return TCL_ERROR;
   sqlite3_test_control(SQLITE_TESTCTRL_PRNG_SEED, (unsigned int)i);
   sqlite3_randomness(0,0);
   return TCL_OK;
 }
 

Index: test/dbfuzz2.c
==================================================================
--- test/dbfuzz2.c
+++ test/dbfuzz2.c
@@ -209,10 +209,14 @@
     sqlite3_exec(db, "PRAGMA vdbe_debug=ON", 0, 0, 0);
   }
   if( mxCb>0 ){
     sqlite3_progress_handler(db, 10, progress_handler, 0);
   }
+#ifdef SQLITE_TESTCTRL_PRNG_SEED
+  sqlite3_test_control(SQLITE_TESTCTRL_PRNG_SEED, 0);
+  sqlite3_randomness(0,0);
+#endif
   for(i=0; i<sizeof(azSql)/sizeof(azSql[0]); i++){
     if( eVerbosity>=1 ){
       printf("%s\n", azSql[i]);
       fflush(stdout);
     }

Index: test/fuzzcheck.c
==================================================================
--- test/fuzzcheck.c
+++ test/fuzzcheck.c
@@ -1804,10 +1804,14 @@
           if( sqlFuzz || vdbeLimitFlag ){
             sqlite3_progress_handler(db, 100000, progressHandler,
                                      &vdbeLimitFlag);
           }
 #endif
+#ifdef SQLITE_TESTCTRL_PRNG_SEED
+          sqlite3_test_control(SQLITE_TESTCTRL_PRNG_SEED, 0);
+          sqlite3_randomness(0,0);
+#endif
           do{
             runSql(db, (char*)pSql->a, runFlags);
           }while( timeoutTest );
           setAlarm(0);
           sqlite3_exec(db, "PRAGMA temp_store_directory=''", 0, 0, 0);