~ chicken-core (master) 65a6f57ac8cba26735be9dca5a3d6282a23d309f


commit 65a6f57ac8cba26735be9dca5a3d6282a23d309f
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Nov 20 10:57:37 2025 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Nov 20 10:57:37 2025 +0100

    expt is in (scheme base), not (scheme inexact) (thanks, Diego)

diff --git a/modules.scm b/modules.scm
index a14a1c0d..b9fc3a37 100644
--- a/modules.scm
+++ b/modules.scm
@@ -1194,6 +1194,7 @@
     (sqrt . scheme#sqrt)
     (square . scheme#square)
     (exact-integer-sqrt . scheme#exact-integer-sqrt)
+    (expt . scheme#expt)
     (number->string . scheme#number->string)
     (string->number . scheme#string->number)
     (char? . scheme#char?) (char=? . scheme#char=?)
@@ -1384,7 +1385,7 @@
 
 (##sys#register-core-module
  'scheme.inexact 'library
- '((exp . scheme#exp) (log . scheme#log) (expt . scheme#expt)
+ '((exp . scheme#exp) (log . scheme#log)
    (sqrt . scheme#sqrt) (nan? . chicken.base#nan?)
    (sin . scheme#sin) (cos . scheme#cos) (tan . scheme#tan)
    (asin . scheme#asin) (acos . scheme#acos) (atan . scheme#atan)
Trap