mescc: Do not return ELF text.
authorJan Nieuwenhuizen <janneke@gnu.org>
Mon, 3 Apr 2017 05:09:03 +0000 (07:09 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Mon, 3 Apr 2017 05:09:03 +0000 (07:09 +0200)
* module/language/c99/compiler.mes (info->exe): Do not return ELF text.

module/language/c99/compiler.mes

index 30f7f8d525ca6d780a09530e1a5d41c42861bdf1..77ef236c0e4a680b1af416ee0341a941b9fd1277 100644 (file)
 
 (define (info->exe info)
   (display "dumping elf\n" (current-error-port))
-  (map write-any (make-elf (.functions info) (.globals info) (.init info))))
+  (for-each write-any (make-elf (.functions info) (.globals info) (.init info))))
 
 (define (.formals o)
   (pmatch o