~ chicken-core (chicken-5) 9c6fb001c25de4390f46ffd7c3c94237f4df92a9


commit 9c6fb001c25de4390f46ffd7c3c94237f4df92a9
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sun Nov 6 19:40:40 2022 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Sun Nov 6 19:40:40 2022 +0100

    missing entry for -K in short option list
    
    (reported by leah2)

diff --git a/csi.scm b/csi.scm
index dcd67594..765d8c40 100644
--- a/csi.scm
+++ b/csi.scm
@@ -926,7 +926,7 @@ EOF
 		 (else (find (cdr ks))) ) ) ) ) )
 
 (define-constant short-options 
-  '(#\k #\s #\h #\D #\e #\i #\R #\b #\n #\q #\w #\- #\I #\p #\P) )
+  '(#\k #\s #\h #\D #\e #\i #\R #\b #\n #\q #\w #\- #\I #\p #\P #\K) )
 
 (define-constant long-options
   '("-ss" "-sx" "-script" "-version" "-help" "--help" "-feature" "-no-feature" "-eval"
Trap