suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
original commit: 23e48e7d2e1ef9a55041e1af320ed82a2627d680
This commit is contained in:
Eli Barzilay 2004-10-15 13:43:34 +00:00
parent 64a0fc97c2
commit 35b252cf93
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mzlib/etc.ss
View File

@ -457,7 +457,7 @@
(if (and (pair? dir) (eq? 'plthome (car dir)))
(with-syntax ([d dir])
(syntax (un-plthome-ify 'd)))
(with-syntax ([d (path->bytes dir)])
(with-syntax ([d (if (bytes? dir) dir (path->bytes dir))])
(syntax (bytes->path d)))))]))
;; This is a macro-generating macro that wants to expand