Handle import sets containing numbers

This commit is contained in:
Justin Ethier 2016-03-31 22:06:38 -04:00
parent 444bf8d61f
commit 9a0a0dc5ec

View file

@ -1352,7 +1352,7 @@
(foldr (lambda (id s) (foldr (lambda (id s)
(string-append "_" (mangle id) s)) (string-append "_" (mangle id) s))
"" ""
import)) (lib:list->import-set import)))
(define (mta:code-gen input-program (define (mta:code-gen input-program
program? program?