utils: Mention that auto-hash-ref/explicit and auto-hash-ref/: take 1 body.

This commit is contained in:
Sergiu Ivanov 2020-02-17 00:27:04 +01:00
parent cb45bea4c9
commit a385f2e464
1 changed files with 3 additions and 0 deletions

View File

@ -23,6 +23,7 @@
;;; (auto-hash-ref/explicit (ht a b) (+ a (* 2 b))))
;;; 5
;;;
;;; Note that only one expression can be supplied in the body.
(define-syntax (auto-hash-ref/explicit stx)
(syntax-parse stx
[(_ (ht:id xs:id ...) body:expr)
@ -40,6 +41,8 @@
;;;
;;; Note that the symbol :a is matched to the key 'a in the hash
;;; table.
;;;
;;; Note that only one expression can be supplied in the body.
(define-syntax (auto-hash-ref/: stx)
(syntax-parse stx
[(_ ht:id body)