ruby-japanize 0.1.0

data/lib/japanize/sys.rb

@@ -0,0 +1,174 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize/core'
+
+要求 'japanize/base'
+要求 'japanize/names'
+
+組(束縛) {
+  別名 :評価,                  :eval
+  別名 :対話操作を開始,        :irb
+  別名 :局所変数は定義済みか?, :local_variable_defined?
+  別名 :局所変数を取得,        :local_variable_get
+  別名 :局所変数を設定,        :local_variable_set
+  別名 :局所変数の一覧,        :local_variables
+  別名 :受信先,                :receiver
+  別名 :元の場所,              :source_location
+}
+
+組(手続き型) {
+  別名 :呼ぶ,           :call
+  別名 :委ねる,         :yield
+  別名 :項数,           :arity
+  別名 :束縛を取得,     :binding
+  別名 :カリー化,       :curry
+  # 別名 :ハッシュ値,   :hash    # 物で定義済み
+  # 別名 :文字列に変換, :to_s    # 物で定義済み
+  # 別名 :検査,         :inspect # 物で定義済み
+  別名 :λか?,          :lambda?
+  別名 :引数の一覧,     :parameters
+  別名 :元の場所,       :source_location
+}
+
+組(操作) {
+  # 別名 :等しいか?,        :eql?    # 物で定義済み
+  別名 :呼ぶ,               :call
+  別名 :項数,               :arity
+  # 別名 :複写,             :clone   # 物で定義済み
+  別名 :カリー化,           :curry
+  # 別名 :ハッシュ値,       :hash    # 物で定義済み
+  # 別名 :検査,             :inspect # 物で定義済み
+  # 別名 :文字列に変換,     :to_s    # 物で定義済み
+  別名 :名前,               :name
+  別名 :元の名前,           :original_name
+  別名 :所属,               :owner
+  別名 :引数の一覧,         :parameters
+  別名 :受信先,             :receiver
+  別名 :元の場所,           :source_location
+  別名 :原型の操作,         :super_method
+  別名 :未束縛の操作を取得, :unbind
+}
+
+組(未束縛の操作) {
+  # 別名 :等しいか?,    :eql?    # 物で定義済み
+  別名 :項数,           :arity
+  別名 :束縛,           :bind
+  # 別名 :複写,         :clone   # 物で定義済み
+  # 別名 :ハッシュ値,   :hash    # 物で定義済み
+  # 別名 :検査,         :inspect # 物で定義済み
+  # 別名 :文字列に変換, :to_s    # 物で定義済み
+  別名 :名前,           :name
+  別名 :元の名前,       :original_name
+  別名 :所属,           :owner
+  別名 :引数の一覧,     :parameters
+  別名 :元の場所,       :source_location
+  別名 :原型の操作,     :super_method
+}
+
+部(物の空間) {
+  別名 :_識別番号から参照を取得, :_id2ref
+  別名 :物を数える,              :count_objects
+  別名 :最終処理を定義,          :define_finalizer
+  別名 :物毎に,                  :each_object
+  別名 :ゴミを集める,            :garbage_collect
+  別名 :最終処理を解除,          :undefine_finalizer
+
+  部の関数 :_識別番号から参照を取得,
+           :物を数える,
+           :最終処理を定義,
+           :物毎に,
+           :ゴミを集める,
+           :最終処理を解除
+
+  組(弱参照の連想配列) {
+    別名 :大きさ,     :size
+    別名 :長さ,       :length
+    別名 :キーの一覧, :keys
+    別名 :値の一覧,   :values
+    別名 :キーか?,    :key?
+    別名 :含むか?,    :include?
+    別名 :一員か?,    :member?
+    別名 :キー毎に,   :each_key
+    別名 :値毎に,     :each_value
+    別名 :対毎に,     :each_pair
+    # 別名 :検査,     :inspect # 物で定義済み
+  }
+}
+
+組(発生事象の追跡) {
+  特異組{
+    別名 :状態を取得, :stat
+    別名 :追跡,       :trace
+  }
+
+  別名 :束縛を取得,         :binding
+  別名 :呼び出し先の識別子, :callee_id
+  別名 :定義されている組,   :defined_class
+  別名 :無効にする,         :disable
+  別名 :有効にする,         :enable
+  別名 :有効か?,            :enabled?
+  別名 :事象,               :event
+  # 別名 :検査,             :inspect    # 物で定義済み
+  別名 :行番号,             :lineno
+  別名 :操作の識別子,       :method_id
+  別名 :ファイルへの経路,   :path
+  別名 :発生した例外,       :raised_exception
+  別名 :戻り値,             :return_value
+  別名 :参照を取得,         :self
+}
+
+部(ゴミ集め) {
+  特異組{
+    別名 :実行した回数,         :count
+    別名 :無効にする,           :disable
+    別名 :有効にする,           :enable
+    別名 :最新のゴミ集めの情報, :latest_gc_info
+    別名 :開始,                 :start
+    別名 :統計情報を取得,       :stat
+    別名 :頻繁に実施,           :stress
+    別名 :頻繁に実施=,          :stress=
+  }
+
+  別名 :ゴミを集める, :garbage_collect
+
+  日本語の定数 :内部の定数の一覧,   GC::INTERNAL_CONSTANTS
+  日本語の定数 :既定の選択肢の一覧, GC::OPTS
+
+  部(統計情報) {
+    特異組{
+      別名 :消去する,     :clear
+      別名 :無効にする,   :disable
+      別名 :有効にする,   :enable
+      別名 :有効か?,      :enabled?
+      別名 :集計前の情報, :raw_data
+      別名 :報告する,     :report
+      別名 :結果,         :result
+      別名 :総計時間,     :total_time
+    }
+  }
+
+  日本語の定数を付加できること :内部の定数の一覧,
+                               :既定の選択肢の一覧,
+                               :統計情報
+}
+
+部(直列化) {
+  別名 :書き出す, :dump
+  別名 :読み込む, :load
+  別名 :復元する, :restore
+
+  部の関数 :書き出す,
+           :読み込む,
+           :復元する
+
+  日本語の定数 :主改訂版数, Marshal::MAJOR_VERSION
+  日本語の定数 :副改訂版数, Marshal::MINOR_VERSION
+
+  日本語の定数を付加できること :主改訂版数,
+                               :副改訂版数
+}
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/lib/japanize/test_unit.rb

