From 0ef98dc6f5c6a24dfba96c25f06538808003f387 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Thu, 11 Jun 2015 22:21:01 -0400
Subject: [PATCH] Renamed module

---
 scheme/base.sld | 3 ++-
 transforms.scm  | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/scheme/base.sld b/scheme/base.sld
index ff910029..65f6dfc2 100644
--- a/scheme/base.sld
+++ b/scheme/base.sld
@@ -4,6 +4,7 @@
     ; TODO: need filter for the next two. also, they really belong in SRFI-1, not here
     ;delete
     ;delete-duplicates
+    list-insert-at!
     call-with-current-continuation
     call/cc
     call-with-values
@@ -63,7 +64,7 @@
     Cyc-remove-exception-handler
     newline
   )
-  (include "cyclone.scm")
+  (include "common.scm")
   (begin
     (define *Cyc-version-banner* *version-banner*)
     ;; TODO: The whitespace characters are space, tab, line feed, form feed (not in parser yet), and carriage return.
diff --git a/transforms.scm b/transforms.scm
index 908f0f2d..07367611 100644
--- a/transforms.scm
+++ b/transforms.scm
@@ -7,7 +7,7 @@
 ;; various utility functions used by the compiler.
 ;;
 
-(load (string-append (cyc:get-lib-dir) "scheme/cyclone.scm"))
+(load (string-append (cyc:get-lib-dir) "scheme/common.scm"))
 
 ;; Built-in macros
 ;; TODO: just a stub, real code would read (define-syntax)