diff options
author | dos-reis <gdr@axiomatics.org> | 2008-02-02 18:40:51 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2008-02-02 18:40:51 +0000 |
commit | af766b8f0eca0aeebaba80c1fd7947f7904fb1fb (patch) | |
tree | fab21fb0d9aa891848c920411fb5fd3dc4812987 /src/boot | |
parent | 98246580bde4dcf9c5dcbf58f3e882bf7f969ddd (diff) | |
download | open-axiom-af766b8f0eca0aeebaba80c1fd7947f7904fb1fb.tar.gz |
* boot/translator.boot (translateBootFile): Tidy.
Diffstat (limited to 'src/boot')
-rw-r--r-- | src/boot/translator.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/translator.boot b/src/boot/translator.boot index 8d866052..cabf8d5a 100644 --- a/src/boot/translator.boot +++ b/src/boot/translator.boot @@ -747,7 +747,7 @@ defaultBootToLispFile file == CONCAT(shoeRemovebootIfNec file,'".clisp") translateBootFile(progname, options, file) == - outFile := getOutputPathname(options) + outFile := getOutputPathname options or defaultBootToLispFile file BOOTTOCL(file, ENOUGH_-NAMESTRING outFile) compileBootHandler(progname, options, file) == |