From ed1401a0800ded260523ab8d320b11de9a665a51 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Wed, 16 Dec 1992 14:01:12 +0000 Subject: [PATCH] typo --- compiler/mips/cell.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/compiler/mips/cell.lisp b/compiler/mips/cell.lisp index 01b8428d9..875728d36 100644 --- a/compiler/mips/cell.lisp +++ b/compiler/mips/cell.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/cell.lisp,v 1.62 1992/12/16 13:58:00 wlott Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/cell.lisp,v 1.63 1992/12/16 14:01:12 wlott Exp $") ;;; ;;; ********************************************************************** ;;; @@ -107,7 +107,7 @@ ;;;; Fdefinition (fdefn) objects. (define-vop (fdefn-function cell-ref) - (:variant fdefn-function-slot-slot other-pointer-type)) + (:variant fdefn-function-slot other-pointer-type)) (define-vop (safe-fdefn-function) (:args (object :scs (descriptor-reg) :target obj-temp)) -- GitLab