mirrors/pgloader
1
0
Fork 0
mirror of https://github.com/dimitri/pgloader.git synced 2025-08-13 01:37:00 +02:00
Code Issues Projects Releases Wiki Activity

Review fixed source import.

Browse Source 
The clone method was missing specific slots of fixed-copy class.
This commit is contained in:
Dimitri Fontaine 2016-03-26 18:33:04 +01:00
parent 6f078daeb9
commit 787be7f188
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/sources/fixed.lisp
View File

@ -32,7 +32,15 @@
(defmethod clone-copy-for ((fixed copy-fixed) path-spec) (defmethod clone-copy-for ((fixed copy-fixed) path-spec)
"Create a copy of FIXED for loading data from PATH-SPEC." "Create a copy of FIXED for loading data from PATH-SPEC."
(change-class (call-next-method fixed path-spec) 'copy-fixed)) (let ((fixed-clone
(change-class (call-next-method fixed path-spec) 'copy-fixed)))
(loop :for slot-name :in '(encoding skip-lines)
:do (when (slot-boundp fixed slot-name)
(setf (slot-value fixed-clone slot-name)
(slot-value fixed slot-name))))
;; return the new instance!
fixed-clone))
(declaim (inline parse-row)) (declaim (inline parse-row))