ruby-dev

小松です。

In the message of [ruby-dev:10201] ruby-dev:7501 パッチ
    on 2000/7/4 21:58:39 arton <arton@geocities.co.jp> wrote:
|ruby-dev:7501で小松さんが出されているMSWin32用tcltklibパッチですが、現在
|のruby-1.4.5でextconf.rbの分は反映されているものの、tcltklib.cのほうが反
|映されていません。（多分、ruby-dev:7365あたりと前後して消えたんじゃない
|かと思いますが）
|よろしければ、反映していただけないでしょうか？
|（猛烈な量のエラーが出て面食らいました。）

tcl8.2やtcl8.3だと、エラーなしでコンパイルできてます。

[ruby-dev:7501]よりは、ruby.hでwindows.hをwin32/win32.h経由で
includeしてるから、"ruby.h"と"rubysig.h"のincludeを前にもって
くるほうがいいんじゃないかと思います。

しかし、それだけだとtcl8.2以前のバージョンでは、以下のような
warningが出てうるさいので、#undef EXTERNも足してみました。
あと、Tcl_CreateObjCommand()とTcl_CreateCommand()の4番目の引数の
キャストでwarningが出るので(ClientData)に変えてみました。

ftp://ftp.scriptics.com/から持ってきた以下のファイルを使用して
コンパイルできることを確認しました。動作確認まではしていません。

    tcl7.6 + tk4.2: win76p2.exe + vclibs76.zip
    tcl8.0.4:       tcl804.exe
    tcl8.2.3:       tcl823.exe
    tcl8.3.1:       tcl831.exe

C:\lang\ruby-1.5.4\ext\tcltklib>nmake -nologo
	cl -DIMPORT -IC:/lang/ruby-1.5.4 -IC:/lang/ruby-1.5.4 -nologo -DNT=1 -MDd -Zi  -I/usr/local/include -DHAVE_TCL_H -DHAVE_TK_H /c tcltklib.c
tcltklib.c
/usr/local/include\tcl.h(282) : warning C4005: 'EXTERN' : マクロが再定義されました。
	C:/lang/ruby-1.5.4\win32/win32.h(14) : 'EXTERN' の前の定義を確認してください

diff -ru2p ruby-1.5.4.dist/ext/tcltklib/tcltklib.c ruby-1.5.4/ext/tcltklib/tcltklib.c
--- ruby-1.5.4.dist/ext/tcltklib/tcltklib.c	Sun May 14 01:12:25 2000
+++ ruby-1.5.4/ext/tcltklib/tcltklib.c	Tue Jul  4 23:42:12 2000
@@ -5,10 +5,11 @@
  */
 
+#include "ruby.h"
+#include "rubysig.h"
+#undef EXTERN	/* avoid conflict with tcl.h of tcl8.2 or before */
 #include <stdio.h>
 #include <string.h>
 #include <tcl.h>
 #include <tk.h>
-#include "ruby.h"
-#include "rubysig.h"
 
 #ifdef __MACOS__
@@ -229,9 +230,9 @@ ip_new(self)
 #if TCL_MAJOR_VERSION >= 8
     DUMP1("Tcl_CreateObjCommand(\"ruby\")");