@@ -0,0 +1,99 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize/core'
+
+要求 'test/unit'
+
+部(日本語化) {
+  日本語の定数 :試験単位, Test::Unit
+
+  部(試験単位) {
+    特異組{
+      別名 :終了時に実行, :at_exit
+      別名 :開始時に実行, :at_start
+    }
+
+    日本語の定数 :確認手段, Test::Unit::Assertions
+
+    部(確認手段) {
+      特異組{
+        別名 :目視点検を使う=, :use_pp=
+      }
+
+      別名 :確認,                               :assert
+      別名 :別名であることを確認,               :assert_alias_method
+      別名 :手続きで確認,                       :assert_block
+      別名 :真偽値であることを確認,             :assert_boolean
+      別名 :比較して確認,                       :assert_compare
+      別名 :定数が定義済みであることを確認,     :assert_const_defined
+      別名 :空であることを確認,                 :assert_empty
+      別名 :等しいことを確認,                   :assert_equal
+      別名 :確認が失敗することを確認,           :assert_fail_assertion
+      別名 :偽値であることを確認,               :assert_false
+      別名 :誤差の範囲で等しいことを確認,       :assert_in_delta
+      別名 :含まれることを確認,                 :assert_include
+      別名 :生成物であることを確認,             :assert_instance_of
+      別名 :一種であることを確認,               :assert_kind_of
+      別名 :一致することを確認,                 :assert_match
+      別名 :無値であることを確認,               :assert_nil
+      別名 :定数が未定義であることを確認,       :assert_not_const_defined
+      別名 :空ではないことを確認,               :assert_not_empty
+      別名 :等しくないことを確認,               :assert_not_equal
+      別名 :誤差の範囲で等しくないことを確認,   :assert_not_in_delta
+      別名 :含まれないことを確認,               :assert_not_include
+      別名 :生成物ではないことを確認,           :assert_not_instance_of
+      別名 :一種ではないことを確認,             :assert_not_kind_of
+      別名 :一致しないことを確認,               :assert_not_match
+      別名 :無値ではないことを確認,             :assert_not_nil
+      別名 :演算が成立しないことを確認,         :assert_not_operator
+      別名 :状態が成立しないことを確認,         :assert_not_predicate
+      別名 :応答しないことを確認,               :assert_not_respond_to
+      別名 :同一ではないことを確認,             :assert_not_same
+      別名 :送付した結果が成立しないことを確認, :assert_not_send
+      別名 :例外が発生しないことを確認,         :assert_nothing_raised
+      別名 :脱出しないことを確認,               :assert_nothing_thrown
+      別名 :演算して確認,                       :assert_operator
+      別名 :ファイルが存在することを確認,       :assert_path_exist
+      別名 :ファイルが存在しないことを確認,     :assert_path_not_exist
+      別名 :状態を確認,                         :assert_predicate
+      別名 :例外が発生することを確認,           :assert_raise
+      別名 :例外の一種が発生することを確認,     :assert_raise_kind_of
+      別名 :発生した例外の伝文を確認,           :assert_raise_message
+      別名 :応答することを確認,                 :assert_respond_to
+      別名 :同一であることを確認,               :assert_same
+      別名 :送信して確認,                       :assert_send
+      別名 :脱出することを確認,                 :assert_throw
+      別名 :真値であることを確認,               :assert_true
+      別名 :失敗させる,                         :flunk
+    }
+
+    組(:試験事例, 原型: Test::Unit::TestCase) {
+      特異組{
+        別名 :資料,               :data
+        別名 :試験,               :test
+        別名 :説明,               :description
+        別名 :細分化した試験事例, :sub_test_case
+        別名 :試験は定義済みか?,  :test_defined?
+        別名 :試験の順番,         :test_order
+        別名 :試験の順番=,        :test_order=
+
+        定義(:startup) { 起動 }
+        定義(:shutdown) { 停止 }
+        定義(:起動) {}
+        定義(:停止) {}
+      }
+
+      別名 :資料, :data
+
+      定義(:setup) { 準備 }
+      定義(:teardown) { 破棄 }
+      定義(:準備) {}
+      定義(:破棄) {}
+    }
+  }
+}
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/lib/japanize/thread.rb

