mescc: Use a.out as default executable name.

* module/mescc/mescc.scm (hex2->elf): Use a.out as default executable
name.
This commit is contained in:
Jan Nieuwenhuizen 2019-02-27 15:49:22 +01:00
parent dbf1ddbad1
commit d72661756d
No known key found for this signature in database
GPG Key ID: F3C1A0D9C1D65273
1 changed files with 1 additions and 1 deletions

View File

@ -198,7 +198,7 @@
(define* (hex2->elf options hex2-files #:key elf-footer)
(let* ((input-file-name (car (option-ref options '() '("a.c"))))
(elf-file-name (cond ((option-ref options 'output #f))
(else (replace-suffix input-file-name ""))))
(else "a.out")))
(verbose? (option-ref options 'verbose #f))
(hex2 (or (getenv "HEX2") "hex2"))
(machine (option-ref options 'machine "32"))