changelog shortlog graph tags branches changeset files file revisions raw help

Mercurial > core / annotate lisp/ffi/alsa/alsa.asd

changeset 698: 96958d3eb5b0
parent: 6fa723592550
author: Richard Westhaver <ellis@rwest.io>
date: Fri, 04 Oct 2024 22:04:59 -0400
permissions: -rw-r--r--
description: fixes
238
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
1 
 ;;; alsa.asd --- ALSA SYSTEMS
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
2 
 
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
3 
 ;; ALSA for lisp.
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
4 
 
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
5 
 ;;; Commentary:
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
6 
 
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
7 
 ;;; Code:
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
8 
 (eval-when (:compile-toplevel :load-toplevel :execute)
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
9 
   (require :sb-grovel))
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
10 
 
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
11 
 (defpackage :alsa.sys
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
12 
   (:use :cl :asdf :sb-grovel :sb-alien))
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
13 
 
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
14 
 (in-package :alsa.sys)
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
15 
 
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
16 
 (defsystem "alsa"
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
17 
   :description "ALSA C FFI"
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
18 
   :depends-on (:sb-grovel :std)
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
19 
   :in-order-to ((test-op (test-op "alsa/tests")))
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
20 
   :components ((:file "pkg")
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
21 
                (grovel-constants-file "constants"
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
22 
                                       :package :alsa))
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
23 
   :perform (test-op (op c) (uiop:symbol-call '#:rt '#:do-tests :alsa)))
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
24 
 
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
25 
 (defsystem "alsa/tests"
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
26 
   :depends-on (:rt :alsa)
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
27 
   :components ((:file "tests"))
6fa723592550 audio ffi, io work
Richard Westhaver <ellis@rwest.io>
parents:
diff changeset
28 
   :perform (test-op (op c) (uiop:symbol-call '#:rt '#:do-tests :alsa)))