@@ -0,0 +1,143 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize/core'
+
+要求 'japanize/base'
+要求 'japanize/names'
+
+組(ファイバー) {
+  特異組{
+    別名 :委ねる, :yield
+  }
+
+  別名 :続ける, :resume
+
+  # fiberライブラリのための定義
+  # fiberライブラリが配置されるまで未定義なので別名にしない。
+  特異操作の定義(:実行中) { current }
+  定義(:存続しているか?) { alive? }
+  定義(:切り替える) {|*引数, &塊| transfer(*引数, &塊) }
+}
+
+組(スレッド) {
+  特異組{
+    定義(:点検中) { 自分.DEBUG }           # 通常は未定義なので別名にしない
+    定義(:点検中=) {|値| 自分.DEBUG=(値) } # 通常は未定義なので別名にしない
+    別名 :例外が発生したら中断,        :abort_on_exception
+    別名 :例外が発生したら中断=,       :abort_on_exception=
+    別名 :実行中,                      :current
+    別名 :排他,                        :exclusive
+    別名 :終了,                        :exit
+    別名 :開始,                        :start
+    別名 :分岐,                        :fork
+    別名 :割り込みを制御する,          :handle_interrupt
+    別名 :終了させる,                  :kill
+    別名 :一覧,                        :list
+    別名 :本線,                        :main
+    別名 :譲る,                        :pass
+    別名 :割り込みが猶予されているか?, :pending_interrupt?
+    別名 :例外が発生したら報告,        :report_on_exception
+    別名 :例外が発生したら報告=,       :report_on_exception=
+    別名 :停止,                        :stop
+  }
+
+  別名 :例外が発生したら中断,        :abort_on_exception
+  別名 :例外が発生したら中断=,       :abort_on_exception=
+  別名 :追跡関数を追加,              :add_trace_func
+  別名 :存続しているか?,             :alive?
+  別名 :呼び出し履歴,                :backtrace
+  別名 :呼び出し履歴の場所の一覧,    :backtrace_locations
+  別名 :終了,                        :exit
+  別名 :終了させる,                  :kill
+  別名 :取得,                        :fetch
+  別名 :所属する群れ,                :group
+  # 別名 :検査,                      :inspect # 物で定義済み
+  # 別名 :文字列に変換,              :to_s    # 物で定義済み
+  別名 :合流,                        :join
+  別名 :キーか?,                     :key?
+  別名 :キーの一覧,                  :keys
+  別名 :名前,                        :name
+  別名 :名前=,                       :name=
+  別名 :割り込みが猶予されているか?, :pending_interrupt?
+  別名 :優先度,                      :priority
+  別名 :例外を発生,                  :raise
+  別名 :例外が発生したら報告,        :report_on_exception
+  別名 :例外が発生したら報告=,       :report_on_exception=
+  別名 :再開,                        :run
+  別名 :安全度,                      :safe_level
+  別名 :追跡関数を設定,              :set_trace_func
+  別名 :状態,                        :status
+  別名 :停止しているか?,             :stop?
+  別名 :スレッド変数は存在するか?,   :thread_variable?
+  別名 :スレッド変数を取得,          :thread_variable_get
+  別名 :スレッド変数を設定,          :thread_variable_set
+  別名 :結果,                        :value
+  別名 :休止を解除,                  :wakeup
+
+  組(呼び出し履歴::場所) {
+    別名 :ファイルへの絶対的な経路, :absolute_path
+    別名 :素の名前,                 :base_label
+    # 別名 :検査,                   :inspect # 物で定義済み
+    別名 :表札,                     :label
+    別名 :行番号,                   :lineno
+    別名 :ファイルへの経路,         :path
+    # 別名 :文字列に変換,           :to_s    # 物で定義済み
+  }
+
+  組(相互排他制御) {
+    別名 :獲得,              :lock
+    別名 :獲得されているか?, :locked?
+    別名 :所有しているか?,   :owned?
+    別名 :休止,              :sleep
+    別名 :同期させる,        :synchronize
+    別名 :可能なら獲得,      :try_lock
+    別名 :解放,              :unlock
+  }
+
+  組(条件変数) {
+    別名 :全員に通知, :broadcast
+    別名 :通知,       :signal
+    別名 :待機,       :wait
+  }
+
+  組(待ち行列) {
+    別名 :付け足す,         :push
+    別名 :消去する,         :clear
+    別名 :閉じる,           :close
+    別名 :閉じたか?,        :closed?
+    別名 :取り出す,         :pop
+    別名 :先頭から取り出す, :shift
+    別名 :空か?,            :empty?
+    別名 :長さ,             :length
+    別名 :大きさ,           :size
+    別名 :待機スレッド数,   :num_waiting
+  }
+
+  組(上限付き待ち行列) {
+    別名 :付け足す,         :push
+    別名 :消去する,         :clear
+    別名 :閉じる,           :close
+    別名 :取り出す,         :pop
+    別名 :先頭から取り出す, :shift
+    別名 :空か?,            :empty?
+    別名 :長さ,             :length
+    別名 :大きさ,           :size
+    別名 :最大待ち受け数,   :max
+    別名 :最大待ち受け数=,  :max=
+    別名 :待機スレッド数,   :num_waiting
+  }
+}
+
+組(スレッドの群れ) {
+  別名 :追加,            :add
+  別名 :締め切る,        :enclose
+  別名 :締め切られたか?, :enclosed?
+  別名 :一覧,            :list
+
+  日本語の定数 :既定の群れ, ThreadGroup::Default
+}
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/lib/japanize/time.rb

