ruby-list

前田です。

At Wed, 12 Dec 2001 15:45:38 +0900,
keiju@rational.com (石塚圭樹) wrote:
> >readlineの補完の「入力文字列」がナニなのかでかなりハマった。
> >/[ \t\n\"\\'`@$><=;|&{(]/でsplitされるのですね。
> 
> そうなんですよね. 
> 
> # irb(たぶんirbsh)でも, できれば@$は区切り文字にはしたくない
> 
> readlineで, この辺も設定できるようにしてと, 前田さんにリクエスト!!

現実逃避してみました。
こんなんでよいでしょうか。
# テストしてません:p

-- 
前田 修吾

--- readline.c	2001/09/06 05:14:06	1.7
+++ readline.c	2001/12/12 08:07:24
@@ -222,6 +222,206 @@
 }
 
 static VALUE
+readline_s_set_basic_word_break_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    static char *basic_word_break_characters = NULL;
+    char *s;
+
+    StringValue(str);
+    if (basic_word_break_characters == NULL) {
+	basic_word_break_characters =
+	    ALLOC_N(char, RSTRING(str)->len + 1);
+    }
+    else {
+	REALLOC_N(basic_word_break_characters, char, RSTRING(str)->len + 1);
+    }
+    strncpy(basic_word_break_characters,
+	    RSTRING(str)->ptr, RSTRING(str)->len);
+    basic_word_break_characters[RSTRING(str)->len] = '\0';
+    rl_basic_word_break_characters = basic_word_break_characters;
+
+    return self;
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
+readline_s_get_basic_word_break_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    if (rl_basic_word_break_characters == NULL)
+	return Qnil;
+    return rb_str_new2(rl_basic_word_break_characters);
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
+readline_s_set_completer_word_break_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    static char *completer_word_break_characters = NULL;
+    char *s;
+
+    StringValue(str);
+    if (completer_word_break_characters == NULL) {
+	completer_word_break_characters =
+	    ALLOC_N(char, RSTRING(str)->len + 1);
+    }
+    else {
+	REALLOC_N(completer_word_break_characters, char, RSTRING(str)->len + 1);
+    }
+    strncpy(completer_word_break_characters,
+	    RSTRING(str)->ptr, RSTRING(str)->len);
+    completer_word_break_characters[RSTRING(str)->len] = '\0';
+    rl_completer_word_break_characters = completer_word_break_characters;
+
+    return self;
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
+readline_s_get_completer_word_break_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    if (rl_completer_word_break_characters == NULL)
+	return Qnil;
+    return rb_str_new2(rl_completer_word_break_characters);
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
+readline_s_set_basic_quote_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    static char *basic_quote_characters = NULL;
+    char *s;
+
+    StringValue(str);
+    if (basic_quote_characters == NULL) {
+	basic_quote_characters =
+	    ALLOC_N(char, RSTRING(str)->len + 1);
+    }
+    else {
+	REALLOC_N(basic_quote_characters, char, RSTRING(str)->len + 1);
+    }
+    strncpy(basic_quote_characters,
+	    RSTRING(str)->ptr, RSTRING(str)->len);
+    basic_quote_characters[RSTRING(str)->len] = '\0';
+    rl_basic_quote_characters = basic_quote_characters;
+
+    return self;
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
+readline_s_get_basic_quote_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    if (rl_basic_quote_characters == NULL)
+	return Qnil;
+    return rb_str_new2(rl_basic_quote_characters);
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
+readline_s_set_completer_quote_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    static char *completer_quote_characters = NULL;
+    char *s;
+
+    StringValue(str);
+    if (completer_quote_characters == NULL) {
+	completer_quote_characters =
+	    ALLOC_N(char, RSTRING(str)->len + 1);
+    }
+    else {
+	REALLOC_N(completer_quote_characters, char, RSTRING(str)->len + 1);
+    }
+    strncpy(completer_quote_characters,
+	    RSTRING(str)->ptr, RSTRING(str)->len);
+    completer_quote_characters[RSTRING(str)->len] = '\0';
+    rl_completer_quote_characters = completer_quote_characters;
+
+    return self;
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
+readline_s_get_completer_quote_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    if (rl_completer_quote_characters == NULL)
+	return Qnil;
+    return rb_str_new2(rl_completer_quote_characters);
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
+readline_s_set_filename_quote_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    static char *filename_quote_characters = NULL;
+    char *s;
+
+    StringValue(str);
+    if (filename_quote_characters == NULL) {
+	filename_quote_characters =
+	    ALLOC_N(char, RSTRING(str)->len + 1);
+    }
+    else {
+	REALLOC_N(filename_quote_characters, char, RSTRING(str)->len + 1);
+    }
+    strncpy(filename_quote_characters,
+	    RSTRING(str)->ptr, RSTRING(str)->len);
+    filename_quote_characters[RSTRING(str)->len] = '\0';
+    rl_filename_quote_characters = filename_quote_characters;
+
+    return self;
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
+readline_s_get_filename_quote_characters(self, str)
+    VALUE self, str;
+{
+#ifdef READLINE_21_OR_LATER
+    if (rl_filename_quote_characters == NULL)
+	return Qnil;
+    return rb_str_new2(rl_filename_quote_characters);
+#else
+    rb_notimplement();
+#endif /* READLINE_21_OR_LATER */
+}
+
+static VALUE
 rb_remove_history(index)
     int index;
 {
@@ -476,6 +676,26 @@
 			       readline_s_set_completion_append_character, 1);
     rb_define_singleton_method(mReadline, "completion_append_character",
 			       readline_s_get_completion_append_character, 0);
