*** empty log message ***

diff --git a/v7/src/runtime/runtime.sf b/v7/src/runtime/runtime.sf
index 76dbd9e0f159bc09da3d7ccc818a718dbe01d6a3..deb28f591d22ce6d0040f93dba5c0ef8f6991aeb 100644 (file)
--- a/v7/src/runtime/runtime.sf
+++ b/v7/src/runtime/runtime.sf
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.sf,v 14.7 1992/05/12 04:15:23 mhwu Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.sf,v 14.8 1992/05/12 13:43:47 mhwu Exp $
 
 Copyright (c) 1988-92 Massachusetts Institute of Technology
 
@@ -42,4 +42,5 @@ MIT in each case. |#
 (cref/generate-constructors "runtim")
 (sf "runtim.con" "runtim.bcon")
 (sf "runtim.ldr" "runtim.bldr")
-(fasdump (read-file "runtim.avd") "runtim.bad")
\ No newline at end of file
+(if (file-exists? "runtim.avd")
+    (fasdump (read-file "runtim.avd") "runtim.bad"))
\ No newline at end of file