plt-r6rs executable and initial r6rs docs
svn: r8859 original commit: b7cfd2fd0035df7a11cf274d1d3d4b43c13c50ef
This commit is contained in:
parent
b3c659f9d9
commit
19c351d03b
|
@ -121,7 +121,7 @@
|
|||
|
||||
(define/private (convert-key prefix k)
|
||||
(case (car k)
|
||||
[(part tech)
|
||||
[(part tech cite)
|
||||
(let ([rhs (cadr k)])
|
||||
(if (or (string? rhs) (pair? rhs))
|
||||
(list (car k) (cons prefix (if (pair? rhs)
|
||||
|
|
Loading…
Reference in New Issue
Block a user