diff --git a/scheme/cyclone/cgen.sld b/scheme/cyclone/cgen.sld
index 6cb5d4b4..16134b06 100644
--- a/scheme/cyclone/cgen.sld
+++ b/scheme/cyclone/cgen.sld
@@ -1352,7 +1352,7 @@
   (foldr (lambda (id s) 
            (string-append "_" (mangle id) s)) 
          "" 
-         import))
+         (lib:list->import-set import)))
 
 (define (mta:code-gen input-program 
                       program?