@@ -0,0 +1,82 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize/core'
+
+要求 'japanize/base'
+要求 'japanize/names'
+
+組(時刻) {
+  特異組{
+    別名 :この時,           :at
+    別名 :グリニッジ標準時, :gm
+    別名 :協定世界時,       :utc
+    別名 :地方時,           :local
+    別名 :地方標準時,       :local
+    別名 :作成,             :mktime
+    別名 :現在,             :now
+  }
+
+  別名 :アスキー形式に変換,       :asctime
+  別名 :日,                       :day
+  別名 :夏時間か?,                :dst?
+  # 別名 :等しいか?,              :eql?    # 物で定義済み
+  別名 :金曜日か?,                :friday?
+  別名 :グリニッジ標準時を取得,   :getgm
+  別名 :協定世界時を取得,         :getutc
+  別名 :地方時を取得,             :getlocal
+  別名 :地方標準時を取得,         :getlocal
+  別名 :グリニッジ標準時か?,      :gmt?
+  別名 :協定世界時か?,            :utc?
+  別名 :グリニッジ標準時との時差, :gmt_offset
+  別名 :協定世界時との時差,       :utc_offset
+  別名 :グリニッジ標準時に変更,   :gmtime
+  別名 :協定世界時に変更,         :utc
+  # 別名 :ハッシュ値,             :hash    # 物で定義済み
+  別名 :時,                       :hour
+  別名 :地方時に変更,             :localtime
+  別名 :地方標準時に変更,         :localtime
+  別名 :分,                       :min
+  別名 :月,                       :mon
+  別名 :月曜日か?,                :monday?
+  別名 :ナノ秒,                   :nsec
+  別名 :端数を丸める,             :round
+  別名 :土曜日か?,                :saturday?
+  別名 :秒,                       :sec
+  別名 :文字列に整形,             :strftime
+  別名 :一秒未満の時刻,           :subsec
+  別名 :一つ後,                   :succ
+  別名 :日曜日か?,                :sunday?
+  別名 :木曜日か?,                :thursday?
+  別名 :配列に変換,               :to_a
+  別名 :浮動小数点に変換,         :to_f
+  別名 :整数に変換,               :to_i
+  別名 :起算時からの経過秒数,     :tv_sec
+  別名 :有理数に変換,             :to_r
+  # 別名 :文字列に変換,           :to_s    # 物で定義済み
+  別名 :火曜日か?,                :tuesday?
+  別名 :マイクロ秒,               :usec
+  別名 :μ秒,                     :usec
+  別名 :曜日,                     :wday
+  別名 :水曜日か?,                :wednesday?
+  別名 :年間の通算日,             :yday
+  別名 :年,                       :year
+  別名 :時間帯,                   :zone
+
+  # timeライブラリのための定義
+  # timeライブラリが配置されるまで未定義なので別名にしない。
+  特異操作の定義(:HTTP日付の形式) {|*引数, &塊| httpdate(*引数, &塊) }
+  特異操作の定義(:国際標準の形式) {|*引数, &塊| iso8601(*引数, &塊) }
+  特異操作の定義(:XMLスキーマの形式) {|*引数, &塊| xmlschema(*引数, &塊) }
+  特異操作の定義(:書式を解析) {|*引数, &塊| parse(*引数, &塊) }
+  特異操作の定義(:電子メールの付加情報の形式) {|*引数, &塊| rfc2822(*引数, &塊) }
+  特異操作の定義(:書式を指定して解析) {|*引数, &塊| strptime(*引数, &塊) }
+  定義(:HTTP日付の形式) {|*引数, &塊| httpdate(*引数, &塊) }
+  定義(:国際標準の形式) {|*引数, &塊| iso8601(*引数, &塊) }
+  定義(:XMLスキーマの形式) {|*引数, &塊| xmlschema(*引数, &塊) }
+  定義(:電子メールの付加情報の形式) {|*引数, &塊| rfc2822(*引数, &塊) }
+}
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/lib/japanize/version.rb

