X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Foodml.lisp;h=03f0287e39c58701d9bc06cb39697f87c739f444;hp=1f7dce435168765c381ec3f270fe1a3ab0737458;hb=ace0f0f5b9311e10f4638a206e60f601554ee102;hpb=e8c000a120f978e464441838fe1576e6afc94d9d diff --git a/sql/oodml.lisp b/sql/oodml.lisp index 1f7dce4..03f0287 100644 --- a/sql/oodml.lisp +++ b/sql/oodml.lisp @@ -905,8 +905,7 @@ maximum of MAX-LEN instances updated in each query." instances) "Called by SELECT to generate object query results when the View Classes VIEW-CLASSES are passed as arguments to SELECT." - (declare (ignore all set-operation group-by having offset limit inner-join on) - (optimize (debug 3) (speed 1))) + (declare (ignore all set-operation group-by having offset limit inner-join on)) (flet ((ref-equal (ref1 ref2) (string= (sql-output ref1 database) (sql-output ref2 database)))