ruby-list

新井です。

In message "[ruby-list:30893] Re: ext/curses"
  on 09 Aug 2001 14:32:37 +0900,
  Takaaki Tateishi <ttate@jaist.ac.jp> wrote:
> 立石です．
> 
> At Thu, 9 Aug 2001 05:49:48 +0900,
> Koji Arai <JCA02266@nifty.ne.jp> wrote:
> > # 先に 1.7 へ commit して頂いた方が報告がしやすいし、パッチ
> > # が出しやすいです。そのための開発ブランチだし
> > # (その方が、他からの反応が速いだろうし)
> 
> 僕が不慣れなために，御迷惑おかけします．

あっ、いえ。なんか言葉が悪かったみたいで。迷惑ってことじゃな
いです。

> # 参考: http://www.opengroup.org/onlinepubs/7908799/xcurses/curses.h.html
> 
> マウス関係についてはどうすれば良いかちょっと調べたり考えたり
> してみます．しばらくはそのままになると思いますが，何か公開で
> きる情報など見つけたら教えて下さい．

とりあえず、コンパイルを通すようにしてみました。私が curses 関係
詳しければもうちょっとましな修正ができるのでしょうけど。

単に警告が出ないようにするだけの修正も含んでます。(例えば、
関数内でのstatic 関数の宣言は警告が出たりします)。

# extconf.rb はこんなんでいいのか？


diff -ru ruby-curses.org/curses.c ruby-curses/curses.c
--- ruby-curses.org/curses.c	Thu Aug  9 22:53:12 2001
+++ ruby-curses/curses.c	Thu Aug  9 23:08:17 2001
@@ -57,6 +57,9 @@
 
 #define CHECK(c) c
 
+static VALUE window_attroff();
+static VALUE window_attron();
+static VALUE window_attrset();
 
 static void
 no_window()
@@ -461,7 +464,6 @@
 static VALUE
 curses_attroff(VALUE obj, VALUE attrs)
 {
-  static VALUE window_attroff();
   return window_attroff(rb_stdscr,attrs);  
   /* return INT2FIX(attroff(FIX2INT(attrs))); */
 }
@@ -469,7 +471,6 @@
 static VALUE
 curses_attron(VALUE obj, VALUE attrs)
 {
-  static VALUE window_attron();
   return window_attron(rb_stdscr,attrs);
   /* return INT2FIX(attroff(FIX2INT(attrs))); */
 }
@@ -477,7 +478,6 @@
 static VALUE
 curses_attrset(VALUE obj, VALUE attrs)
 {
-  static VALUE window_attrset();
   return window_attrset(rb_stdscr,attrs);
   /* return INT2FIX(attroff(FIX2INT(attrs))); */
 }
@@ -1050,7 +1050,7 @@
   GetWINDOW(obj, winp);
   res = wsetscrreg(winp->window, NUM2INT(top), NUM2INT(bottom));
   return (res == OK) ? Qtrue : Qfalse;
-};
+}
 
 static VALUE
 window_scroll(VALUE obj)
@@ -1078,7 +1078,7 @@
 
   GetWINDOW(obj,winp);
   return INT2FIX(wattroff(winp->window,FIX2INT(attrs)));
-};
+}
 
 static VALUE
 window_attron(VALUE obj, VALUE attrs)
@@ -1095,8 +1095,8 @@
   }
   else{
     return val;
-  };
-};
+  }
+}
 
 static VALUE
 window_attrset(VALUE obj, VALUE attrs)
@@ -1135,7 +1135,7 @@
   return CHR2FIX(getbkgd(winp->window));
 }
 #endif /* USE_COLOR */
-#ifdef USE_MOUSE
+
 static VALUE
 window_keypad(VALUE obj, VALUE val)
 {
@@ -1144,8 +1144,7 @@
   GetWINDOW(obj,winp);
   return (keypad(winp->window,(val == Qtrue) ? TRUE : FALSE)) == OK ?
     Qtrue : Qfalse;
-};
-#endif /* USE_MOUSE */
+}
 
 /*------------------------- Initialization -------------------------*/
 void
Only in ruby-curses: curses.o
Only in ruby-curses: curses.so
diff -ru ruby-curses.org/extconf.rb ruby-curses/extconf.rb
--- ruby-curses.org/extconf.rb	Thu Aug  9 22:53:12 2001
+++ ruby-curses/extconf.rb	Thu Aug  9 22:59:59 2001
@@ -27,7 +27,24 @@
     $CPPFLAGS += " -DUSE_COLOR"
   end
   if( have_func("getmouse") )
-    $CPPFLAGS += " -DUSE_MOUSE"
+    if try_link(<<END, $libs)
+#ifdef HAVE_NCURSES_H
+# include <ncurses.h>
+#else
+# ifdef HAVE_NCURSES_CURSES_H
+#  include <ncurses/curses.h>
+#else
+# ifdef HAVE_CURSES_COLR_CURSES_H
+#  include <varargs.h>
+#  include <curses_colr/curses.h>
+# else
+#  include <curses.h>
+# endif
+#endif
+main() { MEVENT m; getmouse(&m); }
+END
+      $CPPFLAGS += " -DUSE_MOUSE"
+    end
   end
   create_makefile("curses")
 end

