From 10569ddcfd31a5291f74325773c9a3855987fa2d Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Sat, 29 Apr 2017 00:46:47 +0000
Subject: [PATCH] Get root library name

---
 cyclone.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/cyclone.scm b/cyclone.scm
index 8c7a0084..5112c9c5 100644
--- a/cyclone.scm
+++ b/cyclone.scm
@@ -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)