+    rb_define_singleton_method(mReadline, "basic_word_break_characters=",
+			       readline_s_set_basic_word_break_characters, 1);
+    rb_define_singleton_method(mReadline, "basic_word_break_characters",
+			       readline_s_get_basic_word_break_characters, 0);
+    rb_define_singleton_method(mReadline, "completer_word_break_characters=",
+			       readline_s_set_completer_word_break_characters, 1);
+    rb_define_singleton_method(mReadline, "completer_word_break_characters",
+			       readline_s_get_completer_word_break_characters, 0);
+    rb_define_singleton_method(mReadline, "basic_quote_characters=",
+			       readline_s_set_basic_quote_characters, 1);
+    rb_define_singleton_method(mReadline, "basic_quote_characters",
+			       readline_s_get_basic_quote_characters, 0);
+    rb_define_singleton_method(mReadline, "completer_quote_characters=",
+			       readline_s_set_completer_quote_characters, 1);
+    rb_define_singleton_method(mReadline, "completer_quote_characters",
+			       readline_s_get_completer_quote_characters, 0);
+    rb_define_singleton_method(mReadline, "filename_quote_characters=",
+			       readline_s_set_filename_quote_characters, 1);
+    rb_define_singleton_method(mReadline, "filename_quote_characters",
+			       readline_s_get_filename_quote_characters, 0);
 
     histary = rb_obj_alloc(rb_cObject);
     rb_extend_object(histary, rb_mEnumerable);

Thread

Prev Next

In This Thread

Prev Next

