From b1a93b646121a1bdb346e2ea77ae17f8c78d2d9c Mon Sep 17 00:00:00 2001 From: dtc <dtc> Date: Thu, 22 Jan 1998 15:43:02 +0000 Subject: [PATCH] Enable the VM support routine make-nlx-entry-argument-start-location. --- compiler/sparc/nlx.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/compiler/sparc/nlx.lisp b/compiler/sparc/nlx.lisp index d5ee3793b..7a7ed8f37 100644 --- a/compiler/sparc/nlx.lisp +++ b/compiler/sparc/nlx.lisp @@ -5,7 +5,7 @@ ;;; Carnegie Mellon University, and has been placed in the public domain. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/nlx.lisp,v 1.8 1998/01/21 19:50:54 dtc Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/nlx.lisp,v 1.9 1998/01/22 15:43:02 dtc Exp $") ;;; ;;; ********************************************************************** ;;; @@ -31,7 +31,6 @@ ;;; Make a TN for the argument count passing location for a ;;; non-local entry. ;;; -#+nil (def-vm-support-routine make-nlx-entry-argument-start-location () (make-wired-tn *fixnum-primitive-type* immediate-arg-scn ocfp-offset)) -- GitLab