/usr/share/common-lisp/source/cl-acl-compat/cmucl/acl-sys.lisp is in cl-acl-compat 1.2.42+cvs.2010.02.08-dfsg-1.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 | (in-package :acl-compat.system)
(ignore-errors
(export 'command-line-arguments)
(export 'command-line-argument)
(export 'reap-os-subprocess)
(defun command-line-arguments ()
ext:*command-line-strings*)
(defun command-line-argument (n)
(nth n ext:*command-line-strings*))
(defun reap-os-subprocess (&key (wait nil))
(declare (ignore wait))
nil)
)
|