ruby-japanize 0.1.0

data/lib/japanize/container.rb

@@ -0,0 +1,213 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize/core'
+
+要求 'japanize/base'
+要求 'japanize/names'
+
+組(配列) {
+  特異組{
+    別名 :可能なら変換, :try_convert
+  }
+
+  別名 :位置,                   :at
+  別名 :付け足す,               :push
+  別名 :連想取得,               :assoc
+  別名 :二分探索する,           :bsearch
+  別名 :二分探索して位置を返す, :bsearch_index
+  別名 :消去する,               :clear
+  # 別名 :複写,                 :clone   # 物で定義済み
+  # 別名 :複製,                 :dup     # 物で定義済み
+  別名 :集める!,                :collect!
+  別名 :対応させる!,            :map!
+  別名 :組み合わせ,             :combination
+  別名 :詰める,                 :compact
+  別名 :詰める!,                :compact!
+  別名 :連結,                   :concat
+  別名 :循環させる,             :cycle
+  別名 :削除,                   :delete
+  別名 :位置で削除,             :delete_at
+  別名 :条件で削除,             :delete_if
+  別名 :除く!,                  :reject!
+  別名 :差分,                   :difference
+  別名 :探り当てる,             :dig
+  別名 :個別に,                 :each
+  別名 :添字毎に,               :each_index
+  別名 :空か?,                  :empty?
+  # 別名 :等しいか?,            :eql?    # 物で定義済み
+  別名 :取得,                   :fetch
+  別名 :満たす,                 :fill
+  別名 :抽出する!,              :filter!
+  別名 :選択する!,              :select!
+  別名 :見つけたら位置を返す,   :find_index
+  別名 :位置を取得,             :index
+  別名 :先頭,                   :first
+  別名 :平らにする,             :flatten
+  別名 :平らにする!,            :flatten!
+  # 別名 :ハッシュ値,           :hash    # 物で定義済み
+  別名 :含むか?,                :include?
+  別名 :挿入,                   :insert
+  # 別名 :検査,                 :inspect # 物で定義済み
+  # 別名 :文字列に変換,         :to_s    # 物で定義済み
+  別名 :結合,                   :join
+  別名 :条件で残す,             :keep_if
+  別名 :末尾,                   :last
+  別名 :長さ,                   :length
+  別名 :大きさ,                 :size
+  別名 :最大,                   :max
+  別名 :最小,                   :min
+  別名 :情報を梱包,             :pack
+  別名 :順列,                   :permutation
+  別名 :取り出す,               :pop
+  別名 :先頭に付け足す,         :unshift
+  別名 :直積,                   :product
+  別名 :逆連想取得,             :rassoc
+  別名 :組み合わせを繰り返す,   :repeated_combination
+  別名 :順列を繰り返す,         :repeated_permutation
+  別名 :取り替える,             :replace
+  別名 :逆順,                   :reverse
+  別名 :逆順!,                  :reverse!
+  別名 :逆順で個別に,           :reverse_each
+  別名 :逆順で位置を取得,       :rindex
+  別名 :回転させる,             :rotate
+  別名 :回転させる!,            :rotate!
+  別名 :標本,                   :sample
+  別名 :先頭から取り出す,       :shift
+  別名 :無作為に混ぜる,         :shuffle
+  別名 :無作為に混ぜる!,        :shuffle!
+  別名 :断片,                   :slice
+  別名 :断片!,                  :slice!
+  別名 :整列,                   :sort
+  別名 :整列!,                  :sort!
+  別名 :この条件で整列!,        :sort_by!
+  別名 :合計,                   :sum
+  別名 :配列に変換,             :to_a
+  別名 :連想配列に変換,         :to_h
+  別名 :転置,                   :transpose
+  別名 :和集合,                 :union
+  別名 :重複を削除,             :uniq
+  別名 :重複を削除!,            :uniq!
+  別名 :位置で値の一覧を取得,   :values_at
+  別名 :より合わせる,           :zip
+}
+
+組(連想配列) {
+  特異組{
+    別名 :可能なら変換, :try_convert
+  }
+
+  # 別名 :等しいか?,            :eql?       # 物で定義済み
+  別名 :格納,                   :store
+  別名 :連想取得,               :assoc
+  別名 :消去する,               :clear
+  # 別名 :複写,                 :clone      # 物で定義済み
+  # 別名 :複製,                 :dup        # 物で定義済み
+  別名 :詰める,                 :compact
+  別名 :詰める!,                :compact!
+  別名 :同一性で比較する,       :compare_by_identity
+  別名 :同一性で比較するか?,    :compare_by_identity?
+  別名 :既定値,                 :default
+  別名 :既定値=,                :default=
+  別名 :既定値の手続き,         :default_proc
+  別名 :既定値の手続き=,        :default_proc=
+  別名 :削除,                   :delete
+  別名 :条件で削除,             :delete_if
+  別名 :除く!,                  :reject!
+  別名 :探り当てる,             :dig
+  別名 :個別に,                 :each
+  別名 :対毎に,                 :each_pair
+  別名 :キー毎に,               :each_key
+  別名 :値毎に,                 :each_value
+  別名 :空か?,                  :empty?
+  # 別名 :同一か?,              :equal?     # 物の土台で定義済み
+  別名 :取得,                   :fetch
+  別名 :値の一覧を取得,         :fetch_values
+  別名 :選択する,               :select
+  別名 :抽出する,               :filter
+  別名 :条件で残す,             :keep_if
+  別名 :選択する!,              :select!
+  別名 :抽出する!,              :filter!
+  別名 :平らにする,             :flatten
+  別名 :キーを持つか?,          :has_key?
+  別名 :含むか?,                :include?
+  別名 :キーか?,                :key?
+  別名 :一員か?,                :member?
+  別名 :値を持つか?,            :has_value?
+  別名 :値か?,                  :value?
+  # 別名 :ハッシュ値,           :hash       # 物で定義済み
+  別名 :キーを取得,             :key
+  別名 :位置を取得,             :index
+  # 別名 :文字列に変換,         :to_s       # 物で定義済み
+  # 別名 :検査,                 :inspect    # 物で定義済み
+  別名 :反転させる,             :invert
+  別名 :キーの一覧,             :keys
+  別名 :長さ,                   :length
+  別名 :大きさ,                 :size
+  別名 :併合,                   :merge
+  別名 :併合!,                  :merge!
+  別名 :更新,                   :update
+  別名 :逆連想取得,             :rassoc
+  別名 :ハッシュ値を再計算する, :rehash
+  別名 :除く,                   :reject
+  別名 :取り替える,             :replace
+  別名 :先頭から取り出す,       :shift
+  別名 :断片,                   :slice
+  別名 :配列に変換,             :to_a
+  別名 :連想配列に変換,         :to_h
+  別名 :キーの変換,             :transform_keys
+  別名 :キーの変換!,            :transform_keys!
+  別名 :値の変換,               :transform_values
+  別名 :値の変換!,              :transform_values!
+  別名 :値の一覧,               :values
+  別名 :位置で値の一覧を取得,   :values_at
+}
+
+組(範囲) {
+  別名 :間を進む,              :step
+  別名 :包含するか?,           :cover?
+  別名 :始端,                  :begin
+  別名 :先頭,                  :first
+  別名 :二分探索する,          :bsearch
+  別名 :個別に,                :each
+  別名 :終端,                  :end
+  別名 :末尾,                  :last
+  # 別名 :等しいか?,           :eql?       # 物で定義済み
+  別名 :終端が除かれているか?, :exclude_end?
+  # 別名 :ハッシュ値,          :hash       # 物で定義済み
+  別名 :含むか?,               :include?
+  別名 :一員か?,               :member?
+  # 別名 :検査,                :inspect    # 物で定義済み
+  別名 :最大,                  :max
+  別名 :最小,                  :min
+  別名 :大きさ,                :size
+  # 別名 :文字列に変換,        :to_s       # 物で定義済み
+}
+
+組(構造体) {
+  特異組{
+    定義(:項目の一覧) { self.members }    # membersは継承先で定義されるためここでは未定義なので別名にしない
+  }
+
+  別名 :探り当てる,           :dig
+  別名 :個別に,               :each
+  別名 :対毎に,               :each_pair
+  # 別名 :等しいか?,          :eql?       # 物で定義済み
+  # 別名 :同一か?,            :equal?     # 物の土台で定義済み
+  別名 :選択する,             :select
+  別名 :抽出する,             :filter
+  # 別名 :ハッシュ値,         :hash       # 物で定義済み
+  # 別名 :検査,               :inspect    # 物で定義済み
+  # 別名 :文字列に変換,       :to_s       # 物で定義済み
+  別名 :長さ,                 :length
+  別名 :大きさ,               :size
+  別名 :項目の一覧,           :members
+  別名 :値の一覧,             :values
+  別名 :配列に変換,           :to_a
+  別名 :連想配列に変換,       :to_h
+  別名 :位置で値の一覧を取得, :values_at
+}
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/lib/japanize/core.rb

