summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMichael Gran <spk121@yahoo.com>2022-11-10 06:51:30 -0800
committerMichael Gran <spk121@yahoo.com>2022-11-10 10:33:57 -0800
commit6d436ac58a4925132de0ad4b82e34ef42039e9fe (patch)
treec4cbda7382416b562f858427af592bb620d8f9cb
parentab0a917ff4478a11fd43aa370ef86db72f383501 (diff)
downloadguile-6d436ac58a4925132de0ad4b82e34ef42039e9fe.tar.gz
Revert "REMOVEME mingw: Hardcode compile-time-file-name-convention to 'mingw."
This reverts commit e2f9cfed6318ed85fd72315326c8ef76c4e5b725.
-rw-r--r--module/ice-9/boot-9.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm
index 3e45eadba..e6130d1f1 100644
--- a/module/ice-9/boot-9.scm
+++ b/module/ice-9/boot-9.scm
@@ -2062,7 +2062,7 @@ non-locally, that exit determines the continuation."
(eval-when (eval)
(define (compile-time-file-name-convention)
- (let ((target (or "mingw" "FIXME" ((@ (system base target) target-type)))))
+ (let ((target (or "FIXME" ((@ (system base target) target-type)))))
(cond ((equal? target %host-type)
(system-file-name-convention))
((string-contains-ci target "mingw")