From 77b4620bd55841bdf94ce3e76c835aa8a6408c06 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Tue, 11 May 1993 18:15:42 +0000 Subject: [PATCH] More FIN sixing. --- code/byte-interp.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/code/byte-interp.lisp b/code/byte-interp.lisp index 458000ee5..4f04c0f6b 100644 --- a/code/byte-interp.lisp +++ b/code/byte-interp.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/byte-interp.lisp,v 1.8 1993/05/11 18:11:29 ram Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/byte-interp.lisp,v 1.9 1993/05/11 18:15:42 ram Exp $") ;;; ;;; ********************************************************************** ;;; @@ -52,7 +52,7 @@ ;;; Represents a byte-compiled closure. ;;; (defstruct (byte-closure (:include byte-function-or-closure) - (:constructor make-byte-closure function data) + (:constructor make-byte-closure (function data)) (:type kernel:funcallable-structure)) ;; ;; Byte function that we call. -- GitLab