@@ -0,0 +1,194 @@
+# -*- coding: utf-8 -*-
+
+class Module
+  alias 別名 alias_method
+
+  別名 :定義,              :define_method
+  別名 :定数は定義済みか?, :const_defined?
+  別名 :定数を取得,        :const_get
+  別名 :定数を設定,        :const_set
+  別名 :部で評価,          :module_eval
+  別名 :組で評価,          :class_eval
+  別名 :秘密,              :private
+  別名 :部の関数,          :module_function
+end
+
+module Kernel
+  # requireはRubygemsが再定義するかもしれないので別名にしない
+  定義(:要求) {|機能| require(機能) }
+  部の関数 :要求
+
+  # require_relativeはRubygemsが再定義するかもしれないので別名にしない
+  定義(:相対位置で要求) {|相対位置の機能| require_relative(相対位置の機能) }
+  部の関数 :相対位置で要求
+end
+
+class Object
+  定義(:特異組) {|&塊|
+    if (塊) then
+      特異組の定義(&塊)
+    else
+      singleton_class
+    end
+  }
+
+  定義(:特異組の定義) {|&塊|
+    特異組.組で評価(&塊)
+  }
+  秘密 :特異組の定義
+end
+
+module JA
+end
+include JA
+
+Japanize = JA unless (defined? Japanize)
+Japanize::TOP_LEVEL = self
+
+module Japanize
+  定義(:自分) { self }
+  秘密 :自分
+
+  定義(:最上位) { TOP_LEVEL }
+
+  定義(:日本語の定数) {|名前, *引数, &塊|
+    if (引数.empty?) then
+      unless (塊) then
+        raise ArgumentError, '定数値か手続きが必要です'
+      end
+      unless (塊.parameters.empty?) then
+        raise ArgumentError, '手続きは引数を受け取るべきではありません'
+      end
+    else
+      if (塊) then
+        raise ArgumentError, '定数値と手続きを同時に渡してはいけません'
+      end
+      if (引数.length != 1) then
+        raise ArgumentError, "引数の数が不正です(与えられた引数は#{引数.length}個, 期待される引数は1個)"
+      end
+      値 = 引数[0]
+    end
+
+    if (自分 == Japanize || 自分 == Japanize::最上位) then
+      定数の名前空間 = Japanize
+      操作の名前空間 = Japanize
+    else
+      定数の名前空間 = 自分
+      操作の名前空間 = 自分.特異組
+    end
+
+    定数 = "JA#{名前}".to_sym
+    if (塊) then
+      定数の名前空間.定数を設定(定数, 塊)
+      操作の名前空間.定義(名前, &塊)
+    else
+      定数の名前空間.定数を設定(定数, 値)
+      操作の名前空間.定義(名前) { 値 }
+    end
+
+    値
+  }
+
+  最上位.特異組{
+    定義(:定義) {|名前, &塊|
+      戻り値 = define_method(名前, &塊)
+      秘密 名前
+      戻り値
+    }
+
+    別名 :付加,           :include
+    別名 :秘密,           :private
+    別名 :公開,           :public
+    別名 :限定拡張を使用, :using
+  }
+
+  日本語の定数 :日本語化, ::Japanize
+  日本語の定数 :核,       ::Kernel
+  日本語の定数 :物,       ::Object
+  日本語の定数 :記号,     ::Symbol
+  日本語の定数 :文字列,   ::String
+
+  JA部 = ::Module
+  JA組 = ::Class
+
+  定義(:部) {|*引数, &塊|
+    if (塊) then
+      部の定義(*引数, &塊)
+    else
+      ::Module
+    end
+  }
+
+  定義(:組) {|*引数, &塊|
+    if (塊) then
+      組の定義(*引数, &塊)
+    else
+      ::Class
+    end
+  }
+
+  定義(:部の定義) {|ある部, &塊|
+    case (ある部)
+    when 記号, 文字列
+      名前 = ある部
+      定数名 = "JA#{名前}".to_sym
+
+      if (自分 == 日本語化 || 自分 == 日本語化::最上位) then
+        定数の名前空間 = 日本語化
+        操作の名前空間 = 日本語化
+      else
+        定数の名前空間 = 自分
+        操作の名前空間 = 自分.特異組
+      end
+
+      if (定数の名前空間.定数は定義済みか? 定数名) then
+        ある部 = 定数の名前空間.定数を取得(定数名)
+      else
+        ある部 = 部.new
+        定数の名前空間.定数を設定(定数名, ある部)
+        操作の名前空間.定義(名前) { ある部 }
+      end
+    end
+
+    ある部.instance_of? 部 or raise TypeError, "#{ある部} は #{部} ではありません"
+    ある部.部で評価(&塊)
+  }
+  秘密 :部の定義
+
+  定義(:組の定義) {|ある組, 原型: nil, &塊|
+    原型.instance_of? 組 or raise TypeError, "#{原型} は #{組} ではありせん" if 原型
+    case (ある組)
+    when 記号, 文字列
+      名前 = ある組
+      定数名 = "JA#{名前}".to_sym
+
+      if (自分 == 日本語化 || 自分 == 日本語化::最上位) then
+        定数の名前空間 = 日本語化
+        操作の名前空間 = 日本語化
+      else
+        定数の名前空間 = 自分
+        操作の名前空間 = 自分.特異組
+      end
+
+      if (定数の名前空間.定数は定義済みか? 定数名) then
+        ある組 = 定数の名前空間.定数を取得(定数名)
+      else
+        ある組 = 組.new(原型 || 物)
+        定数の名前空間.定数を設定(定数名, ある組)
+        操作の名前空間.定義(名前) { ある組 }
+      end
+    end
+
+    ある組.instance_of? 組 or raise TypeError, "#{ある組} は #{組} ではありません"
+    if (原型 && 原型 != ある組.superclass) then
+      raise TypeError, "#{ある組} の原型として #{原型} は不適当です"
+    end
+    ある組.組で評価(&塊)
+  }
+  秘密 :組の定義
+end
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/lib/japanize/enum.rb

