@@ -14,15 +14,17 @@
 ;; 
 ;;     You should have received a copy of the GNU General Public License
 ;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
 ;;
 
-(use (prefix sqlite3 sqlite3:) srfi-18)
-
 (declare (unit lock-queue))
 (declare (uses common))
 (declare (uses tasks))
+(declare (uses debugprint))
+
+(use (prefix sqlite3 sqlite3:) srfi-18)
+(import debugprint)
 
 ;;======================================================================
 ;; attempt to prevent overlapping updates of rollup files by queueing
 ;; update requests in an sqlite db
 ;;======================================================================