Mercurial > demo / examples/clos/fast-def.lisp
changeset 40: |
6b652d7d6663 |
author: |
Richard Westhaver <ellis@rwest.io> |
date: |
Sun, 14 Apr 2024 20:48:05 -0400 |
permissions: |
-rw-r--r-- |
description: |
examples |
1 (in-package :examples/clos/fast) 3 (defgeneric binary-+ (x y) 4 (:generic-function-class fast-generic-function)) 6 (defmethod binary-+ ((x fixnum) (y fixnum)) 7 (declare (method-properties inlineable))