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

Fix the code to handle lack of target type in MySQL cast rules parsing.

Browse Source
This commit is contained in:
Dimitri Fontaine 2013-09-20 22:51:44 +02:00
parent dd38c9c154
commit 020cd7d3ed
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
parser.lisp
View File

@ -491,9 +491,11 @@ Here's a quick description of the format we're parsing here:
(defun fix-target-type (source target) (defun fix-target-type (source target)
"When target has :type nil, steal the source :type definition." "When target has :type nil, steal the source :type definition."
(unless (getf target :type) (if (getf target :type)
(setf (getf target :type) (getf source :type)) target
target)) (loop
for (key value) on target by #'cddr
append (list key (if (eq :type key) (getf source :type) value)))))
(defrule cast-rule (and cast-source cast-def (? cast-function)) (defrule cast-rule (and cast-source cast-def (? cast-function))
(:lambda (cast) (:lambda (cast)