r9199: fold clsql-base and clsql-base-sys into clsql-base
[clsql.git] / base / time.lisp
index 44f10e15bd8b6be35fe2481871a9f4112a38a1bc..0b70f2c6f28b9610f7b7ac9875b38dfa72da3f4a 100644 (file)
@@ -15,7 +15,7 @@
 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
 
-(in-package #:clsql-base-sys)
+(in-package #:clsql-base)
 
 ;; ------------------------------------------------------------
 ;; Months
@@ -785,6 +785,9 @@ with the given options"
         (t
          (values hours "AM"))))
 
+(defgeneric to-string (val &rest keys)
+  )
+
 (defmethod to-string ((time wall-time) &rest keys)
   (destructuring-bind (&key (style :daytime) &allow-other-keys)
       keys