diff --git a/src/pgsql/pgsql-create-schema.lisp b/src/pgsql/pgsql-create-schema.lisp
index 4def048..6e46514 100644
--- a/src/pgsql/pgsql-create-schema.lisp
+++ b/src/pgsql/pgsql-create-schema.lisp
@@ -339,6 +339,7 @@
   "Reset all sequences created during this MySQL migration."
   (log-message :notice "Reset sequences")
   (with-stats-collection ("Reset Sequences"
+                          :use-result-as-read t
                           :use-result-as-rows t
                           :section section)
       (let ((tables  (table-list catalog)))
diff --git a/src/regress/regress.lisp b/src/regress/regress.lisp
index e063565..c5e4c35 100644
--- a/src/regress/regress.lisp
+++ b/src/regress/regress.lisp
@@ -11,7 +11,8 @@
   "Run a regression test for given LOAD-FILE."
   (unless (probe-file load-file)
     (format t "Regression testing ~s: file does not exists." load-file)
-    (uiop:quit +os-code-error-regress+))
+    #-pgloader-image (values nil +os-code-error-regress+)
+    #+pgloader-image (uiop:quit +os-code-error-regress+))
 
   ;; now do our work
   (with-monitor (:start-logger start-logger)