Anmol Khirbat khirbat

I hereby claim:

I am khirbat on github.
I am khirbat (https://keybase.io/khirbat) on keybase.
I have a public key whose fingerprint is E871 BB48 812F A3F1 DE14 D5A3 A1BD 56CF 27B8 E05F

To claim this, I am signing this object:

We couldn’t find that file to show.

	(defun rdep (system)
	"Return list of Quicklisp packages that use SYSTEM"
	(let (rdeps)
	(dolist (s (ql-dist:provided-systems (ql-dist:find-dist "quicklisp")) rdeps)
	(if (member system (ql-dist:required-systems s) :test #'equal)
	(push (ql-dist:name s) rdeps)))))

	;;;; hw7.lisp

	;;; USAGE:
	;;;
	;;; Use the functions listed under the heading CONSTRUCTORS to create
	;;; expressions. The CONSTRUCTORS, EVAL-PROG and PREPROCESS-PROG are
	;;; the public interface. All other functions should be considered
	;;; private. Symbols (not strings) are used to represent variables.
	;;;
	;;; CL-USER> (load "hw7.lisp")

	;;;; MIXIN
	;;;; https://en.wikipedia.org/wiki/Mixin#In_Common_Lisp

	(defgeneric object-width (object)
	(:documentation
	"Generic function with one argument using the + method
	combination. The + method combination determines that all
	applicable methods for a generic function will be called and the
	results will be added.")
	(:method-combination +))

	pi@4a:~ $ ./vm-explore.sh nocloud_alpine-3.20.3-aarch64-uefi-cloudinit-r0.qcow2 -M alpine
	Mounted /dev/nbd0p2 at /media/root/_
	Spawning container alpine on /media/root/_.
	Press ^] three times within 1s to kill container.
	alpine:~#

	(defmethod swank::menu-choices-for-presentation ((ob fixnum))
	`(("English" ,(lambda (choice object id) (format t "~r~%" object)))))