~ chicken-core (master) e0254fe081d167d293eaa47813efe827bde46cb7

commit e0254fe081d167d293eaa47813efe827bde46cb7
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Fri Aug 28 15:56:01 2026 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri Aug 28 15:56:01 2026 +0200

    formatting

diff --git a/core.scm b/core.scm
index b3707cb2..c33e33a3 100644
--- a/core.scm
+++ b/core.scm
@@ -1873,7 +1873,9 @@
 	  [head (if cps
 		    `((##core#primitive ,f-id))
 		    `(##core#inline ,f-id) ) ]
-	  [rest (map (lambda (p t) (foreign-type-check (foreign-type-convert-argument p t) t)) params argtypes)] )
+	  [rest (map (lambda (p t) 
+                       (foreign-type-check (foreign-type-convert-argument p t) t)) 
+                     params argtypes)] )
       `(##core#lambda ,params
 	 ;; Do minor GC (if callback) to make room on stack:
 	 ,@(if callback '((##sys#gc #f)) '())