1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
|
;;; -*- Lisp -*-
;;; $Id: xmls.asd 2399 2017-12-17 22:55:24Z rpgoldman $
(defpackage #:xmls-system (:use #:cl #:asdf))
(in-package :xmls-system)
(defclass xmls-source-file (cl-source-file)
()
(:documentation "Component class to quash some ACL warnings.")
)
(pushnew :xmls-nodes-are-structs *features*)
;#+allegro
;(defmethod perform :around ((op compile-op) (file xmls-source-file))
; "Quash ACL warning about nested reader macros."
; (let ((excl:*warn-on-nested-reader-conditionals* nil))
; (call-next-method)))
;
(defsystem :xmls
:version (:read-file-form "version.lisp-expr")
:license "BSD"
:maintainer "Robert P. Goldman <rpgoldman@sift.net>"
:in-order-to ((test-op (test-op "xmls/test") (test-op "xmls/unit-test")))
:components ((:file "xmls"
#+asdf-unicode :encoding #+asdf-unicode :utf-8)
(:file "xmlrep-helpers"
;; package is defined in XMLS. [2009/02/24:rpg]
:depends-on ("xmls"))))
(defsystem :xmls/test
:perform (test-op (op c)
(declare (ignorable op c))
(unless
(uiop:symbol-call :xmls :test :interactive t)
(error "Failed XMLS test.")))
:depends-on (xmls))
(defsystem xmls/unit-test
:depends-on (xmls fiveam)
:perform (test-op (op c)
(declare (ignorable op c))
(uiop:symbol-call :fiveam :run! (uiop:find-symbol* '#:xmls-test :xmls-test)))
:components ((:file "fiveam-tests")))
(defsystem :xmls/octets
:components ((:file "octets-xml"))
;; detecting the encoding doesn't work properly with flexi-streams 1.0.14
:depends-on ("xmls" (:version "flexi-streams" "1.0.15") "cl-ppcre")
:version (:read-file-form "version.lisp-expr")
:perform (test-op (op c)
(declare (ignorable op c))
(unless
(uiop:symbol-call :xmls/octets :test)
(error "Test failures in XMLS/octets."))))
|
