diff -u2raN ruby-0.65/ChangeLog ruby-0.66/ChangeLog --- ruby-0.65/ChangeLog Tue Feb 7 18:17:22 1995 +++ ruby-0.66/ChangeLog Thu Feb 9 16:19:38 1995 @@ -1,2 +1,7 @@ +Thu Feb 9 16:18:37 1995 Yukihiro Matsumoto (matz@ix-02) + + * parse.y: protectをbeginに変更．begin..endは例外処理だけでなく， + 文括弧としても働くことになった． + Wed Feb 1 19:48:24 1995 Yukihiro Matsumoto (matz@ix-02) diff -u2raN ruby-0.65/eval.c ruby-0.66/eval.c --- ruby-0.65/eval.c Tue Feb 7 18:17:32 1995 +++ ruby-0.66/eval.c Thu Feb 9 12:26:47 1995 @@ -789,5 +789,5 @@ return result; - case NODE_PROT: + case NODE_BEGIN: PUSH_TAG(); switch (state = EXEC_TAG()) { @@ -1934,5 +1934,5 @@ break; case TAG_RETRY: - Fatal("retry outside of protect clause"); + Fatal("retry outside of resque clause"); break; case TAG_RETURN: diff -u2raN ruby-0.65/node.h ruby-0.66/node.h --- ruby-0.65/node.h Tue Feb 7 18:17:34 1995 +++ ruby-0.66/node.h Thu Feb 9 12:26:48 1995 @@ -27,5 +27,5 @@ NODE_ITER, NODE_FOR, - NODE_PROT, + NODE_BEGIN, NODE_AND, NODE_OR, @@ -188,5 +188,5 @@ #define NEW_FOR(v,i,b) newnode(NODE_FOR,v,b,i) #define NEW_ITER(v,i,b) newnode(NODE_ITER,v,b,i) -#define NEW_PROT(b,ex,en) newnode(NODE_PROT,b,ex,en) +#define NEW_BEGIN(b,ex,en) newnode(NODE_BEGIN,b,ex,en) #define NEW_REDO() newnode(NODE_REDO,Qnil,Qnil,Qnil) #define NEW_BREAK() newnode(NODE_BREAK,Qnil,Qnil,Qnil) diff -u2raN ruby-0.65/parse.y ruby-0.66/parse.y --- ruby-0.65/parse.y Wed Feb 8 12:11:01 1995 +++ ruby-0.66/parse.y Thu Feb 9 12:26:46 1995 @@ -91,4 +91,8 @@ UNDEF INCLUDE + BEGIN + RESQUE + ENSURE + END IF THEN @@ -100,8 +104,4 @@ FOR IN - PROTECT - RESQUE - ENSURE - END REDO BREAK @@ -763,5 +763,5 @@ $$ = NEW_FOR($2, $4, $6); } - | PROTECT + | BEGIN compexpr resque @@ -770,9 +770,8 @@ { if ($3 == Qnil && $4 == Qnil) { - Warning("useless protect clause"); $$ = $2; } else { - $$ = NEW_PROT($2, $3, $4); + $$ = NEW_BEGIN($2, $3, $4); } } @@ -1313,4 +1312,5 @@ "alias", ALIAS, EXPR_FNAME, "and", AND, EXPR_BEG, + "begin", BEGIN, EXPR_BEG, "break", BREAK, EXPR_END, "case", CASE, EXPR_BEG, @@ -1330,5 +1330,4 @@ "nil", NIL, EXPR_END, "or", OR, EXPR_BEG, - "protect", PROTECT, EXPR_BEG, "redo", REDO, EXPR_END, "resque", RESQUE, EXPR_BEG, diff -u2raN ruby-0.65/sample/occur2.rb ruby-0.66/sample/occur2.rb --- ruby-0.65/sample/occur2.rb Fri Dec 16 10:43:04 1994 +++ ruby-0.66/sample/occur2.rb Thu Feb 9 12:27:51 1995 @@ -4,5 +4,5 @@ while gets() for word in $_.split(/\W+/) - protect + begin freq[word] = freq[word] + 1 resque diff -u2raN ruby-0.65/sample/ruby-mode.el ruby-0.66/sample/ruby-mode.el --- ruby-0.65/sample/ruby-mode.el Fri Dec 16 10:43:04 1994 +++ ruby-0.66/sample/ruby-mode.el Thu Feb 9 12:27:06 1995 @@ -9,5 +9,5 @@ (defconst ruby-block-beg-re - "class\\|module\\|def\\|if\\|unless\\|case\\|while\\|until\\|for\\|protect" + "class\\|module\\|def\\|if\\|unless\\|case\\|while\\|until\\|for\\|begin" ) diff -u2raN ruby-0.65/sample/sieve.rb ruby-0.66/sample/sieve.rb --- ruby-0.65/sample/sieve.rb Wed Jan 18 13:28:09 1995 +++ ruby-0.66/sample/sieve.rb Thu Feb 9 12:27:33 1995 @@ -6,5 +6,5 @@ print "1" for i in 2 .. max - protect + begin for d in sieve fail if i % d == 0 diff -u2raN ruby-0.65/spec ruby-0.66/spec --- ruby-0.65/spec Tue Feb 7 18:17:25 1995 +++ ruby-0.66/spec Thu Feb 9 12:39:54 1995 @@ -68,11 +68,11 @@ 予約語は以下の通りである - alias else in resque when - and elsif include retry while - break end module return yield - case ensure nil self __END__ - class fail or super __FILE__ - continue for protect then __LINE__ - def if redo undef + alias def if resque when + and else in retry while + begin elsif include return yield + break end module self __END__ + case ensure nil super __FILE__ + class fail or then __LINE__ + continue for redo undef 予約語はクラス名，メソッド名，変数名などに用いることはできない． @@ -304,5 +304,5 @@ 来る． - `(' 式 `;' 式... `)' + `(' 式 `;' 式.. `)' 式の並びの値は最後に評価した式の値である．つまりの値は最後に評価した式 @@ -318,5 +318,5 @@ ある． - `[' 式, ... `]' + `[' 式, .. `]' それぞれの式を評価した結果を含む配列を返す．要素数が0の空配列を生成す @@ -337,5 +337,5 @@ を参照されたい．連想配列を生成する連想配列式は以下の形式である． - `{' 式 `=>' 式... `}' + `{' 式 `=>' 式.. `}' それぞれの式を評価した結果をキーと値とする連想配列オブジェクトを返す． @@ -357,5 +357,5 @@ 本形式は以下の通りである． - 式1 `.' メソッド名 `(' 引数1... [`,' `*' 引数n ]`)' + 式1 `.' メソッド名 `(' 引数1.. [`,' `*' 引数n ]`)' 式1を評価して得られるオブジェクトの，識別子で指定されるメソッドを呼び @@ -404,5 +404,5 @@ 値である． - super`(' 引数... `)' + super`(' 引数.. `)' 引数とともにスーパークラスの同名のメソッドを呼び出す．一番最後の引数が @@ -431,5 +431,5 @@ 配列要素への代入 - 式1`[' 式2... `]' `=' 式n + 式1`[' 式2.. `]' `=' 式n 式1を評価して得られるオブジェクトに，式2から式nまでを引数として，"[]=" @@ -471,5 +471,5 @@ 同時に複数の変数に代入を行なうことができる．その形式は以下の通りである． - 左辺 `,' [左辺 `,' ...] [`*' 左辺]= 式 [, 式...] + 左辺 `,' [左辺 `,'..] [`*' 左辺]= 式 [, 式..] 右辺の式が一つしかない場合は，その値を配列として(必要ならばto_aメソッ @@ -511,7 +511,7 @@ && || - .. ..． + .. ... :: - =(代入) 自己代入(+=, -=, ..) + =(代入) 自己代入(+=, -=,..) and or @@ -535,11 +535,11 @@ 式1. 演算子 () -配列(連想配列を含む)の要素の参照(式1 `[' 式2... `]') +配列(連想配列を含む)の要素の参照(式1 `[' 式2.. `]') - 式1. `[]' (式2...) + 式1. `[]' (式2..) -配列要素の代入( 式1 `[' 式2... `]' `=' 式n) +配列要素の代入( 式1 `[' 式2.. `]' `=' 式n) - 式1. `[]=' (式2...) + 式1. `[]=' (式2..) それ以外の2項演算子(式 演算子 式) @@ -553,9 +553,9 @@ if 式1 [then] - 式1 + 式.. [elsif 式2 [then] - 式2 ]... + 式.. ].. [else - 式n ] + 式.. ] end @@ -578,8 +578,8 @@ case 式0 - [when 式1 [, 式2]... [then] - 式1 ]..． + [when 式1 [, 式2].. [then] + 式.. ].. [else - 式n ] + 式.. ] end @@ -663,5 +663,5 @@ while 式 - 式 + 式.. end @@ -691,5 +691,5 @@ 一種である．イテレータの呼び出しは以下の構文で行なわれる． - 式 `{' 変数... `|' 式... `}' + 式 `{' 変数.. `|' 式.. `}' 「式」をブロックとして設定し，「式」のメソッドをイテレータとして評価す @@ -723,5 +723,5 @@ ** YIELD - yield `(' [式 [`,' 式...]]) + yield `(' [式 [`,' 式..]]) yield @@ -741,25 +741,25 @@ failの引数の括弧は曖昧でない限り省略できる． -** PROTECT +** BEGIN -処理中に予期しない事態が発生した時には例外が発生する．Rubyでは例外を途 -中で捕捉して，再試行したり，後処理を行なったりすることができる． +複数の式をまとめるためにbegin式がある．begin式の形式は以下の通りである． - protect - 式1 + begin + 式.. [resque - 式2 ] + 式.. ] [ensure - 式3] + 式..] end -式1を実行し，その実行中に例外が発生すればresque節で指定された式2を実行 -する．更にensure節が存在する時はprotect式を終了する前に必ず(正常終了時 -だけでなく，例外, return, break, continue, redoなどによる脱出でも)式3 -を実行する． +begin式の値は一番最後に評価された式の値である．begin式の処理中に発生し +た時に例外はresque節で捕獲することが出来る．この場合の値はresque部で最 +後に評価した式の値である．更にensure節が存在する時はbegin式を終了する +前に必ず(正常終了時だけでなく，例外, return, break, continue, redoなど +による脱出でも)ensure節の式を評価する． ** RETURN - return [式[`,' 式...]] + return [式[`,' 式..]] 式の値を戻り値としてメソッドの実行を終了する．式が2つ以上与えられた時 @@ -789,7 +789,7 @@ retry -protect式のresque節で使い，protect式を始めから実行する．例外処理を行なっ -てから再試行するのに使う．resque節以外でretryが用いられた場合例外が発 -生する． +begin式のresque節で使い，begin式を始めから実行する．例外処理を行なって +から再試行するのに使う．resque節以外でretryが用いられた場合例外が発生 +する． ** クラス定義 @@ -821,5 +821,5 @@ び出せない． - def メソッド名 [`(' 引数 [`,' 引数...][`,' `*'引数 ] `)'] + def メソッド名 [`(' 引数 [`,' 引数..][`,' `*'引数 ] `)'] 定義実体 end @@ -846,5 +846,5 @@ 特定のオブジェクトに固有のメソッドである．形式は以下の通りである． - def 式 `.' メソッド名 [`(' 引数 [`,' 引数...][`,' `*'引数 ] `)'] + def 式 `.' メソッド名 [`(' 引数 [`,' 引数..][`,' `*'引数 ] `)'] 定義実体 end @@ -868,5 +868,5 @@ 他のモジュールをインクルードする構式は以下の通りである． - include モジュール名 [`,' モジュール名...] + include モジュール名 [`,' モジュール名..] 現在の定義中のクラスまたはモジュール(トップレベルではObjectクラス)に指 @@ -978,5 +978,5 @@ を返す述語． - kill(signal, pid...) + kill(signal, pid..) pidで指定されたプロセスにシグナルを送る．シグナルはシグナル番 @@ -1095,5 +1095,5 @@ メソッドの解説を参照のこと． - syscall(num, arg...) + syscall(num, arg..) numで指定された番号のシステムコールを実行する．第2引数以降をシ @@ -1105,5 +1105,5 @@ コマンドを実行し，その終了ステータスを返す． - trap(command, signal...) + trap(command, signal..) signalの割り込みがかかった時にcommandを実行する．signalはシグ @@ -1235,9 +1235,9 @@ が)．つまり - if some.method() then .. else .. end + if some.method() then ... else ... end と - if some.method() == %TRUE then .. else .. end + if some.method() == %TRUE then ... else ... end は完全には同義ではない．%FALSEに関しては，このような問題は生じ @@ -1248,5 +1248,5 @@ ** Array(クラス) -数字を添字とした配列のクラスである．生成は一般的には配列式``[...]''で +数字を添字とした配列のクラスである．生成は一般的には配列式``[..]''で 行なわれる． @@ -1430,5 +1430,5 @@ Single Methods: - Array[item...] + Array[item..] 引数を要素とする配列を生成する． @@ -1483,5 +1483,5 @@ Methods: - call(arg[, ...]) + call(arg[,..]) ブロックを実行する． @@ -1515,5 +1515,5 @@ Methods: - new(...) + new(..) クラスのインスタンスを生成する．多くの場合このメソッドはサブク @@ -1789,5 +1789,5 @@ Single Methods: - Dict[key, value...] + Dict[key, value..] 奇数番目の引数をkey，偶数番目の引数をvalueとする辞書を生成する． @@ -2089,10 +2089,10 @@ filenameの最終ステータス変更時刻を返す． - chmod(mode, path, file...) + chmod(mode, path, file..) ファイルのパーミッションを変更する(cf chmod(2))．変更したファ イル数を返す．fileにはワイルドカードも許す． - chown(owner, group, file...) + chown(owner, group, file..) ファイルの所有者とグループを変更する(cf chown(2))．nilか-1を指 @@ -2136,10 +2136,10 @@ "link"，"socket"のうちのいずれか一つである． - unlink(file...) + unlink(file..) ファイルを削除する．ディレクトリの削除にはDir.rmdirを使うこと． fileにはワイルドカードも許す． - utime(atime, mtime, file...) + utime(atime, mtime, file..) ファイルのアクセス時刻をatimeに，修正時刻をmtimeに設定する． @@ -2390,5 +2390,5 @@ ** Glob(クラス) -ワイルドカードのクラス．ワイルドカードのリテラルは<...>という形式であ +ワイルドカードのクラス．ワイルドカードのリテラルは<..>という形式であ る．正規表現とほぼ同じように使えるが，こちらは機能が少ない．ただし，ワ イルドカードの展開機能がある． @@ -3364,5 +3364,5 @@ end - これはa, b, c, .. aa, .. az, baまでを各行に出力する． + これはa, b, c, ... aa, ... az, baまでを各行に出力する． @@ -3413,5 +3413,5 @@ struct 構造体名 - メンバ ..． + メンバ... end @@ -3441,5 +3441,5 @@ Single Methods: - new(name, member::value...) + new(name, member::value..) nameという名前を持つ構造体を生成する．memberは構造体のメンバを @@ -3597,8 +3597,8 @@ 文字列として指定できるものは 以下の通りである． - %A 曜日の名称(Sunday, Monday,...) - %a 曜日の省略名(Sun, Mon,...) - %B 月の名称(January, February,...) - %b 月の省略名(Jan, Feb,...) + %A 曜日の名称(Sunday, Monday,..) + %a 曜日の省略名(Sun, Mon,..) + %B 月の名称(January, February,..) + %b 月の省略名(Jan, Feb,..) %c 時刻表現(cf ctime(3)) %d 十進数での日(01-31) @@ -3803,5 +3803,5 @@ COMPEXPR end - | protect + | begin COMPEXPR [resque COMPEXPR] diff -u2raN ruby-0.65/version.h ruby-0.66/version.h --- ruby-0.65/version.h Wed Feb 8 18:33:10 1995 +++ ruby-0.66/version.h Thu Feb 9 16:18:55 1995 @@ -1,2 +1,2 @@ -#define RUBY_VERSION "0.65" -#define VERSION_DATE "95/02/08" +#define RUBY_VERSION "0.66" +#define VERSION_DATE "95/02/09"