anchor.diff:        (bind ((config (make-config options))
                ((:plist uri table columns limit incremental last-value
                         output-path read-receipt-path write-receipt-path
  -                      progress)
  +                      progress separator)
                 (prepare-parameters config))
                (receipt (when read-receipt-path
                           (read-receipt read-receipt-path))))
  
positive.code:     (("database") "DATABASE" "Database connection")
      (("table") "TABLE" "Table name")
      (("columns") "COL1,COL2,...,COLN" "A comma-separated column list")
      (("incremental") "COLUMN" "Do an incremental update using this column")
      (("last-value") "VALUE" "The last seen value in the incremental column")
      (("limit") "N" "Limit the results to only N first rows.")
  
negative.code:                                             :columns columns
                                              :incremental incremental
                                              :last-value last-value
                                              :progress progress
                                              :separator separator)))
                (when write-receipt-path
                  (write-receipt write-receipt-path new-receipt)))))))))
  
  