Renamed module

This commit is contained in:
Justin Ethier 2015-06-11 22:21:01 -04:00
parent 4530241ad4
commit 0ef98dc6f5
2 changed files with 3 additions and 2 deletions

View file

@ -4,6 +4,7 @@
; TODO: need filter for the next two. also, they really belong in SRFI-1, not here ; TODO: need filter for the next two. also, they really belong in SRFI-1, not here
;delete ;delete
;delete-duplicates ;delete-duplicates
list-insert-at!
call-with-current-continuation call-with-current-continuation
call/cc call/cc
call-with-values call-with-values
@ -63,7 +64,7 @@
Cyc-remove-exception-handler Cyc-remove-exception-handler
newline newline
) )
(include "cyclone.scm") (include "common.scm")
(begin (begin
(define *Cyc-version-banner* *version-banner*) (define *Cyc-version-banner* *version-banner*)
;; TODO: The whitespace characters are space, tab, line feed, form feed (not in parser yet), and carriage return. ;; TODO: The whitespace characters are space, tab, line feed, form feed (not in parser yet), and carriage return.

View file

@ -7,7 +7,7 @@
;; various utility functions used by the compiler. ;; 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 ;; Built-in macros
;; TODO: just a stub, real code would read (define-syntax) ;; TODO: just a stub, real code would read (define-syntax)