~ chicken-core (chicken-5) 5cde640bcff2af77dc9030250e9326939d20fa44


commit 5cde640bcff2af77dc9030250e9326939d20fa44
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Mon Nov 22 04:22:38 2010 -0500
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Mon Nov 22 04:22:38 2010 -0500

    forgot equal=? in types.db and import lib (as usual)

diff --git a/chicken.import.scm b/chicken.import.scm
index acb2b413..b32ef506 100644
--- a/chicken.import.scm
+++ b/chicken.import.scm
@@ -65,8 +65,9 @@
    current-seconds
    define-reader-ctor
    delete-file
-   enable-warnings
    directory-exists?
+   enable-warnings
+   equal=?
    errno
    error
    exit
diff --git a/types.db b/types.db
index 5c67de6c..fc10fbc7 100644
--- a/types.db
+++ b/types.db
@@ -266,6 +266,7 @@
 (define-reader-ctor (procedure define-reader-ctor (symbol procedure) undefined))
 (delete-file (procedure delete-file (string) string))
 (enable-warnings (procedure enable-warnings (#!optional *) *))
+(equal=? (procedure equal=? (* *) boolean))
 (errno (procedure errno () fixnum))
 (error (procedure error (#!rest) noreturn))
 (exit (procedure exit (#!optional fixnum) noreturn))
Trap