-    Tcl_CreateObjCommand(ptr->ip, "ruby", ip_ruby, (ClientData *)NULL,
+    Tcl_CreateObjCommand(ptr->ip, "ruby", ip_ruby, (ClientData)NULL,
 			 (Tcl_CmdDeleteProc *)NULL);
 #else
     DUMP1("Tcl_CreateCommand(\"ruby\")");
-    Tcl_CreateCommand(ptr->ip, "ruby", ip_ruby, (ClientData *)NULL,
+    Tcl_CreateCommand(ptr->ip, "ruby", ip_ruby, (ClientData)NULL,
 		      (Tcl_CmdDeleteProc *)NULL);
 #endif

--
小松克行 / Katsuyuki Komatsu <komatsu@sarion.co.jp>

Thread

Prev Next

In This Thread

Prev Next

[#10157] re.c memory leak ? — Katsuyuki Komatsu <komatsu@...>

[#10160] 1 >> 323232 — Tadayoshi Funaba <tadf@...>

[#10168] [BUG] ruby-1.5.4 — Koji Arai <JCA02266@...>

[#10170] sort_by — matz@... (Yukihiro Matsumoto)

[#10184] Bignum#remainder — nobu.nakada@...

[#10197] Re: modulo and remainder — matz@... (Yukihiro Matsumoto)

[#10201] ruby-dev:7501 パッチ — arton <arton@...>

[#10202] make clean failure — Katsuyuki Komatsu <komatsu@...>

[#10217] exit status of child process — nagai@...

[#10226] 組み込み Ruby — Kazuhiro Yoshida <moriq.kazuhiro@...>

[#10234] lib/profile.rb — Tadayoshi Funaba <tadf@...>

[#10238] date/date2 — matz@... (Yukihiro Matsumoto)

[#10243] Re: Time#usec — ARIMA Yasuhiro <fit0298@...>

[#10246] * io.c (rb_file_s_open): terminate fptr unless null. — WATANABE Hirofumi <eban@...>

[#10256] README.EXT の修正 — Noboru Saitou <noborus@...>

[#10259] thread bug? — Shugo Maeda <shugo@...>

[#10264] ext/socket changes for BeOS — Katsuyuki Komatsu <komatsu@...>

[#10267] FW: ruby's select causes busy waiting? — Jun-ichiro itojun Hagino <itojun@...>

[#10271] uri — matz@... (Yukihiro Matsumoto)

[#10272] date/date2 — matz@... (Yukihiro Matsumoto)

[#10278] Re: environment variables — WATANABE Hirofumi <eban@...>

[#10280] Ruby 1.4.5 ext/socket/socket.c — Katsuyuki Komatsu <komatsu@...>

[#10282] Config::CONFIG.each_value in rbconfig.rb — WATANABE Hirofumi <eban@...>

[#10288] bignum division has bug? — Hiroshi IGARASHI <igarashi@...>

[#10309] Telnet#preprocess — GOTOU YUUZOU <gotoyuzo@...>

[#10322] IO#eof? (ARGF) — WATANABE Tetsuya <tetsu@...>

[#10325] [REQ] print a warning message for overriding Object#__id__ — Hideto ISHIBASHI <hideto-i@...4u.or.jp>

[#10337] [PATCH] $OBJEXT and $objs in mkmf.rb — Minero Aoki <aamine@...>

[#10338] should prohibit `module_function' for class Class — WATANABE Hirofumi <eban@...>

[#10341] list and quit command in debug.rb — WATANABE Hirofumi <eban@...>

[#10347] -bignum % fixnum — Tadayoshi Funaba <tadf@...>

[#10351] configure がない — Kazuhiro NISHIYAMA <zn@...>

[#10356] [REQ] Array#replace {} — Minero Aoki <aamine@...>

[#10358] combining Ruby — Masaki Suketa <CQN02273@...>

[#10384] ruby 1.4.6 preview — matz@... (Yukihiro Matsumoto)

[#10439] Tk trouble on 1.5.x — nagai@...

[#10440] exception on TkAfter proc — nagai@...

[#10447] rational != obj — Tadayoshi Funaba <tadf@...>

[#10448] shellwords.rb — Tadayoshi Funaba <tadf@...>

[#10465] fileutils.rb — Minero Aoki <aamine@...>

[#10468] ruby -vh — Kazuhiro NISHIYAMA <zn@...>

[ruby-dev:10206] Re: ruby-dev:7501 パッチ

Thread

In This Thread

[#10325] [REQ] print a warning message for overriding Object#id — Hideto ISHIBASHI <hideto-i@...4u.or.jp>