guilmod

parent c22a9a9a
......@@ -255,8 +255,8 @@
(aif it (%search-load-path
(string-append p "." (car u)))
(apply guile-load it q)
(lp (cdr u)))
(lp (cdr l))))
(lp2 (cdr u)))
(lp (cdr l))))
(if (pair? q)
((car q))
(error (string-append "no code for path " p)))))))))))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment