Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 05:39:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

when extracting optional parameter names, offset cadr by 1

Browse source
This commit is contained in:
Alex Shinn 2015-07-04 23:17:15 +09:00
parent 2a203e9ff5
commit b93aa9cad9
1 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lib/chibi/doc.scm
View file

@ -513,10 +513,14 @@ div#footer {padding-bottom: 50px}
((v ('if ('and ('pair? (? o?)) ('pair? ('cdr (? o?))))
('cadr (? o?))
default))
(lp (cdr ls) (cons (cons v (if ordered? j i)) vars) j))
(lp (cdr ls)
(cons (cons v (+ 1 (if ordered? j i))) vars)
j))
((v ('and ('pair? (? o?)) ('pair? ('cdr (? o?)))
('cadr (? o?))))
(lp (cdr ls) (cons (cons v (if ordered? j i)) vars) j))
(lp (cdr ls)
(cons (cons v (+ 1 (if ordered? j i))) vars)
j))
(else
(lp (cdr ls) vars j))))
(else