/usr/share/common-lisp/source/clsql-tests/clsql-tests.asd is in cl-sql-tests 6.7.0-1.1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 56 57 58 59 60 | ;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
;;;; *************************************************************************
;;;; FILE IDENTIFICATION
;;;;
;;;; File: clsql-tests.asd
;;;; Authors: Marcus Pearce and Kevin Rosenberg
;;;; Created: 30/03/2004
;;;;
;;;; This file is part of CLSQL.
;;;;
;;;; CLSQL users are granted the rights to distribute and use this software
;;;; as governed by the terms of the Lisp Lesser GNU Public License
;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
;;;; *************************************************************************
(in-package #:cl-user)
(defpackage #:clsql-tests-system (:use #:asdf #:cl))
(in-package #:clsql-tests-system)
(eval-when (:compile-toplevel :load-toplevel :execute)
(unless (find-package '#:uffi)
(asdf:operate 'asdf:load-op 'uffi)))
(defsystem clsql-tests
:name "CLSQL Tests"
:author ""
:maintainer ""
:version ""
:licence ""
:description "A regression test suite for CLSQL."
:depends-on (clsql rt)
:components
((:module tests
:serial t
:components ((:file "package")
(:file "utils")
(:file "test-init")
(:file "datasets")
(:file "ds-employees")
(:file "ds-nodes")
(:file "ds-artists")
(:file "benchmarks")
(:file "test-internal")
(:file "test-basic")
(:file "test-time")
(:file "test-connection")
(:file "test-fddl")
(:file "test-fdml")
(:file "test-ooddl")
(:file "test-oodml")
(:file "test-syntax")
(:file "test-pool")
; #-uffi:no-i18n (:file "test-i18n")
))))
(defmethod perform ((o test-op) (c (eql (find-system 'clsql-tests))))
(operate 'load-op 'clsql)
(unless (funcall (intern (symbol-name '#:run-tests)
(find-package '#:clsql-tests)))
(error "test-op failed")))
|