@@ -0,0 +1,12 @@
+# -*- coding: utf-8 -*-
+
+module JA
+  VERSION = '0.1.0'
+end
+
+Japanize = JA unless (defined? Japanize)
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/lib/japanize.rb

@@ -0,0 +1,24 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize/core'
+
+要求 'japanize/base'
+要求 'japanize/container'
+要求 'japanize/enum'
+要求 'japanize/errors'
+要求 'japanize/globals'
+要求 'japanize/io'
+要求 'japanize/names'
+要求 'japanize/num'
+要求 'japanize/process'
+要求 'japanize/string'
+要求 'japanize/syntax'
+要求 'japanize/sys'
+要求 'japanize/thread'
+要求 'japanize/time'
+要求 'japanize/version'
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/ruby-japanize.gemspec

@@ -0,0 +1,41 @@
+# -*- coding: utf-8 -*-
+
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'japanize/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = 'ruby-japanize'
+  spec.version       = Japanize::VERSION
+  spec.authors       = ['TOKI Yoshinori']
+  spec.email         = ['toki@freedom.ne.jp']
+
+  spec.summary       = %q{Rubyを日本語化する}
+  spec.description   = <<-'EOF'
+    日本語の別名や構文を定義してRubyを日本語で書けるようにする。
+  EOF
+  spec.homepage      = 'https://github.com/y10k/ruby-japanize'
+  spec.license       = 'MIT'
+
+  # Specify which files should be added to the gem when it is released.
+  # The `git ls-files -z` loads the files in the RubyGem that have been added into git.
+  spec.files         = Dir.chdir(File.expand_path('..', __FILE__)) do
+    `git ls-files -z`.split("\x0").reject {|f| f.match(%r{^(test|spec|features)/}) }
+  end
+  spec.bindir        = 'exe'
+  spec.executables   = spec.files.grep(%r{^exe/}) {|f| File.basename(f) }
+  spec.require_paths = ['lib']
+
+  spec.required_ruby_version = '>= 2.6'
+
+  spec.add_development_dependency 'bundler', '~> 1.17'
+  spec.add_development_dependency 'rake', '~> 10.0'
+  spec.add_development_dependency 'test-unit'
+  spec.add_development_dependency 'rdoc'
+  spec.add_development_dependency 'irb'
+end
+
+# Local Variables:
+# mode: Ruby
+# indent-tabs-mode: nil
+# End:

