rileylev · July 27, 2020 22:35
diff --git a/methods.lisp b/methods.lisp
 (defgeneric add (x y))
 ;;;  assume we already defined vector and integer classes
 (defmethod add ((x vector) (y vector))
  ....)
 (defmethod add ((x integer) (y integer))
  (+ x y))
	(defgeneric add (x y))
	;;; assume we already defined vector and integer classes
	(defmethod add ((x vector) (y vector))
	....)
	(defmethod add ((x integer) (y integer))
	(+ x y))