Another MS SQL index filter fix.

The common lisp default printer is nice enough to know how to print
symbols as strings, but that won't cut it when the symbol :is-not-null
needs to be printed out "is not null", without the dashes.

See #365.
This commit is contained in:
Dimitri Fontaine 2016-03-22 00:37:07 +01:00
parent e2fcd86868
commit d1cfe90f5d

View File

@ -42,6 +42,8 @@
(list
(destructuring-bind (op id &optional arg) node
(case op
(:is-null (format s "~a IS NULL" id))
(:is-not-null (format s "~a IS NOT NULL" id))
(:between
(format s "~a between ~a and ~a"
id (first arg) (second arg)))