Skip to content

Commit

Permalink
Implement support for DBF deleted records.
Browse files Browse the repository at this point in the history
Skip over deleted records rather than blindly importing them. Requires an
update of the underlying DBF library.

Fixes dimitri#985.
  • Loading branch information
dimitri committed Jun 10, 2019
1 parent d8b0bd5 commit 26cc9ca
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion src/sources/db3/db3.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -23,7 +23,9 @@
(loop
:with count := (db3:record-count db3)
:repeat count
:for row-array := (db3:load-record db3 stream)
:for (row-array deleted) := (multiple-value-list
(db3:load-record db3 stream))
:unless deleted
:do (funcall process-row-fn row-array)
:finally (return count)))))

Expand Down

0 comments on commit 26cc9ca

Please sign in to comment.