-
Notifications
You must be signed in to change notification settings - Fork 2
/
Copy pathcapstone.asd
49 lines (44 loc) · 1.77 KB
/
capstone.asd
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
;;;; Copyright (C) 2020 GrammaTech, Inc.
;;;;
;;;; This code is licensed under the MIT license. See the LICENSE file
;;;; in the project root for license terms.
;;;;
;;;; This project is sponsored by the Office of Naval Research, One
;;;; Liberty Center, 875 N. Randolph Street, Arlington, VA 22203 under
;;;; contract # N68335-17-C-0700. The content of the information does
;;;; not necessarily reflect the position or policy of the Government
;;;; and no official endorsement should be inferred.
(eval-when (:load-toplevel :execute)
(operate 'load-op 'trivial-features)
(operate 'load-op 'cffi-grovel))
(use-package 'cffi-grovel)
(defsystem "capstone"
:author "GrammaTech"
:licence "MIT"
:description "Common Lisp CLOS interface to the Capstone disassembler"
:depends-on (:gt :cffi :static-vectors :capstone/raw)
:components ((:file "capstone"))
:in-order-to ((test-op (load-op "capstone/test")))
:perform (test-op (o c) (symbol-call :capstone/test '#:test)))
(defsystem "capstone/test"
:author "GrammaTech"
:licence "MIT"
:depends-on (:gt :cffi :capstone/raw :capstone :stefil)
:components ((:file "test")))
(defsystem "capstone/raw"
:name "capstone"
:author "GrammaTech"
:licence "MIT"
:description "Raw Common Lisp FFI interface to the Capstone disassembler"
:depends-on (:gt :cffi :static-vectors)
:defsystem-depends-on (:cffi-grovel)
:components ((:file "package")
(:cffi-grovel-file "grovel")
(:file "raw"))
:in-order-to ((test-op (load-op "capstone/raw-test")))
:perform (test-op (o c) (symbol-call :capstone/raw-test '#:test)))
(defsystem "capstone/raw-test"
:author "GrammaTech"
:licence "MIT"
:depends-on (:gt :cffi :static-vectors :capstone/raw :stefil)
:components ((:file "raw-test")))