@@ -0,0 +1,127 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize/core'
+
+要求 'japanize/base'
+要求 'japanize/names'
+要求 'japanize/syntax'
+
+部(列挙できる) {
+  別名 :全てにおいて成り立つか?,            :all?
+  別名 :何れかが成り立つか?,                :any?
+  別名 :連続した塊に分ける,                 :chunk
+  別名 :この条件で連続した塊に分ける,       :chunk_while
+  別名 :集める,                             :collect
+  別名 :対応させる,                         :map
+  別名 :対応させて平らにする,               :flat_map
+  別名 :集めて連結する,                     :collect_concat
+  別名 :数える,                             :count
+  別名 :循環させる,                         :cycle
+  別名 :見つける,                           :find
+  別名 :捨てる,                             :drop
+  別名 :この条件で捨てる,                   :drop_while
+  別名 :区間毎に,                           :each_cons
+  別名 :要素毎に,                           :each_entry
+  別名 :断片毎に,                           :each_slice
+  別名 :順番付きで個別に,                   :each_with_index
+  別名 :覚え書き付きで個別に,               :each_with_object
+  別名 :配列に変換,                         :to_a
+  別名 :要素の一覧,                         :entries
+  別名 :全て見つける,                       :find_all
+  別名 :選択する,                           :select
+  別名 :抽出する,                           :filter
+  別名 :見つけたら位置を返す,               :find_index
+  別名 :先頭,                               :first
+  別名 :検索,                               :grep
+  別名 :対象外を検索,                       :grep_v
+  別名 :条件毎に集める,                     :group_by
+  別名 :一員か?,                            :member?
+  別名 :含むか?,                            :include?
+  別名 :織り込む,                           :inject
+  別名 :畳み込む,                           :reduce
+  別名 :遅延評価,                           :lazy
+  別名 :最大,                               :max
+  別名 :この条件で最大,                     :max_by
+  別名 :最小,                               :min
+  別名 :この条件で最小,                     :min_by
+  別名 :最小と最大,                         :minmax
+  別名 :この条件で最小と最大,               :minmax_by
+  別名 :何れも成り立たないか?,              :none?
+  別名 :一つだけ成り立つか?,                :one?
+  別名 :分ける,                             :partition
+  別名 :除く,                               :reject
+  別名 :逆順で個別に,                       :reverse_each
+  別名 :この条件で終わる所で切り分ける,     :slice_after
+  別名 :この条件で始まる所で切り分ける,     :slice_before
+  別名 :この条件が成り立つ境界で切り分ける, :slice_when
+  別名 :整列,                               :sort
+  別名 :この条件で整列,                     :sort_by
+  別名 :合計,                               :sum
+  別名 :引き出す,                           :take
+  別名 :この条件で引き出す,                 :take_while
+  別名 :連想配列に変換,                     :to_h
+  別名 :重複を削除,                         :uniq
+  別名 :より合わせる,                       :zip
+}
+
+組(列挙) {
+  別名 :個別に,                 :each
+  別名 :与える,                 :feed
+  別名 :次の値,                 :next
+  別名 :次の値の一覧,           :next_values
+  別名 :次の値を覗く,           :peek
+  別名 :次の値の一覧を覗く,     :peek_values
+  別名 :巻き戻す,               :rewind
+  別名 :大きさ,                 :size
+  別名 :順番付きで繰り返す,     :with_index
+  別名 :覚え書き付きで繰り返す, :with_object
+
+  組(等差数列) {
+    別名 :初項,                  :begin
+    別名 :始端,                  :begin        # 範囲#始端 との互換のため定義する
+    別名 :個別に,                :each
+    別名 :上界,                  :end
+    別名 :終端,                  :end          # 範囲#終端 との互換のため定義する
+    別名 :上界が除かれているか?, :exclude_end?
+    別名 :終端が除かれているか?, :exclude_end? # 範囲#終端が除かれているか? との互換のため定義する
+    別名 :先頭,                  :first
+    # 別名 :ハッシュ値,          :hash         # 物で定義済み
+    # 別名 :検査,                :inspect      # 物で定義済み
+    別名 :末尾,                  :last
+    別名 :大きさ,                :size
+    別名 :公差,                  :step
+  }
+
+  組(遅延評価) {
+    別名 :連続した塊に分ける,                 :chunk
+    別名 :この条件で連続した塊に分ける,       :chunk_while
+    別名 :対応させる,                         :map
+    別名 :集める,                             :collect
+    別名 :対応させて平らにする,               :flat_map
+    別名 :集めて連結する,                     :collect_concat
+    別名 :捨てる,                             :drop
+    別名 :この条件で捨てる,                   :drop_while
+    別名 :列挙に変換,                         :to_enum
+    別名 :列挙する,                           :enum_for
+    別名 :選択する,                           :select
+    別名 :全て見つける,                       :find_all
+    別名 :抽出する,                           :filter
+    別名 :直ちに評価する,                     :force
+    別名 :検索,                               :grep
+    別名 :対象外を検索,                       :grep_v
+    別名 :遅延評価,                           :lazy
+    別名 :除く,                               :reject
+    別名 :この条件で終わる所で切り分ける,     :slice_after
+    別名 :この条件で始まる所で切り分ける,     :slice_before
+    別名 :この条件が成り立つ境界で切り分ける, :slice_when
+    別名 :引き出す,                           :take
+    別名 :この条件で引き出す,                 :take_while
+    別名 :重複を削除,                         :uniq
+    別名 :より合わせる,                       :zip
+  }
+}
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/lib/japanize/errors.rb

