------------------------ chibi ------------------------


I can't find any support keyword arguments in chibi.


------------------------ chicken ------------------------

#! /bin/sh
#| -*- scheme -*-
exec csi -s $0 "$@"
|#

(use r7rs)
(import (scheme base)
        (scheme write))

(define (blerg a #!key (b 0) (c 1))
  (display "a=") (write a) (display ", ")
  (display "b=") (write b) (display ", ")
  (display "c=") (write c) (newline))

(blerg 4)
(blerg 4 b: 5)
(blerg 4 b: 5 c: 6)


------------------------ gauche ------------------------


#! /bin/sh
#| -*- scheme -*-
exec gosh $0 "$@"
|#

;; Gauche allows keyed arguments in r5rs mode, but not r7rs mode?
;; exec gosh $0 "$@"
;; (import (scheme base)
;;         (scheme write))

(define (blerg a :key (b 0) (c 1))
  (display "a=") (write a) (display ", ")
  (display "b=") (write b) (display ", ")
  (display "c=") (write c) (newline))

(blerg 4)
(blerg 4 :b 5)
(blerg 4 :b 5 :c 6)


------------------------ sagittarius ------------------------

#! /bin/sh
#| -*- scheme -*-
exec sash $0 "$@"
|#

(import (scheme base)
        (scheme write))

(define (blerg a :key (b 0) (c 1))
  (display "a=") (write a) (display ", ")
  (display "b=") (write b) (display ", ")
  (display "c=") (write c) (newline))

(blerg 4)
(blerg 4 :b 5)
(blerg 4 :b 5 :c 6)