mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-30 03:40:34 +02:00
Fix example in syntax-rules doc
* doc/ref/api-macros.texi (Macros): Fix doc1 macro example Fixes debbugs.gnu.org/65132.
This commit is contained in:
parent
8441d8ff56
commit
1e3b5390e3
1 changed files with 3 additions and 3 deletions
|
@ -229,10 +229,10 @@ Literals are used to match specific datums in an expression, like the use of
|
||||||
((cond1 test => fun)
|
((cond1 test => fun)
|
||||||
(let ((exp test))
|
(let ((exp test))
|
||||||
(if exp (fun exp) #f)))
|
(if exp (fun exp) #f)))
|
||||||
((cond1 test exp exp* ...)
|
|
||||||
(if test (begin exp exp* ...)))
|
|
||||||
((cond1 else exp exp* ...)
|
((cond1 else exp exp* ...)
|
||||||
(begin exp exp* ...))))
|
(begin exp exp* ...))
|
||||||
|
((cond1 test exp exp* ...)
|
||||||
|
(if test (begin exp exp* ...)))))
|
||||||
|
|
||||||
(define (square x) (* x x))
|
(define (square x) (* x x))
|
||||||
(cond1 10 => square)
|
(cond1 10 => square)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue