Change "LiarC_" to "runtime_"
authorJason Wilson <edu/mit/csail/zurich/jawilson>
Wed, 9 Jun 1993 05:47:01 +0000 (05:47 +0000)
committerJason Wilson <edu/mit/csail/zurich/jawilson>
Wed, 9 Jun 1993 05:47:01 +0000 (05:47 +0000)
v7/src/runtime/make.scm
v8/src/runtime/make.scm

index f35542b73c05cdacdb5524fba67f56ad57d043f5..bdc9d6b8cf69d8eb2a9ced3ea7059018359b6382 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: make.scm,v 14.45 1993/03/07 20:56:21 cph Exp $
+$Id: make.scm,v 14.46 1993/06/09 05:47:01 jawilson Exp $
 
 Copyright (c) 1988-1993 Massachusetts Institute of Technology
 
@@ -243,7 +243,7 @@ MIT in each case. |#
               bin-file)))))
 
 (define (file->object filename purify? optional?)
-  (let* ((block-name (string-append "LiarC_" filename))
+  (let* ((block-name (string-append "runtime_" filename))
         (value (initialize-c-compiled-block block-name)))
     (cond (value
           (tty-write-char newline-char)
index f35542b73c05cdacdb5524fba67f56ad57d043f5..bdc9d6b8cf69d8eb2a9ced3ea7059018359b6382 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: make.scm,v 14.45 1993/03/07 20:56:21 cph Exp $
+$Id: make.scm,v 14.46 1993/06/09 05:47:01 jawilson Exp $
 
 Copyright (c) 1988-1993 Massachusetts Institute of Technology
 
@@ -243,7 +243,7 @@ MIT in each case. |#
               bin-file)))))
 
 (define (file->object filename purify? optional?)
-  (let* ((block-name (string-append "LiarC_" filename))
+  (let* ((block-name (string-append "runtime_" filename))
         (value (initialize-c-compiled-block block-name)))
     (cond (value
           (tty-write-char newline-char)