removed the separate-compilation.ss file because it was not needed.

scheme/Makefile.am

@@ -23,8 +23,7 @@ EXTRA_DIST=ikarus.boot.prebuilt ikarus.enumerations.ss \
   psyntax.compat.ss psyntax.config.ss psyntax.expander.ss \
   psyntax.internal.ss psyntax.library-manager.ss \
   unicode/unicode-char-cases.ss unicode/unicode-charinfo.ss \
-  ikarus.io.ss ikarus.time-and-date.ss \
+  ikarus.io.ss ikarus.time-and-date.ss 
-  ikarus.separate-compilation.ss
  
 all: $(nodist_pkglib_DATA)
 

scheme/Makefile.in

@@ -177,8 +177,7 @@ EXTRA_DIST = ikarus.boot.prebuilt ikarus.enumerations.ss \
   psyntax.compat.ss psyntax.config.ss psyntax.expander.ss \
   psyntax.internal.ss psyntax.library-manager.ss \
   unicode/unicode-char-cases.ss unicode/unicode-charinfo.ss \
-  ikarus.io.ss ikarus.time-and-date.ss \
+  ikarus.io.ss ikarus.time-and-date.ss 
-  ikarus.separate-compilation.ss
 
 revno = "$(shell sed 's/ .*//' ../.bzr/branch/last-revision 2>/dev/null)"
 CLEANFILES = $(nodist_pkglib_DATA) ikarus.config.ss

scheme/ikarus.separate-compilation.ss

@@ -1,39 +0,0 @@
-
-(library (ikarus separate-compilation)
-  (export compile-library-to-port install-library-from-file)
-  (import 
-    (except (ikarus) library 
-      compile-library-to-port
-      install-library-from-file)
-    (only (ikarus.compiler) compile-core-expr)
-    (only (psyntax library-manager)
-      install-library current-library-expander))
-
-  (define-struct library 
-    (id name ver imp* vis* inv* export-subst export-env
-     visit-code invoke-code visible?))
-
-  (define (install-library-from-file filename)
-    (let ([p (open-file-input-port filename)])
-      (let ([L (fasl-read p)])
-        (unless (library? L) 
-          (error 'install-library 
-            "file does not contain a valid library"
-            filename))
-        (install-library (library-id L) (library-name L) 
-          (library-ver L) (library-imp* L) (library-vis* L)
-          (library-inv* L) (library-export-subst L)
-          (library-export-env L) (library-visit-code L)
-          (library-invoke-code L) (library-visible? L)))))
-
-  (define (compile-library-to-port x p)
-    (let-values (((id name ver imp* vis* inv* 
-                   invoke-code visit-code export-subst export-env)
-                  ((current-library-expander) x)))
-      (let ([L (make-library id name ver imp* vis* inv*
-                  export-subst export-env 
-                  (compile-core-expr visit-code)
-                  (compile-core-expr invoke-code)
-                  #t)])
-        (fasl-write L p)))))
-

scheme/last-revision

@@ -1 +1 @@
-1396
+1397

scheme/makefile.ss

@@ -89,7 +89,6 @@
     "psyntax.builders.ss"
     "psyntax.expander.ss"
 
-    "ikarus.separate-compilation.ss"
     "ikarus.load.ss"
     "ikarus.pretty-print.ss"
     "ikarus.cafe.ss"
@@ -1401,8 +1400,6 @@
     [scc-letrec i]
     [optimize-cp i]
     [optimize-level i]
-    [compile-library-to-port i]
-    [install-library-from-file i]
   ))
 
 (define (macro-identifier? x)