In message <199802240245.LAA23578 / blade.nagaokaut.ac.jp>
sinara / blade.nagaokaut.ac.jp writes:

> |変数管理の技術の一つである
> |
> |と理解しているのだけど、はずしているかなあ。
> 
> うーん、はずしている。「変数」じゃなくて「変数名と関数名の
> スコープ（適用範囲）」かなあ。やはりオブジェクト指向はオブ
> ジェクト指向としか言えない。(^^;

  「継承がある抽象データ型」と「オブジェクト」の区別って何でしょう
  ね. C++ なんかだと, つい「オブジェクト指向プログラミング」ではなくて
  「抽象データ型を使ったプログラミング」をしてしまうのですが.

  # Ruby を使っていてもその点は変わらないあたりが, 情報システム学研究
  # 科なんてとこにいる学生としてはもんだいなのですが (^^;

  結局分析とか設計とかの段階の問題のような気もする.... 「対象をオブジェ
  クトの集合として捉える」ということが無いと, あんまりオブジェクト指向
  にならない. でもオブジェクト指向で分析するとかえってわかりにくくなる
  場合もある, と.

  # 並行オブジェクト指向言語と, スレッド + オブジェクト（適当な同期機
  # 構付き）と, プログラムを書くのはどっちが楽かと言うと, やっぱり慣れ
  # ているほうになってしまう.

  結局「書くのが楽しいように書く, メンテナンスが楽にできるようならさら
  に素晴らしい」ぐらいの考えで, いい加減なスクリプトを書き散らしている
  現状がある....

で, 後ろにあるようなのを投稿してみたりする (^^;
======================================================================
  柳川 @ 情報システム学研究科 . 電気通信大学
  katze / yuba.is.uec.ac.jp                          February 24, 1998
What is done can't be undone.


#!/usr/local/bin/ruby
#
# Tiny pretty printer for ruby.
# Usage:
#   rpp ruby-src
#   rpp < ruby-src
# Description:
#   This script makes keywords in ruby-src bold. 
# Bugs:
#   * Escape sequences to make word bold have an effect only for xterm
#     family (or VT100 family?)
#   * English this scripts contains is probably poor ;-)

src = ARGV.shift
if src
  inp = open(src)
else # default is stdin.
  inp = $stdin
end

dst = ARGV.shift
if dst
  outp = open(dst, "w")
else # default is stdout.
  outp = $stdout
end

# escape sequences for xterm to make word bold
pre = "\033[1m"
post = "\033[m"

keywords = ["__LINE__", "__FILE__", "BEGIN", "END", "alias", "and",
            "begin", "break", "case", "class", "def", "defined?",
	    "do", "else", "elsif", "end", "ensure", "false", "for",
	    "if", "in", "module", "next", "nil", "not", "or", "redo",
	    "rescue", "retry", "return", "self", "super", "then",
	    "true", "undef", "unless", "until", "when", "while",
	    "yield"]
kwregexp = Regexp.new("(\\b#{keywords.join(\"\\\\b|\\\\b\")}\\b)")

while inp.gets
  outp.print $_.gsub(kwregexp, "#{pre}\\1#{post}")
end