Skip to content
Snippets Groups Projects
Commit 2876f57f authored by wlott's avatar wlott
Browse files

Tack on the .lisp extension when assembling files to keep from loading the

.fasl which has the macros expanded in the wrong manner.
parent fde897e9
No related branches found
No related tags found
No related merge requests found
...@@ -7,7 +7,7 @@ ...@@ -7,7 +7,7 @@
;;; Scott Fahlman (FAHLMAN@CMUC). ;;; Scott Fahlman (FAHLMAN@CMUC).
;;; ********************************************************************** ;;; **********************************************************************
;;; ;;;
;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/assembly/assemfile.lisp,v 1.2 1990/03/08 15:48:58 wlott Exp $ ;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/assembly/assemfile.lisp,v 1.3 1990/03/18 15:35:38 wlott Exp $
;;; ;;;
;;; This file contains the extra code necessary to feed an entire file of ;;; This file contains the extra code necessary to feed an entire file of
;;; assembly code to the assembler. ;;; assembly code to the assembler.
...@@ -36,7 +36,7 @@ ...@@ -36,7 +36,7 @@
(unwind-protect (unwind-protect
(progn (progn
(init-assembler) (init-assembler)
(load name) (load (merge-pathname name (make-pathname :type "lisp")))
(finish-assembly) (finish-assembly)
(let ((handle (dump-assembler-routines *code-vector* *next-location* (let ((handle (dump-assembler-routines *code-vector* *next-location*
*assembler-routines* *assembler-routines*
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment