From 58be0fd7e09faa2d6afd32a0ae176b0da93e5c6d Mon Sep 17 00:00:00 2001 From: Danny Milosavljevic Date: Wed, 20 Mar 2019 17:46:30 +0100 Subject: [PATCH] ARM: mescc: Handle command-line option "-marm". * module/mescc/mescc.scm (arch-get): Handle command-line option "-marm". --- module/mescc/mescc.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/module/mescc/mescc.scm b/module/mescc/mescc.scm index 9b8ad2fa..32c928d6 100644 --- a/module/mescc/mescc.scm +++ b/module/mescc/mescc.scm @@ -291,7 +291,8 @@ (arch (option-ref options 'arch #f))) (if machine (cond ((member arch '("x86" "x86_64")) (cond ((equal? machine "32") "x86") ((equal? machine "64") "x86_64"))) - ((equal? arch "arm") (cond ((equal? machine "32") "arm")))) + ((equal? arch "arm") (cond ((equal? machine "32") "arm") + ((equal? machine "arm") "arm")))) arch))) (define (mescc:get-host options)