[Guile-commits] 21/25: Revert "squash! Fix 'absolute-file-name?' and others for cross-build to MinGW."

[Mike Gran]

mike121 pushed a commit to branch wip-mingw
in repository guile.

commit ec27a4d7d39af4acbb9ea87fe4869ede239270a0
Author: Michael Gran <spk121@yahoo.com>
AuthorDate: Thu Nov 10 06:52:21 2022 -0800

    Revert "squash! Fix 'absolute-file-name?' and others for cross-build to 
MinGW."
    
    This reverts commit a841ba1a6a5c4d6f5a6b77cb090a92a0a53ab327.
---
 module/ice-9/boot-9.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm
index e6130d1f1..d4a7d2327 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 "FIXME" ((@ (system base target) target-type)))))
+    (let ((target ((@ (system base target) target-type))))
       (cond ((equal? target %host-type)
              (system-file-name-convention))
             ((string-contains-ci target "mingw")