cleanup of import sets

scheme/ikarus.intel-assembler.sls

@@ -14,17 +14,14 @@
 ;;; You should have received a copy of the GNU General Public License
 ;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-
-
 (library (ikarus.intel-assembler)
   (export assemble-sources code-entry-adjustment)
-  (import
-    (ikarus)
-    (rnrs bytevectors)
-    (except (ikarus.code-objects) procedure-annotation)
+  (import (ikarus)
+    (except (ikarus.code-objects)
+	    procedure-annotation)
     (ikarus system $pairs))
 
-
+
 (module (wordsize)
   (import (vicare include))
   (include "ikarus.config.ss"))
@@ -1143,6 +1140,9 @@
                           code* code-name*)
                 code*)))))))
 
+
+;;;; done
 
 )
 
+;;; end of file

scheme/ikarus.pretty-print.sls

@@ -16,11 +16,14 @@
 
 (library (ikarus pretty-print)
   (export pretty-print pretty-width)
-  (import
-    (rnrs hashtables)
-    (only (ikarus writer) traverse traversal-helpers)
-    (only (ikarus.pretty-formats) get-fmt)
-    (except (ikarus) pretty-print pretty-width))
+  (import (except (ikarus)
+		  pretty-print
+		  pretty-width)
+    (only (ikarus writer)
+	  traverse
+	  traversal-helpers)
+    (only (ikarus.pretty-formats)
+	  get-fmt))
   (define (map1ltr f ls)
     ;;; ltr so that gensym counts get assigned properly
     (cond