This file is indexed.

/usr/share/common-lisp/source/dynamic-classes/dynamic-classes.asd is in cl-dynamic-classes 20130128-2.

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
(defpackage #:dynamic-classes-system (:use #:common-lisp #:asdf))
(in-package #:dynamic-classes-system)

(defsystem dynamic-classes
  :author "Gary Warren King <gwking@metabang.com>"
  :version "1.0.2"
  :maintainer "Gary Warren King <gwking@metabang.com>"
  :licence "MIT Style license"
  :components ((:module 
		"dev"
		:serial t
		:components ((:file "package")
			     (:file "define-class")
			     (:file "dynamic-class"))))
  :in-order-to ((test-op (load-op dynamic-classes-test)))
  :perform (test-op :after (op c)
		    (funcall (intern (symbol-name '#:run-tests) :lift) 
			     :config :generic))
  :depends-on (:metatilities-base))

(defmethod operation-done-p 
           ((o test-op) (c (eql (find-system 'dynamic-classes))))
  (values nil))