data/sample/README.md

@@ -0,0 +1,33 @@
+Rubyのサンプルの日本語化
+========================
+
+Rubyの[ソースコード](https://github.com/ruby/ruby)に含まれる[サンプ
+ル](https://github.com/ruby/ruby/tree/master/sample)を日本語化したもの
+です。
+
+日本語化したサンプルの一覧
+--------------------------
+
+- `dir.rb`      : ディレクトリの読み出し (directory access)
+- `eval.rb`     : 簡単な評価器 (simple evaluator)
+- `export.rb`   : メソッドの可視性の例 (method access example)
+- `fact.rb`     : 階乗の計算 (factorial calculator)
+- `fib.rb`      : フィボナッチ数 (Fibonacci number)
+- `freq.rb`     : 単語の出現回数を数える (count word occurrence)
+- `fullpath.rb` : ls -lRを完全なパスの形式に変換 (convert ls -lR to fullpath format)
+- `less.rb`     : lessの仲介 (front end for less)
+- `list.rb`     : 物の愚直な実装の例 (stupid object sample)
+- `list2.rb`    : 物の愚直な実装の例 (stupid object sample)
+- `list3.rb`    : 物の愚直な実装の例 (stupid object sample)
+- `mine.rb`     : 簡単な地雷処理ゲーム (simple mine sweeper)
+- `mkproto.rb`  : C言語のソースコードからプロトタイプ宣言を抽出する (extract prototype from C)
+- `mpart.rb`    : ファイルを複数に分割する (split file into multi part)
+- `occur.rb`    : 単語の出現回数を数える (count word occurrence)
+- `occur2.rb`   : 単語の出現回数を数える (count word occurrence)
+- `philos.rb`   : 有名な食事する哲学者の問題 (famous dining philosophers)
+- `pi.rb`       : 円周率の計算 (calculate PI)
+- `rcs.rb`      : ばらばらな文字で描く立体画像 (random character stereogram)
+- `sieve.rb`    : エラストテネスの篩 (sieve of Eratosthenes)
+- `time.rb`     : /usr/bin/timeの模倣 (/usr/bin/time clone)
+- `trojan.rb`   : トロイの木馬かもしれないファイルを見つける簡単な道具。 (simple tool to find file that may be trojan horse.)
+- `uumerge.rb`  : 複数のファイルを合わせてuudecodeする (merge files and uudecode them)

data/sample/dir.rb

@@ -0,0 +1,15 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize'
+
+あるディレクトリ = ディレクトリ.開く(".")
+あるディレクトリ.個別に{|あるファイル|
+  この値が{
+    あるファイル
+  }.もし{ /\A\./ }.か{ /~\z/ }.か{ /\\.o/ }.であるなら{
+    # 何も出力しない
+  }.でなければ{
+    印字 あるファイル, "\n"
+  }.である
+}
+あるディレクトリ.閉じる

data/sample/eval.rb

@@ -0,0 +1,48 @@
+# -*- coding: utf-8 -*-
+
+require 'japanize'
+
+行 = ''
+字下げ = 0
+標準出力.同期 = 真値
+印字 "ruby> "
+循環{|制御|
+  入力行 = 行を取得
+  もし条件が{ 入力行.無値か? }.であるなら{
+    もし条件が{ 行.空か? }.であるなら{ 制御.終わる }.である
+  }.でなければ{
+    行 += 入力行
+    もし条件が{ 入力行 =~ /,\s*$/ }.であるなら{
+      印字 "ruby| "
+      制御.次へ進む
+    }.である
+    もし条件が{ 入力行 =~ /^\s*(class|module|def|if|unless|case|while|until|for|begin)\b[^_]/ }.であるなら{
+      字下げ += 1
+    }.である
+    もし条件が{ 入力行 =~ /^\s*end\b[^_]/ }.であるなら{
+      字下げ -= 1
+    }.である
+    もし条件が{ 入力行 =~ /\{\s*(\|.*\|)?\s*$/ }.であるなら{
+      字下げ += 1
+    }.である
+    もし条件が{ 入力行 =~ /^\s*\}/ }.であるなら{
+      字下げ -= 1
+    }.である
+    もし条件が{ 字下げ > 0 }.であるなら{
+      印字 "ruby| "
+      制御.次へ進む
+    }.である
+  }.である
+  領域{|制御|
+    制御.本処理{
+      印字 評価(行).検査, "\n"
+    }
+    制御.例外を捕捉(スクリプトの失敗, 標準的な失敗) {|ある例外|
+      整形して印字 "失敗: %s\n", ある例外 || '例外が発生した'
+    }
+  }
+  もし条件が{ 入力行.無値か? }.であるなら{ 制御.終わる }.である
+  行 = ''
+  印字 "ruby> "
+}
+印字 "\n"