--
新井康司 (Koji Arai)

Thread

Prev Next

In This Thread

Prev Next

[#30811] rbnamazu の field について — yoshikazu tsubaki <y-tsubaki@...>

[#30818] expect.rb について — takashi Yamaoka <t_yamashita@...>

[#30827] 正規表現まわりの parse — sheepman <sheepman@...>

[#30839] $ で始まるローカル変数への代入 — Kazuhiro NISHIYAMA <zn@...>

[#30841] Call for the "Lightning Talk" in Linux Conference 2001 — akira yamada / やまだあきら <akira@...>

[#30842] Matrix の仕様 — matz@... (Yukihiro Matsumoto)

[#30846] RD で罫線を引きたい — Masahiro Kawata <mas@...>

[#30850] ruby-mode.el の改善案 — sheepman <sheepman@...>

[#30851] hook for rd-mode.el — Kenichi Komiya <kom@...1.accsnet.ne.jp>

[#30852] Ruby/Tk on Windows — hidaka@... (HIDAKA Takahiro)

[#30854] add missing feature on the fly — Kenichi Komiya <kom@...1.accsnet.ne.jp>

[#30855] オブジェクトをソースへ — Daisuke Aoki <dai@...>

[#30866] Re:int/int =>float? — Itou-T15@...

[#30871] RTtool 0.1.6 — rubikitch <rubikitch@...>

[#30872] ext/curses — Takaaki Tateishi <ttate@...>

[#30873] ps or /proc on Windows NT — Mitsuhiro Kondo <kondo@...>

[#30877] RWiki-1.2.2 — Masatoshi SEKI <m_seki@...>

[#30885] SAGE — "Shin'ya Adzumi" <adzumi@...>

[#30886] RDE0.9.1.0 公開 — 斉藤 和樹 <QZS01353@...>

[#30888] RubyConf 2001 — TAKAHASHI Masayoshi <maki@...>

[#30897] ActiveScriptRuby + showModalDialog — keiichi matsunaga <ma2@...>

[#30910] http-access2 — "Akinori MUSHA" <knu@...>

[#30914] RDTool の Reference — "E.Ryoj" <enomoto@...>

[#30920] [REQ] Regexp#match! — Minero Aoki <aamine@...>

[#30930] the latest snapshots — "Akinori MUSHA" <knu@...>

[#30936] Ruby/Fltk — Takaaki Tateishi <ttate@...>

[#30938] url Library? — "Inoue" <inoue@...>

[#30945] file exist check method? — "Inoue" <inoue@...>

[#30961] popen() で Insecure PATH — 堀川 久 <vzw00011@...>

[#30972] why does the /\1/ match "foo" — Koji Arai <JCA02266@...>

[#30982] add-log-current-defun for Ruby — TAKAHASHI Kaoru <kaoru@...>

[#30985] [ANN] MPIO-0.0.20010819 released — MoonWolf <moonwolf@...>

[#30987] [REQ] String#slice(re, n) — Minero Aoki <aamine@...>

[#31002] ruby のインストール — Andre Ribeiro Hanai <andre@...>

[#31005] インストールしました — 嶋崎 正貴 <hayashih@...>

[#31013] nested ERbLight — rubikitch@...

[#31016] TCPSocket.open error — Koichi Takehara <Koichi.Takehara@...>

[#31035] 安全な文字列の評価方法 — 斉藤和樹 <QZS01353@...>

[#31044] refe 0.4 — Minero Aoki <aamine@...>

[#31054] sockaddr_in 構造体の pack — Koji Arai <JCA02266@...>

[#31060] WIN32OLE の質問 : 環境変数の設定はどうやる？ — Hirofumi Tamori <tamori@...>

[#31066] [Q] string underline in emacs — "K.Kosako" <kosako@...>

[#31069] ruby と mysql の使える webhosting — Ryuichiro Hara <ruby@...>

[#31071] ruby on sun — Koichi Takehara <Koichi.Takehara@...>

[#31106] 黄道編 get! — Noritsugu Nakamura <nnakamur@...>

[#31114] ftp.ruby-lang.org — 堀川 久 <vzw00011@...>

[#31119] [RDP] cgi/session.rb — rubikitch <rubikitch@...>

[#31122] xemacs21 の html-mode で <% ... %> を注釈する方法？ — SAITO Shukaku <shukaku@...>

[#31123] file pass win unix — "Inoue" <inoue@...>

[#31126] setup.rb 3.0 — Minero Aoki <aamine@...>

[#31128] Ruby.exe で実行中は編集禁止？ — Take_tk <ggb03124@...>

[#31141] CSV — Kenji Noda <zaq94465a@...>

[#31144] create_process または Win での外部コマンド実行 — Take_tk <ggb03124@...>

[#31171] プログラミング Ruby — akira yamada / やまだあきら <akira@...>

[ruby-list:30902] Re: ext/curses

Thread

In This Thread

[#30886] RDE0.9.1.0 公開 — 斉藤　和樹 <QZS01353@...>

[#30961] popen() で Insecure PATH — 堀川久 <vzw00011@...>

[#31005] インストールしました — 嶋崎　正貴 <hayashih@...>

[#31114] ftp.ruby-lang.org — 堀川久 <vzw00011@...>