Get root library name

This commit is contained in:
Justin Ethier 2017-04-29 00:46:47 +00:00
parent dc42d5a1d4
commit 10569ddcfd

View file

@ -255,7 +255,8 @@
(string-append "c_" lib-name-str "_inlinable_lambdas"))))
(cond
((imported? import)
(let ((lib-name (lib:list->import-set import))
(let ((lib-name (lib:import->library-name
(lib:list->import-set import)))
(vars/inlines
(filter
(lambda (v/i)