This file is indexed.

/usr/share/common-lisp/source/iterate/iterate.asd is in cl-iterate 20160825-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
;;; -*- lisp -*- system definition

(defsystem :iterate
  :description "Jonathan Amsterdam's iterator/gatherer/accumulator facility"
  :licence "MIT"
  :in-order-to ((test-op (test-op :iterate/tests)))
  :components ((:file "package")
               (:file "iterate" :depends-on ("package"))))

(defsystem :iterate/tests
  :depends-on (:iterate #+sbcl :sb-rt #-sbcl :rt)
  :components ((:file "iterate-test")))

(defmethod perform ((operation test-op) (component (eql (find-system :iterate/tests))))
  (funcall (intern "DO-TESTS" (find-package #+sbcl "SB-RT"
                                            #-sbcl "REGRESSION-TEST"))))