1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
(defpackage :zip-system
(:use :cl :asdf))
(in-package :zip-system)
(defclass silent-source-file (cl-source-file) ())
#+sbcl
(defmethod perform :around ((o compile-op) (s silent-source-file))
(handler-bind ((sb-ext:compiler-note #'muffle-warning))
(call-next-method)))
(defsystem :zip
:default-component-class silent-source-file
:depends-on (:salza2 :trivial-gray-streams :flexi-streams)
:components ((:file "package")
(:file dependent
:pathname #+allegro #p"acl.lisp" #-allegro #p"gray.lisp"
:depends-on ("package"))
(:file "ifstar" :depends-on ("package"))
(:file "inflate" :depends-on ("package" "ifstar"))
(:file "zip" :depends-on ("inflate" dependent))))
|
