~ chicken-core (master) 429da8d86b50e530b396dfb507ceecc66f047b1d

commit 429da8d86b50e530b396dfb507ceecc66f047b1d
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sun Aug 16 21:07:48 2026 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Sun Aug 16 21:07:48 2026 +0200

    fix types.db entry for floor-remainder/floor-quotienz
    
    (reported by "Zipheir")

diff --git a/types.db b/types.db
index 10993919..eb0700e1 100644
--- a/types.db
+++ b/types.db
@@ -872,8 +872,8 @@
 (scheme#square (#(procedure #:pure) scheme#square ((or integer ratnum float)) (or integer ratnum float)))
 (scheme#floor/ (#(procedure #:clean #:enforce #:foldable) scheme#floor/ ((or integer float) (or integer float)) (or integer float) (or integer float)))
 (scheme#truncate/ (#(procedure #:clean #:enforce #:foldable) scheme#truncate/ ((or integer float) (or integer float)) (or integer float) (or integer float)))
-(scheme#floor-quotient (#(procedure #:clean #:enforce #:foldable) scheme#floor-quotient ((or integer float) (or integer float))))
-(scheme#floor-remainder (#(procedure #:clean #:enforce #:foldable) scheme#floor-remainder ((or integer float) (or integer float))))
+(scheme#floor-quotient (#(procedure #:clean #:enforce #:foldable) scheme#floor-quotient ((or integer float) (or integer float)) (or integer float)))
+(scheme#floor-remainder (#(procedure #:clean #:enforce #:foldable) scheme#floor-remainder ((or integer float) (or integer float)) (or integer float)))
 
 (scheme#boolean=? (#(procedure #:pure) scheme#boolean=? (boolean boolean #!rest boolean) boolean))
 (scheme#symbol=? (#(procedure #:pure) scheme#symbol=? (symbol symbol #!rest symbol) boolean))