keyword-app.rkt (314B)
1 #lang racket/base 2 3 (provide keyword-app 4 keyword-app/sort 5 ) 6 7 (require "keyword-apply-sort.rkt" 8 ) 9 10 (define (keyword-app f kws kw-args . rst-args) 11 (keyword-apply f kws kw-args rst-args)) 12 13 (define (keyword-app/sort f kws kw-args . rst-args) 14 (keyword-apply/sort f kws kw-args rst-args)) 15