conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

syntax error around comma

This commit is contained in:
Yuichi Nishiwaki 2014-06-27 07:28:56 +09:00
parent 556a460663
commit a98411cd0b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
piclib/built-in.scm
View File

@ -1063,7 +1063,7 @@
(let-values (((match1 vars1) (compile-match-base (car pattern)))) (let-values (((match1 vars1) (compile-match-base (car pattern))))
(loop (cdr pattern) (loop (cdr pattern)
(cons `(,_if (,_pair? ,accessor) (cons `(,_if (,_pair? ,accessor)
(,_let ((expr (,_car,accessor))) (,_let ((expr (,_car ,accessor)))
,match1) ,match1)
(exit #f)) (exit #f))
matches) matches)