X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=base%2Ftime.lisp;fp=base%2Ftime.lisp;h=80e5bed24120e9b504e2e8405c4db89df674f2e1;hb=cff8a2497b3f111a43d819476b55bfad2b447532;hp=44f10e15bd8b6be35fe2481871a9f4112a38a1bc;hpb=42cc1228e98bd1333c0f67c944f3aa0e07ba248f;p=clsql.git

diff --git a/base/time.lisp b/base/time.lisp
index 44f10e1..80e5bed 100644
--- a/base/time.lisp
+++ b/base/time.lisp
@@ -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