;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-

;(declaim (optimize (debug 2) (speed 1) (safety 1) (compilation-speed 1)))
(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))

;;;(operate 'load-op :asdf-aclproj)
;;;(use-package :asdf-aclproj)

#+(or allegro lispworks cmu mcl ccl clisp cormanlisp sbcl scl ecl abcl)

(asdf:defsystem :utils-kt
  :name "utils-kt"
  :author "Kenny Tilton <ktilton@nyc.rr.com>"
  :version "2007-12-02"
  :maintainer "Kenny Tilton <ktilton@nyc.rr.com>"
  :licence "MIT Style"
  :description "Kenny's Utilities"
  :long-description "Low-level utilities used by all of Kenny's projects"
  :components ((:module "utils-kt"
                        :components
                        ((:file "defpackage")
                         (:file "core" :depends-on ("defpackage"))
                         (:file "debug" :depends-on ("core"))
                         (:file "flow-control" :depends-on ("core" "debug"))
                         (:file "detritus" :depends-on ("core" "debug"))
                         (:file "strings" :depends-on ("core" "debug"))
                         (:file "datetime" :depends-on ("core" "debug"))
                         (:file "split-sequence" :depends-on ("core" "debug"))))))

(defmethod perform ((o load-op) (c (eql (find-system :utils-kt))))
  ; (pushnew "CELLS" *modules* :test #'string=)
  (pushnew :utils-kt *features*))