[#32695] md5.so (LoadError) — FUKUI Osamu <o-fukui@...>

[#32701] Racc website 404 — rubikitch <rubikitch@...>

[#32721] コマンドラインオプション -K と -e — "Tatsuaki Nagai" <Tatsuaki_Nagai@...>

[#32727] require "./xxx" の「カレントディレクトリ」の意味 — Take_tk <ggb03124@...>

[#32735] Re: コマンドラインオプション -K と -e — "Tatsuaki Nagai" <Tatsuaki_Nagai@...>

[#32740] 空白を含むファイルを system で起動するには — Take_tk <ggb03124@...>

[#32758] [Q]Ruby/Gtk で画面を変化させる — yamato@...

[#32772] newdate — tadf@...

[#32783] Ruby/Becky! 0.9.7 — "T.Shimomura" <redbugml@...>

[#32797] dir_config (mkmf.rb) のオプション指定の優先順位 — tamra@...

[#32800] [ANN]irbsh-0.4.4 — rubikitch <rubikitch@...>

[#32801] blade Internal Server Error — Kazuhiro Yoshida <moriq.kazuhiro@...>

[#32806] Lucie 0.0.1 — TAKAMIYA Yasuhito <takamiya@...>

[#32807] irb 0.8 release — keiju@... (Keiju ISHITSUKA)

[#32814] 添削お願い — Take_tk <ggb03124@...>

[#32827] Ruby Test Form — 堀川 久 <vzw00011@...>

[#32832] irb & pp — rubikitch <rubikitch@...>

[#32836] configure.in for netbsd — hiramatu@...

[#32837] RubyAEOSA 0.1.0 — FUJIMOTO Hisakuni <hisa@...>

[#32840] [ANN]RDE0.9.3.0 公開 — sakazuki <QZS01353@...>

[#32843] [ANN] irbsh-0.5.0 — rubikitch <rubikitch@...>

[#32849] -e で実行した場合うまくいかない正規表現 — "Tatsuaki Nagai" <Tatsuaki_Nagai@...>

[#32853] Re: -e で実行した場合うまくいかない正規表現 — "Tatsuaki Nagai" <Tatsuaki_Nagai@...>

[#32858] [ANN] html-template 0.15 — IKEBE Tomohiro <ikebe@...>

[#32869] RAA update — rubikitch <rubikitch@...>

[#32878] [ANN] irbsh-0.5.1 — rubikitch <rubikitch@...>

[#32892] [ANN] RubyCocoa 0.1.3 — FUJIMOTO Hisakuni <hisa@...>

[#32896] Re: cygwin database Ruby Install MySQL PostgreSQL other... MS-Access(blase) — "井上 浩一" <kyoui32@...>

[#32904] Segmentation fault — em6t-kbt@...

[#32914] rb_define_module を一回だけ呼びたい — Takeshi Horinouchi <horinout@...>

[#32921] uri.rb compatibility — rubikitch <rubikitch@...>

[#32923] Ruby/GSL — yoshiki@...

[#32925] Re: -e で実行した場合うまくいかない正規表現 — "Tatsuaki Nagai" <Tatsuaki_Nagai@...>

[#32930] irbsh の rehash が遅い — rubikitch <rubikitch@...>

[#32935] Ruby256 倍本 " 界道編 " — shukaku@...

[#32939] [watch] 情処プロ研 02-01-30 — Noritsugu Nakamura <nnakamur@...>

[#32940] gsub でマッチした文字列を小文字に変換 — Takeshi Yamamoto <hora@...>

[#32945] class-in-state — keiju@... (Keiju ISHITSUKA)

[#32946] scope-in-state — keiju@... (Keiju ISHITSUKA)

[#32948] [uri.rb] strip or not — rubikitch <rubikitch@...>

[#32953] Ruby and dRuby on Turbolinux 7 — Tohru OTOKITA <otokita@...>

[#32967] URI should be URL+URN ? — OZAWA -Crouton- Sakuro <crouton@...>

[#32974] ruby で組んだ CGI の挙動がおかしい — Toru MITANI <toru_m@...2.dion.ne.jp>

[#32978] [Q]extract regular expression from String — Masaaki Sakano <mas@...>

[#32982] ロゴ？の扱い — encore ann <i@...>

[#32987] [Media Watch] 「横着プログラミング」 — Shin-ichiro HARA <sinara@...>

[#32989] write to $> causes error on mswin32/mingw32 — "U.Nakamura" <usa@...>

[#32999] [ANN] RubyCocoa 0.2.0 — FUJIMOTO Hisakuni <hisa@...>

[#33002] Re: [ruby-talk:29048] Re: Best way to do XML-RPC — TAKAHASHI Masayoshi <maki@...>

[#33007] tmail error — rubikitch <rubikitch@...>

[#33008] racc-1.3.7 --> racc-1.4.1 ではまったこと — Noritsugu Nakamura <nnakamur@...>

[#33009] [ANN]RDE0.9.3.1 公開 — sakazuki <QZS01353@...>

[#33014] "Walrus" on LinuxJapan — Taku Nakajima <tnakajima@...>

[#33025] ruby 1.6.6 is out — matz@... (Yukihiro Matsumoto)

[#33026] Ruby 1.6.6 リファレンスマニュアル日本語版 (RD) — Kazuhiro NISHIYAMA <zn@...>

[#33038] PStore on Windows — keiichi matsunaga <ma2@...>

[#33040] win32ole と Excel 倍精度 — ISIHARA HIROSI <ishihara-h@...>

[#33042] [][][] macro Ruby — "井上 浩一" <kyoui32@...>

[#33043] Re: win32ole と Excel 倍精度 — ISIHARA HIROSI <ishihara-h@...>

[#33047] regex bug? — Yamamoto Atsushi <yamamoto@...>

[#33050] cgi.rb で cookie の encoding について — Beyond <beyond@...>

[#33067] It wants to divide dirty source. library para-amino-salicylic acid — "井上 浩一" <kyoui32@...>

[#33068] Re: [][][] macro Ruby — "井上 浩一" <kyoui32@...>

[#33070] [ANN] Walrus-0.7.4 公開 — Taku Nakajima <tnakajima@...>

[#33100] ruby_unit newest binary in djgpp — maili31s@... (SugHimsi == SUGIHARA Hiroshi)

[#33114] 新年会 — "Shin'ya Adzumi" <adzumi@...>

[#33122] 中田さんとこの・・ — Take_tk <ggb03124@...>

[#33139] setup 3.0.2 のタスクオプション — FUJIMOTO Hisakuni <hisa@...>

[#33141] [ann] Q's WebCalendar リリース — 堀川 久 <vzw00011@...>

[ruby-list:32898] Re: [ANN] irbsh-0.5.1

Thread

In This Thread

[#32827] Ruby Test Form — 堀川久 <vzw00011@...>

[#32896] Re: cygwin database Ruby Install MySQL PostgreSQL other... MS-Access(blase) — "井上浩一" <kyoui32@...>

[#33042] [][][] macro Ruby — "井上浩一" <kyoui32@...>

[#33067] It wants to divide dirty source. library para-amino-salicylic acid — "井上浩一" <kyoui32@...>

[#33068] Re: [][][] macro Ruby — "井上浩一" <kyoui32@...>

[#33141] [ann] Q's WebCalendar リリース — 堀川久 <vzw00011@...>