From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 21 Mar 2000 17:30:39 +0000 (+0000)
Subject: Fix think-o in previous change.
X-Git-Tag: 20090517-FFI~4175
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=230ab6e4df4e306f08804320ce4d505c989775b0;p=mit-scheme.git

Fix think-o in previous change.
---

diff --git a/etc/pack-compiler-mc68k.scm b/etc/pack-compiler-mc68k.scm
index 3634c6be0..48ab3d23f 100644
--- a/etc/pack-compiler-mc68k.scm
+++ b/etc/pack-compiler-mc68k.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: pack-compiler-mc68k.scm,v 1.3 1994/05/03 04:50:32 cph Exp $
+$Id: pack-compiler-mc68k.scm,v 1.4 2000/03/21 17:30:39 cph Exp $
 
 Copyright (c) 1993-94 Massachusetts Institute of Technology
 
@@ -38,7 +38,7 @@ MIT in each case. |#
     (load (merge-pathnames "pack" (directory-pathname (current-load-pathname)))
 	  '(RUNTIME LOAD)))
 
-(define (pack-compiler output)
+(define (pack-compiler #!optional output)
   (pack-binaries (if (default-object? output) "lib/compdel.com" output)
 		 '(("sf"
 		    "make.com"