shelarcy
shela****@capel*****
2004年 11月 30日 (火) 20:06:20 JST
こんにちは。
MinGW 版で SLIB を使えるようにするために、以下のパッチを書きました。
diff --dos -Nur C:\develop\Gauche.orig/configure.ac
C:\develop\Gauche/configure.ac
--- C:\develop\Gauche.orig/configure.ac Tue Nov 30 11:44:15 2004
+++ C:\develop\Gauche/configure.ac Tue Nov 30 19:48:41 2004
@@ -41,6 +41,14 @@
dnl ----------------------------------------------------------
dnl with-slib
dnl
+
+dnl For Windows/MinGW, platform is MS-DOS
+case "$target" in
+ *mingw*) SLIB_PLATFORM=MS-DOS;;
+ *) SLIB_PLATFORM=UNIX;;
+esac
+AC_SUBST(SLIB_PLATFORM)
+
SLIB_DIR=/usr/local/slib
AC_ARG_WITH(slib,
AC_HELP_STRING([--with-slib=PATH],
diff --dos -Nur C:\develop\Gauche.orig/lib/slib.scm.in
C:\develop\Gauche/lib/slib.scm.in
--- C:\develop\Gauche.orig/lib/slib.scm.in Thu Dec 18 11:05:46 2003
+++ C:\develop\Gauche/lib/slib.scm.in Tue Nov 30 19:49:51 2004
@@ -17,7 +17,7 @@
;;; (software-type) should be set to the generic operating system type.
;;; UNIX, VMS, MACOS, AMIGA and MS-DOS are supported.
-(define (software-type) 'UNIX)
+(define (software-type) '@SLIB_PLATFORM@)
;;; (scheme-implementation-type) should return the name of the scheme
;;; implementation loading this file.
--
shelarcy <shelarcy capella.freemail.ne.jp>
http://page.freett.com/shelarcy/