anchor.diff:  
   ;;; Declaims
   
  -(declaim (inline now format-rfc3339-timestring)
  +(declaim (inline now format-timestring format-rfc3339-timestring)
            (ftype (function * simple-base-string) format-rfc3339-timestring)
            (ftype (function * simple-base-string) format-timestring)
            (ftype (function * fixnum) local-timezone)
  
positive.code:                           (or (third fmt) #\0)
                            val)))))))))))
  
  
  (defun format-timestring (destination timestamp &key
                            (format +iso-8601-format+)
                            (timezone *default-timezone*))
  
negative.code:            #:timestamp-year
             #:parse-timestring
             #:format-timestring
             #:format-http-timestring
             #:to-http-timestring
             #:format-rfc3339-timestring
             #:encode-timestamp
             #:parse-rfc3339-timestring
  