@@ -0,0 +1,79 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize/core'
+
+要求 'japanize/base'
+要求 'japanize/names'
+
+組(配置の失敗) {
+  別名 :ファイルへの経路, :path
+}
+
+組(シグナルの例外) {
+  別名 :シグナルの名前, :signm
+  別名 :シグナルの番号, :signo
+}
+
+組(脱出を捕捉できないため失敗) {
+  別名 :目印,           :tag
+  別名 :値,             :value
+  # 別名 :文字列に変換, :to_s    # 物で定義済み
+}
+
+組(キーの照合に失敗) {
+  別名 :キー,   :key
+  別名 :受信先, :receiver
+}
+
+組(繰り返しの停止) {
+  別名 :結果, :result
+}
+
+組(局所的な跳躍に失敗) {
+  別名 :終了値, :exit_value
+  別名 :原因,   :reason
+}
+
+組(名前解決に失敗) {
+  別名 :局所変数の一覧, :local_variables
+  別名 :名前,           :name
+  別名 :受信先,         :receiver
+  # 別名 :文字列に変換, :to_s    # 物で定義済み
+}
+
+組(操作が無いため失敗) {
+  別名 :引数,                    :args
+  別名 :秘密の形式で呼ばれたか?, :private_call?
+}
+
+組(システムコールの失敗) {
+  別名 :失敗の種類を表す番号, :errno
+}
+
+組(システムの終了) {
+  別名 :状態,        :status
+  別名 :成功したか?, :success?
+}
+
+組(文字符号化方式::バイト列が不正なため失敗) {
+  別名 :変換先の文字符号化方式,       :destination_encoding
+  別名 :変換先の文字符号化方式の名前, :destination_encoding_name
+  別名 :不正なバイト列,               :error_bytes
+  別名 :入力が不完全か?,              :incomplete_input?
+  別名 :読み直すバイト列,             :readagain_bytes
+  別名 :変換元の文字符号化方式,       :source_encoding
+  別名 :変換元の文字符号化方式の名前, :source_encoding_name
+}
+
+組(文字符号化方式::変換後の文字が存在しないため失敗) {
+  別名 :変換先の文字符号化方式,       :destination_encoding
+  別名 :変換先の文字符号化方式の名前, :destination_encoding_name
+  別名 :不正な文字,                   :error_char
+  別名 :変換元の文字符号化方式,       :source_encoding
+  別名 :変換元の文字符号化方式の名前, :source_encoding_name
+}
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End: