wip-mingw with x86_64 support updated for 3.0.8

[Jan Nieuwenhuizen]

Hi!

I've reset and updated wip-mingw onto latest main:

    https://git.savannah.gnu.org/cgit/guile.git/log/?h=wip-mingw

Most changes are simply a continuation of the previous
x86_64-w64-mingw32 work done for 3.0.7, using intptr_t and uintptr_t
instead of scm_t_inum or long and unsigned long.

There's one new problem though, the fix I made to determine
file-name-convention correctly when (cross)compiling and when running
now does not work anymore.

FIXME in 3.0.7, this works:

  ;; boot-9.scm
  (define (compile-time-file-name-convention)
    (let ((target ((@ (system base target) target-type))))
      (cond ((equal? target %host-type)
             (system-file-name-convention))
            ((string-contains-ci target "mingw")
             'windows)
            (else
             'posix)))))

in 3.0.8 it aborts hard.

    guile: uncaught exception:
    Unbound variable:define-module
    Cannot exit gracefully when init is in progress; aborting.

Anyway, I gave up and changed it back to 'posix always using this hack:

    (let ((target (or "FIXME" ((@ (system base target) target-type)))))

with a MinGW-specific for cross-compiling to MinGW to 'windows always:

    (let ((target (or "mingw" "FIXME" ((@ (system base target) target-type)))))

Ugh.  Ideas for a proper fix much appreciated!

Other than that, guile-mingw can still be built by doing

    GUIX_PACKAGE_PATH=guix guix build guile-mingw

Greetings,
Janneke

-- 
Jan Nieuwenhuizen <janneke@gnu.org>  | GNU LilyPond https://lilypond.org
Freelance IT https://JoyOfSource.com | Avatar® https://AvatarAcademy.com