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:
parent
dbf1ddbad1
commit
d72661756d
|
@ -198,7 +198,7 @@
|
||||||
(define* (hex2->elf options hex2-files #:key elf-footer)
|
(define* (hex2->elf options hex2-files #:key elf-footer)
|
||||||
(let* ((input-file-name (car (option-ref options '() '("a.c"))))
|
(let* ((input-file-name (car (option-ref options '() '("a.c"))))
|
||||||
(elf-file-name (cond ((option-ref options 'output #f))
|
(elf-file-name (cond ((option-ref options 'output #f))
|
||||||
(else (replace-suffix input-file-name ""))))
|
(else "a.out")))
|
||||||
(verbose? (option-ref options 'verbose #f))
|
(verbose? (option-ref options 'verbose #f))
|
||||||
(hex2 (or (getenv "HEX2") "hex2"))
|
(hex2 (or (getenv "HEX2") "hex2"))
|
||||||
(machine (option-ref options 'machine "32"))
|
(machine (option-ref options 'machine "32"))
|
||||||
|
|
Loading…
Reference in New Issue