diff -Nur --exclude=doc ruby-1.9.0/lib/rdoc/Makefile ../rdoc-f95-20080316/Makefile
--- ruby-1.9.0/lib/rdoc/Makefile 1970-01-01 09:00:00.000000000 +0900
+++ ../rdoc-f95-20080316/Makefile 2007-02-27 15:49:10.000000000 +0900
@@ -0,0 +1,63 @@
+RUBY=ruby
+DOCTMP=doc-tmp
+
+all:
+
+doc: doc-stamp
+ test -d $(DOCTMP) || mkdir $(DOCTMP)
+ ln -s ../ $(DOCTMP)/rdoc
+ RUBYLIB=./$(DOCTMP) \
+ $(RUBY) ./rdoc -U --op doc --title "RDoc-F95 Documentations" \
+ --charset euc-jp --inline-source --line-numbers \
+ --main README.ja \
+ README README.ja README.org *.rb */*.rb */*/*.rb || eval "rm $< $(DOCTMP)/rdoc ; rmdir $(DOCTMP) ; false"
+ if [ -f doc/rdoc-style.css ] ; then \
+ echo '' >> doc/rdoc-style.css ;\
+ echo 'img{vertical-align: middle;}' >> doc/rdoc-style.css ;\
+ echo '' >> doc/rdoc-style.css ;\
+ fi
+ rm $< $(DOCTMP)/rdoc
+ rmdir $(DOCTMP)
+
+doc-stamp:
+ touch $@
+
+clean:
+ test "`find . -name '*~'`" = "" || rm `find . -name '*~'`
+ test -f doc-stamp || rm doc-stamp
+
+clean-doc:
+ test ! -d doc || rm -rf -v doc
+
+patch:
+ if [ ! -d patch_dir ] ; then \
+ mkdir patch_dir ;\
+ cd patch_dir ;\
+ cvs -d :pserver:anonymous@cvs.ruby-lang.org:/src login ;\
+ cvs -z4 -d :pserver:anonymous@cvs.ruby-lang.org:/src co ruby ;\
+ fi
+ cd patch_dir/ruby ; cvs update
+ test -L patch_dir/ruby/lib/rdoc-f95 || \
+ eval "cd patch_dir/ruby/lib ; ln -s ../../../ rdoc-f95"
+ cd patch_dir/ruby ; \
+ diff \
+ --exclude=rdoc \
+ --exclude=parse_c.rb \
+ --exclude=parse_rb.rb \
+ --exclude=install.rb \
+ --exclude=README* \
+ --exclude=Makefile \
+ --exclude=*~ \
+ --exclude=CVS \
+ --exclude=patch_dir \
+ --exclude=rdoc-cvs.patch \
+ --exclude=rdoc-cvs.patch.tmp \
+ -Nur lib/rdoc/ lib/rdoc-f95/ > ../../rdoc-cvs.patch.tmp \
+ || true
+ sed "s|^diff.*$$|diff -Nur lib/rdoc/ lib/rdoc-`date +%Y-%m-%d`/|" rdoc-cvs.patch.tmp > rdoc-cvs.patch
+ rm rdoc-cvs.patch.tmp
+
+clean-patch:
+ -rm -v rdoc-cvs.patch.tmp rdoc-cvs.patch
+ -rm -v -rf patch_dir/ruby
+ -rmdir patch_dir
diff -Nur --exclude=doc ruby-1.9.0/lib/rdoc/README ../rdoc-f95-20080316/README
--- ruby-1.9.0/lib/rdoc/README 1970-01-01 09:00:00.000000000 +0900
+++ ../rdoc-f95-20080316/README 2008-03-17 01:11:12.000000000 +0900
@@ -0,0 +1,430 @@
+({Japanese}[link:files/README_ja.html] | English)
+
+= Enhanced version of RDoc Fortran 90/95 parser
+
+Here is a patch file to improve
+the RDoc[http://www.ruby-doc.org/stdlib/libdoc/rdoc/rdoc/index.html]
+analysis feature
+for Fortran 90/95 source codes.
+A patched package of RDoc source is also available.
+
+== Operation verification
+
+Operation of the package has been verified with Ruby 1.8.2 and 1.9.0.
+
+--
+== Tutorial
+
+A Japanese tutorial is prepared in
+{Auto-generation of documents of numerical models by RDoc}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/tutorial/].
+English tutorial is not prepared ... (T-T)
+++
+
+== Download
+
+The latest version (Version $Name: rdoc-f95-20080316 $)
+
+* {Patch for Ruby 1.9.0}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/rdoc-f95_ruby1.9.0.patch]
+
+* {TGZ file of patched RDoc resources}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/rdoc-f95.tgz]
+
+Archives of old versions
+
+* {Patch files, TGZ packages, source code trees (only JAPANESE)}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/arch/SIGEN.htm]
+
+* {Binary packages for Debian GNU/Linux}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/debian]
+
+
+== Installation
+
+You have the following three ways for installation.
+
+=== Installation by applying the patch to original Ruby package
+
+To use the patch file, follow the steps described below:
+
+* Download
+ ftp://ftp.ruby-lang.org/pub/ruby/1.9/ruby-1.9.0-0.tar.gz
+ from {Ruby Home Page}[http://www.ruby-lang.org/].
+
+* Unpack the archive file as
+
+ % tar -zxvf ruby-1.9.0-0.tar.gz
+
+* Put the patch file (rdoc-f95_ruby1.9.0.patch)
+ in the directory where you executed the tar command
+ and apply the patch;
+
+ % patch -p0 < rdoc-f95_ruby1.9.0.patch
+
+* Install RDoc package as written in
+ {Site of the Ruby}[http://www.ruby-lang.org/].
+
+
+=== Installation by using patched RDoc package
+
+To install the patched RDoc package,
+follow the steps described below:
+
+* Download archive file rdoc-f95.tgz
+
+* Unpack:
+
+ % tar -zxvf rdoc-f95.tgz
+
+* Go into the Ruby source directory:
+
+ % cd rdoc-f95-XXXXXXXX
+
+* Install the package:
+
+ % ruby install.rb
+
+If rdoc is already installed, the original rdoc will be overritten.
+
+Use --help option to show options and the directory to which
+rdoc is installed:
+
+ % ruby install.rb --help
+
+=== Installation by using binary packages for Debian GNU/Linux
+
+Add following URL to sources.list of APT (/etc/apt/sources.list).
+You can use "ftp" protocol instead of "http".
+
+ deb http://www.gfd-dennou.org/library/cc-env/Linux/debian-dennou etch/
+
+Install by APT commands.
+
+ % apt-get update
+ % apt-get install rdoc-f95
+
+This "rdoc-f95" package disables original "rdoc" package
+because "rdoc-f95" moves files of "rdoc" to diverted location.
+If you want to use original "rdoc" package, please remove "rdoc-f95".
+Then files of original "rdoc" package will be returned to proper location.
+
+Following suggested packages enable you to use "diagram" and
+"mathml" options (see below).
+
+ % apt-get install graphviz libmathml-ruby
+
+
+== Usage
+
+Set the environment variable *PATH* to include
+the directory where the execution program is installed,
+and *RUBYLIB* to include the directory
+where the libraries are installed.
+
+Move to a directory where your Fortran 90/95 files exist,
+and execute the following command. HTML documents will be generated in
+*doc* directory.
+
+ % rdoc -U --ignore-case --inline-source
+
+Files ending .f90, .F90, .f95, .F95
+are parsed as Fortran 90/95 programs.
+All Fortran 90/95 programs in subdirectories are parsed recursively.
+
+Just as in the original RDoc, files ending with .rb and .rbw
+are parsed as Ruby programs and files ending with .c, .cc,
+.cpp, .CC, .cxx are parsed as C programs.
+
+With the option --op,
+the directory where HTML documents are generated can be changed.
+--title option sets title of HTML documents.
+When --all option is used,
+private subroutines, functions etc. in
+Fortran 90/95 programs are shown in HTML documents (for developers).
+If files or directories are specified as arguments (for example,
+"src/*.f90" or "test/"), the particular files
+are parsed.
+In the following example, files with suffix ".f90" in a
+directory "src/" and files in a directory "test/"
+are parsed.
+
+ % rdoc -U --ignore-case --inline-source \
+ --op rdoc --title "RDoc documentations" src/*.f90 test/
+
+Alternatively, you can parse only a part of files by creating a
+".document" file and writing names of the files and the
+directories to the file.
+
+For more information,
+see {README of original RDoc}[link:files/README_org.html].
+
+
+== Rules for RDoc Document
+
+Refer to parsers/parse_f95.rb which
+explains parsed information, way of looking at documents,
+the format of comment blocks in Fortran 90/95 source code.
+If you use "--mathml" option (see below),
+refer to RDoc::Markup::ToXHtmlTexParser, too.
+For general information, see
+{README of original RDoc}[link:files/README_org.html] .
+
+== Samples
+
+* {Code reference of data I/O library gt4f90io (only JAPANESE)}[http://www.gfd-dennou.org/library/gtool4/gt4f90io/gt4f90io_current/doc/develop_reference/]
+
+* {Code reference of planetary atmospheric general circulation model DCPAM (only JAPANESE)}[http://www.gfd-dennou.org/library/dcpam/dcpam3/dcpam3_current/doc/code_reference/htm]
+
+== Differences from original RDoc
+
+This patch has been created for enhancing the Fortran 90/95 parser of RDoc .
+{The Fortran 90/95 parse script parse_f95.rb}[http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/lib/rdoc/parsers/parse_f95.rb]
+is mainly modified, and other programs are also improved.
+
+
+The original RDoc has been developed by Dave Thomas and is now
+maintained by Ryan Davis.
+The RDoc is available from the Ruby source code repository.
+See {Ruby Repository Guide}[http://www.ruby-lang.org/en/news/2006/12/22/cvs-repository-moved-to-svn/].
+For more information about RDoc, see
+{README of original RDoc}[link:files/README_org.html] .
+
+Differences to the original one are given below.
+Note that some differences were lost because
+this patch (2005/12/17 version) has been already included into
+the original RDoc package.
+
+--
+#Enhancement of an analytical performance of Fortran 90/95 source codes ::
+# See parsers/parse_f95.rb for details.
+
+#Modification of format of comment blocks ::
+# See parsers/parse_f95.rb for details.
+++
+
+Addition of --ignore-case option ::
+ In the Fortran 90/95 Standard,
+ upper case letters are not distinguished from lower case letters,
+ although original RDoc produces case-dependently
+ cross-references of Class and Methods.
+ When this options is specified,
+ upper cases are not distinguished from lower cases.
+
+Cross-reference of file names ::
+ Cross-reference of file names is available as well as
+ modules, subroutines, and so on.
+
+Modification of --style option ::
+ Original RDoc can not treat relative path stylesheet.
+ Application of this patch modifies this function.
+
+Conversion of TeX formula into MathML::
+ TeX formula can be converted into MathML format
+ with --mathml option,
+ if MathML library for Ruby version 0.6b -- 0.8 is installed.
+ This library is available from {Bottega of Hiraku (only JAPANESE)}[http://www.hinet.mydns.jp/~hiraku/].
+ See RDoc::Markup::ToXHtmlTexParser about format.
+
+ *** Caution ***
+ Documents generated with "--mathml" option are not displayed correctly
+ according to browser and/or its setting.
+ We have been confirmed that
+ documents generated with "--mathml" option are displayed correctly
+ with {Mozilla Firefox}[http://www.mozilla.org/products/firefox/]
+ and Internet Explorer
+ (+ {MathPlayer}[http://www.dessci.com/en/products/mathplayer/]).
+ See {MathML Software - Browsers}[http://www.w3.org/Math/Software/mathml_software_cat_browsers.html]
+ for other browsers.
+
+Some formats of comments in HTML document are changed
+to improve the analysis features.
+See parsers/parse_f95.rb for details.
+
+
+== Remarks on usage
+
+The enhanced version of the RDoc Fortran 90/95 parser
+has been constructed on the premise of
+educational and academic usages only.
+For these uses, usage and modification of the resources
+withiout notification to the authors is permitted.
+Licence of the enhanced version of RDoc Fortran 90/95 parser
+conforms to that of original RDoc.
+See {README of original RDoc}[link:files/README_org.html] .
+
+When you publish your scientific/technological works
+using the enhanced version of RDoc Fortran 90/95 parser,
+we will be very glad if you cite our resources
+in the following way:
+
+ GFD Dennou Club dcmodel project, 2008:
+ http://www.gfd-dennou.org/library/dcmodel/, GFD Dennou Club.
+
+== Contact
+
+To contact us, please send an email to link:../rdoc-f95-mailto.png .
+
+== References
+
+* {Yasuhiro MORIKAWA, Masaki ISHIWATARI, Takeshi HORINOUCHI,
+ Masatsugu ODAKA, Yoshi-Yuki HAYASHI, 2007:
+ Document generation for numerical models by RDoc.
+ Tenki, 54, 185--190.}[http://s-ws.net/tenki/cont/54_02/co.html]
+ (only JAPANESE)
+
+--
+== Presentations
+++
+
+
+== History
+
+==== 2008/03/16
+
+* Tutorial is created (only JAPANESE)
+
+==== 2008/03/08
+
+* Ruby version 1.9.0 is supported.
+
+* MathML library for Ruby version 0.8 is supported.
+
+* References and presentations are added to README.
+ An example of citation is changed.
+
+==== 2007/03/09
+
+* A bug that RiWriter can not operate in Ruby 1.8 is fixed.
+
+==== 2007/02/27
+
+* README and README.ja are modified due to movement of Ruby source code
+ Repository from CVS to SVN.
+
+==== 2007/01/12
+
+* A bug that Fortran 90/95 source code like
+ "FUNCTION Get_Platform() RESULT(platform)" is converted to
+ "Get_Platform( platform ) result(platform)" is fixed.
+ (by the advice from Hani Andreas Ibrahim).
+
+==== 2007/01/09
+
+* Generators::TexParser is modified.
+
+==== 2007/01/05
+
+* Contact address is changed.
+* Ruby version of a patch file is updated to 1.8.5-p12.
+* Document "Usage of \newcommand and \newenvironment" is added in
+ Generators::TexParser.
+* Document "Cross-reference of defined operators and defined
+ assignments" is added in parsers/parse_f95.rb.
+* Document "The sequence of displayed entities" in
+ parsers/parse_f95.rb is modified.
+* A bug that '--ignore-case' option is invalid partly is fixed.
+
+==== 2006/12/15
+
+* Ruby version of a patch file is updated to 1.8.5-p2
+
+==== 2006/12/13
+
+* The sequence of displayed entities can be ordered manually by
+ the comment like "!:doc-priority 100:".
+
+==== 2006/11/20
+
+* Description about ".docuemnt" file is added.
+* Some subprograms which have different names in one interface block
+ are parsed correctly.
+* Import updates of RDoc in original Ruby CVS.
+
+==== 2006/11/16
+
+* Generators::TexParser is modified/
+ * A way to write equations across multiple lines is described in document.
+ * The format of CVS keywords, that is "$ID: ... $" or
+ "$LOG: ... $ etc. is ignored.
+* All methods added to "code_object.rb" for "parse_f95.rb" are moved
+ to "parse_f95.rb". Therefore "parse_f95.rb" works alone in Ruby
+ 1.8.5 .
+
+==== 2006/11/14
+
+* Ruby version of a patch file is updated to 1.8.5
+* Patch filename is changed.
+* Debian GNU/Linux binary packages are modified.
+* XHTML version of documents is changed from "XHTML 1.0 Transitional"
+ to "XHTML 1.1 plus MathML 2.0".
+* Interpreter of continuous lines is modified.
+* Import updates of RDoc in original Ruby CVS.
+* English is corrected with comments of Dr. Geiger (Institute for
+ Plasma Physics)
+* File names beginning "../" are parsed correctly.
+* A version of MathML library for Ruby is changed from 0.5 to 0.6b.
+* Syntax error with MathML library for Ruby is avoided.
+
+==== 2006/08/15
+
+* Description about installation with binary packages for Debian GNU/Linux
+ is modified.
+* Bugs about parsing comments of NAMELIST is modified.
+
+==== 2006/08/14
+
+* Package name is changed as "rdoc-f95" from "rdoc-dennou".
+* Address is changed as
+ http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/
+* README and README.ja are modified.
+* Conversion of TeX formula into MathML is enable.
+* Modification of --style option.
+* Main programs are added to 'Methods' too.
+* The NAMELIST group names scattered in each file are collected on one page.
+* Names of modules provided by F90 files are added to documents of the files
+ automatically.
+
+
+==== 2006/02/24
+
+* English version of README is created.
+
+==== 2006/01/18
+* Comment formats for arguments of subroutines and functions
+ are slightly modified.
+
+ * A space is inserted below the argument described in HTML document.
+
+* Patched package is rebulid with
+ updated Ruby resources in CVS repository.
+
+==== 2005/12/28
+* Patch file for ruby 1.8.4 is released.
+
+==== 2005/12/17
+
+* Some bugs are fixed.
+* Parsing external subroutines specified interface are improved.
+* Handling of Continuation lines are improved.
+
+==== 2005/12/13
+
+* Remarks and Todo are added in parsers/parse_f95.rb
+* Sample is added in README
+* Parsing part of public, private statements
+ are improved.
+
+==== 2005/12/08
+
+* "Remarks in use" and "Contact" are added in README .
+* Address is changed as
+ http://www.gfd-dennou.org/library/dcmodel/rdoc-dennou/
+
+==== 2005/11/28
+
+* ":nodoc:" tag are available.
+* Parsing "contains" in subroutines and functions are improved.
+* Title is changed.
+* Old version of the patches are placed in web page.
+
+==== 2005/11/17
+
+* Improvement of analysis features, checking HTML documents
+ which are produced by RDoc.
+ release of preliminary version.
diff -Nur --exclude=doc ruby-1.9.0/lib/rdoc/README.ja ../rdoc-f95-20080316/README.ja
--- ruby-1.9.0/lib/rdoc/README.ja 1970-01-01 09:00:00.000000000 +0900
+++ ../rdoc-f95-20080316/README.ja 2008-03-17 01:11:12.000000000 +0900
@@ -0,0 +1,495 @@
+(Japanese | {English}[link:files/README.html])
+
+= RDoc Fortran 90/95 ソースコード解析機能強化版
+
+{RDoc - Ruby Documentation System}[http://www.ruby-doc.org/stdlib/libdoc/rdoc/rdoc/index.html]
+の Fortran 90/95 ソースコード解析機能を強化するためのパッチを
+配布しています. パッチを適用したパッケージも配布しています.
+
+== 動作確認
+
+このパッケージは Ruby 1.8.2 および 1.9.0 での動作を確認しています.
+
+== チュートリアル
+
+インストールに始まり,
+実際に Fortran 90/95 ソースコードを作成して
+ドキュメント化するまでのガイダンスとして,
+チュートリアル
+{RDoc による数値モデルの自動ドキュメント生成}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/tutorial/]
+を用意しています.
+
+== ダウンロード
+
+最新版 (バージョン $Name: rdoc-f95-20080316 $)
+
+* {Ruby 1.9.0 用のパッチ}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/rdoc-f95_ruby1.9.0.patch]
+
+* {rdoc-f95 tar.gz パッケージ (Ruby 1.9.0 の rdoc の部分を取り出し, 上記パッチを適用して tar ボールにしたもの)}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/rdoc-f95.tgz]
+
+過去のアーカイブ
+
+* {パッチ ・ TGZ パッケージ ・ ソースツリーのリスト}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/arch/SIGEN.htm]
+
+* {Debian GNU/Linux 用バイナリパッケージ}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/debian]
+
+== インストール
+
+インストールには以下の 3 つの方法があります.
+
+=== パッチファイルを利用する方法
+
+パッチファイルを Ruby のオリジナル資源に適用する手順は
+以下の通りです.
+
+* まず, {Ruby のホームページ}[http://www.ruby-lang.org/] から
+ ftp://ftp.ruby-lang.org/pub/ruby/1.9/ruby-1.9.0-0.tar.gz
+ をダウンロードしてください
+
+* 上記 TGZ ファイルを展開してください.
+
+ % tar -zxvf ruby-1.9.0-0.tar.gz
+
+* このコマンドを実行したディレクトリに上記のパッチファイル
+ rdoc-f95_ruby1.9.0.patch を置き, 以下のコマンドでパッチを
+ 適用してください.
+
+ % patch -p0 < rdoc-f95_ruby1.9.0.patch
+
+* パッチを適用した後に, Ruby のインストール作業を行ってください.
+ Ruby のインストール方法は
+ {オブジェクト指向スクリプト言語 Ruby のホームページ}[http://www.ruby-lang.org/]
+ を参照してください.
+
+=== パッチが適用されたパッケージを利用する方法
+
+パッチが適用された rdoc-f95.tgz パッケージを使用するには
+以下のようにします.
+
+アーカイブファイル rdoc-f95.tgz をダウンロードした後に,
+以下のように tar コマンドで展開後,
+展開されたディレクトリに移動し,
+install.rb でインストールを行ってください.
+既に rdoc がインストールされている場合, 上書きする可能性があります.
+
+ % tar -zxvf rdoc-f95.tgz
+ % cd rdoc-f95-XXXXXXXX
+ % ruby install.rb
+
+インストール先のディレクトリや, 変更のためのオプションに関しては,
+以下のコマンドで知ることが出来ます.
+
+ % ruby install.rb --help
+
+=== Debian GNU/Linux 用バイナリパッケージを利用する方法
+
+以下の URL を APT のソースリスト (/etc/apt/sources.list) に加えます.
+プロトコルとして http の代わりに ftp を用いることも可能です.
+
+ deb http://www.gfd-dennou.org/library/cc-env/Linux/debian-dennou etch/
+
+APT のコマンドでインストールを行ないます.
+
+ % apt-get update
+ % apt-get install rdoc-f95
+
+このパッケージはオリジナルの rdoc パッケージのファイル群を退避した場所
+へ移動させるため, オリジナルの rdoc パッケージが使用できなくなります.
+オリジナルの rdoc パッケージを使用する場合は rdoc-f95
+パッケージを削除してください. 退避されたオリジナルの rdoc パッケージの
+ファイル群が本来の場所に復帰します.
+
+以下の提案パッケージをインストールしておくと,
+diagram オプションや mathml オプション (下記参照) が使用可能になります.
+
+ % apt-get install graphviz libmathml-ruby
+
+
+== RDoc の使用方法
+
+実行プログラムがインストールされた場所を環境変数 *PATH*
+に設定し, ライブラリがインストールされた場所を環境変数 *RUBYLIB*
+に設定してください.
+
+Fortran 90/95 ファイルが置いてあるディレクトリまで移動し, 以下のコマンドを
+実行してください. *doc* ディレクトリ以下にドキュメントが作成されます.
+
+ % rdoc -U --ignore-case --charset euc-jp --inline-source
+
+拡張子が .f90, .F90, .f95, .F95
+であるファイルは Fortran 90/95 プログラムとして解析されます.
+サブディレクトリ以下の全ての Fortran 90/95 プログラムも解析されます.
+
+なお, オリジナルの RDoc と同様, 拡張子が .rb,
+.rbw であるファイルは Ruby プログラムとして, 拡張子が
+.c, .cc, .cpp, .CC, .cxx
+であるファイルは C プログラムとして解析されます.
+
+*doc* ディレクトリ以外に出力したい場合は,
+--op オプションをつけてください.
+タイトルは
+--title オプションで変更できます.
+また, デフォルトでは Fortran 90/95 の private 属性のサブルーチンや関数
+などはドキュメントに出力されませんが, --all オプションを
+つけることで, 全てがドキュメントに出力されます.
+--charsetオプションは, ドキュメントに反映されるコメントに
+日本語など 2 バイト文字が含まれる場合に用います.
+コメントの文字コードに合わせ, euc-jp, Shift_JIS,
+iso-2022-jp などを指定してください.
+
+一部のファイルのみを
+ドキュメント化したい場合は, 引数に src/*.f90 などと
+ファイル名やディレクトリ名を明示的に指定してください.
+以下の例では, "src/" 以下のディレクトリに存在する
+拡張子 ".f90" のファイルと,
+"test" ディレクトリ以下のファイルがドキュメント化されます.
+
+ % rdoc -U --ignore-case --charset euc-jp --inline-source \
+ --op rdoc --title "RDoc documentations" src/*.f90 test/
+
+この方法以外にも, ".document" ファイルを作成し, その中に
+ファイル名やディレクトリ名を記述しておくことでドキュメント化する
+ファイルを限定することが出来ます.
+
+詳しいことは
+{RDoc オリジナルの README}[link:files/README_org.html]
+を参照ください.
+
+
+== 書法
+
+解析される情報やドキュメントの見方, コメント部の書き方に関しては,
+parsers/parse_f95.rb を参照ください. --mathml オプション (下記参照)
+を使用する場合には, RDoc::Markup::ToXHtmlTexParser も参照ください.
+ただし, これらに記述されるのは Fortran 90/95 などに特有な部分なので,
+一般的な部分に関しては
+{RDoc オリジナルの README}[link:files/README_org.html]
+を参照ください.
+大林さんによる日本語訳が http://www.kmc.gr.jp/~ohai/rdoc.ja.html にあります.
+
+== サンプル
+
+* {データ I/O ライブラリ gt4f90io のコードリファレンス}[http://www.gfd-dennou.org/library/gtool4/gt4f90io/gt4f90io_current/doc/develop_reference/]
+
+* {惑星大気モデル DCPAM のコードリファレンス (製作中)}[http://www.gfd-dennou.org/library/dcpam/dcpam3/dcpam3_current/doc/code_reference/htm]
+
+
+== オリジナルの RDoc との違い
+
+ここで配布するパッチは, RDoc の Fortran 90/95 ソースコードの
+解析能力を大幅に向上させ, Fortran 90/95 プログラムから
+自動生成されるドキュメントの情報量を充実させます.
+主に改良されているのは, 元々の RDoc に付属される
+{Fortran 90/95 解析プログラム parse_f95.rb}[http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/lib/rdoc/parsers/parse_f95.rb]
+ですが, 他のいくつかのプログラムにも改良を施しています.
+
+オリジナルの RDoc は Dave Thomas さんによって開発され,
+現在では Ryan Davis さんによってメンテナンスされています.
+オリジナルの RDoc は Ruby のソースコードレポジトリ
+より取得できます.
+{Ruby レポジトリガイド}[http://www.ruby-lang.org/ja/documentation/repository-guide] を参照してください.
+オリジナルの RDoc に関しては
+{RDoc オリジナルの README}[link:files/README_org.html]
+を参照してください.
+
+
+オリジナルからの変更点の主なものは以下の通りです.
+なお, 既にこのパッチ (2005/12/17 バージョン) は
+Ruby 本家のソースコードレポジトリへとフィードバックされているので,
+一部は既に「オリジナルとの変更点」
+ではなくなっていることに注意してください.
+
+--ignore-case オプションの追加 ::
+ Fortran 90/95 規格では大文字小文字の区別はありません.
+ これに対して, オリジナルの RDoc はクラス名やメソッド名の
+ クロスリファレンスの際に大文字小文字を区別します.
+ このオプションを与えることにより,
+ その区別を行わないようにします.
+
+ファイルのクロスリファレンス ::
+ クラスやモジュール, メソッドと同様に, ファイル名に関しても
+ クロスリファレンスを可能にしました.
+
+--style オプションの改良 ::
+ オリジナルの RDoc では, 相対パスでスタイルシートを指定した場合,
+ 各ドキュメントのスタイルシートへのパスが正しく設定されません.
+ このパッチを適用することで, 正しく設定されるようになります.
+
+TeX で書かれた数式の MathML への変換 ::
+ {ひらくの工房}[http://www.hinet.mydns.jp/~hiraku/]
+ にて公開されている
+ Ruby 用 MathML ライブラリのバージョン 0.6b 〜 0.8 を
+ インストールすることで, TeX で書かれた数式を
+ MathML の形式に変換することが可能です. この機能を有効
+ にするためには rdoc コマンドに --mathml オプションを
+ 指定してください.
+ TeX で数式を書く際の書式に関しては
+ RDoc::Markup::ToXHtmlTexParser を参照してください.
+
+ ※ 注意 ※ --mathml オプションを使用した際に作成される
+ ドキュメントはブラウザによっては正しく表示されないことも
+ あります.
+ {Mozilla Firefox}[http://www.mozilla.org/products/firefox/]
+ および Internet Explorer
+ (+ {MathPlayer}[http://www.dessci.com/en/products/mathplayer/])
+ では正しく表示されることを確認しています.
+ その他のブラウザの MathML 対応に関しては,
+ {MathML 日本語情報}[http://washitake.com/MathML/]
+ や {MathML Software - Browsers}[http://www.w3.org/Math/Software/mathml_software_cat_browsers.html]
+ などを参照してください.
+
+--
+# 以降は Fortran とは関係の無い改変
+#
+#Ruby ライブラリ IRB::SLex の読み込みについて ::
+# Ruby 1.8.2 でも動作するよう, 最新の parse_rb.rb を１つ以前の
+# バージョンに戻しています.
+#
+#
+#拡張子cxxも C パーサで解釈 ::
+# これは全く Fortran 90/95 とは関係ありません.
+# この拡張子 cxx は c++ ファイルから
+# SWIG[http://swig.shibu.jp/] によって作成されるファイルの拡張子です.
+++
+
+解析能力が向上されたのに伴い, ドキュメントに反映されるコメントの書法の
+多少変更されています.
+parsers/parse_f95.rb を参照してください.
+
+
+== 使用上の注意
+
+RDoc Fortran 90/95 ソースコード解析機能強化版のパッチもしくはパッケージ
+(以下, 本パッチもしくはパッケージ)は,
+研究・教育の場で用いられることを前提としております. 教育現場においては自由に使用・改変していただいて結構です.
+ライセンス規定は本家 RDoc に準拠します.
+{RDoc オリジナルの README}[link:files/README_org.html]
+を参照ください.
+
+本パッチもしくはパッケージを利用して得られた科学技術的成果を
+論文や Web 等にて発表する際には, その旨を記し, リファレンスに挙げて
+頂きますようお願いします.
+
+* 引用例 (和文)
+
+ 地球流体電脳倶楽部 dcmodel プロジェクト, 2008:
+ http://www.gfd-dennou.org/library/dcmodel/, 地球流体電脳倶楽部.
+
+* 引用例 (英文)
+
+ GFD Dennou Club dcmodel project, 2008:
+ http://www.gfd-dennou.org/library/dcmodel/, GFD Dennou Club.
+
+
+== 連絡先
+
+コメントや意見, 質問などは link:../rdoc-f95-mailto.png までお寄せください.
+
+
+== 参考文献
+
+* {森川靖大, 石渡正樹, 堀之内武, 小高正嗣, 林祥介, 2007:
+ RDoc を用いた数値モデルのドキュメント生成. 天気, 54, 185--190.}[http://s-ws.net/tenki/cont/54_02/co.html]
+
+== 発表資料
+
+* 森川靖大, 石渡正樹, 堀之内武, 小高正嗣, 林祥介,
+ 「RDoc を用いた数値モデルのドキュメント生成」,
+ 日本気象学会 2006 年度春季大会,
+ つくば国際会議場, 2006 年 5 月 24 日 (講演番号 D401).
+ {講演予稿}[http://www.gfd-dennou.org/arch/prepri/2006/metsoc.spr/rdoc-dennou/yokou/pub/rdoc-dennou_2006_metsoc-spr_ver0.8.pdf],
+ {発表資料 (HTML)}[http://www.gfd-dennou.org/arch/prepri/2006/metsoc.spr/rdoc-dennou/presen/pub/]
+ {発表資料 (PDF)}[http://www.gfd-dennou.org/arch/prepri/2006/metsoc.spr/rdoc-dennou/presen/pub/metsoc-spr2006_rdoc-dennou_ver1.4.pdf].
+
+* 森川靖大, 石渡正樹, 堀之内武, 小高正嗣, 林祥介,
+ 「RDoc を用いた Fortran90/95 プログラムのドキュメント生成」,
+ 地球惑星科学連合 2006 年大会,
+ 幕張メッセ国際会議場, 2006 年 5 月 14 日 (講演番号 J157-016).
+ {講演予稿}[http://www.gfd-dennou.org/arch/prepri/2006/goudou/rdoc-dennou/yokou/pub/J157-016.pdf],
+ {発表資料 (HTML)}[http://www.gfd-dennou.org/arch/prepri/2006/goudou/rdoc-dennou/presen/pub/],
+ {発表資料 (PDF)}[http://www.gfd-dennou.org/arch/prepri/2006/goudou/rdoc-dennou/presen/pub/jpgu_rdoc-dennou_ver1.4.pdf].
+
+* 森川靖大, 石渡正樹, 堀之内武, 小高正嗣, 林祥介,
+ 「RDoc を用いた Fortran90/95 プログラムのドキュメント生成」,
+ 2005 年 STEL 研究小集会,
+ 宇宙地球系情報科学研究会, 愛媛大学総合情報メディアセンター,
+ 2005 年 12 月 15 日.
+ {発表資料}[http://www.gfd-dennou.org/arch/prepri/2005/stel-gi/rdoc-dennou/pub/]
+
+== 履歴
+
+==== 2008/03/16
+
+* チュートリアル
+ {RDoc による数値モデルの自動ドキュメント生成}[http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/tutorial/]
+ を作成.
+
+==== 2008/03/08
+
+* Ruby バージョン 1.9.0 に対応.
+
+* Ruby 用 MathML ライブラリ バージョン 0.8 に対応.
+
+* README に参考文献と発表資料を追加.
+ 引用例の変更.
+
+==== 2007/03/09
+
+* RiWriter が Ruby 1.8 で動作しないバグを修正.
+
+==== 2007/02/27
+
+* Ruby ソースコードレポジトリが CVS から SVN に変更されたことに伴い
+ README, README.ja を修正.
+
+==== 2007/01/12
+
+* "FUNCTION Get_Platform() RESULT(platform)" のような
+ Fortran 90/95 ソースコードが
+ "Get_Platform( platform ) result(platform)" のように表示されてしまう
+ バグの修正 (Hani Andreas Ibrahim 氏による報告より).
+
+==== 2007/01/09
+
+* Generators::TexParser の修正.
+
+==== 2007/01/05
+
+* 連絡先アドレスを変更.
+* パッチファイルを Ruby バージョン 1.8.5-p12 に対応.
+* Generators::TexParser に
+ 解説「\newcommand, \newenvironment の使用方法」を追加.
+* parsers/parse_f95.rb に
+ 解説「利用者定義演算子, 利用者定義代入のクロスリファレンス」を追加.
+* parsers/parse_f95.rb の
+ 解説「言語要素の表示順序」を修正
+* クロスリファレンス時に一部 '--ignore-case' オプションが効かない
+ 問題を修正.
+
+==== 2006/12/15
+
+* パッチファイルを Ruby バージョン 1.8.5-p2 に対応.
+
+
+==== 2006/12/13
+
+* "!:doc-priority 100:" といったコメントの記述により,
+ 表示される言語要素の順番を明示的に変更可能にする.
+
+==== 2006/11/20
+
+* ".document" ファイルについて追記.
+* 一つの interface ブロック内に記述される異なる名前の複数の
+ 副プログラムを正しく解析できるよう修正.
+* Ruby 本家の CVS の更新内容を移植.
+
+==== 2006/11/16
+
+* Generators::TexParser の改良.
+ * 解説文書に, 数式を複数行で表示する場合の例を追記.
+ * "$ID: ... $" や "$LOG: ... $ といった,
+ CVS のキーワードとして用いられている書き方は数式として扱わない.
+* parse_f95.rb のために code_object.rb に追加した
+ 全てのメソッドを parse_f95.rb へ移動した. これにより,
+ parse_f95.rb 単体を Ruby 1.8.5 に組み込んで使用することが可能となった.
+
+==== 2006/11/14
+
+* パッチファイルを Ruby バージョン 1.8.5 に対応.
+* パッチのファイル名を変更.
+* Debian GNU/Linux のバイナリパッケージの作成方法を修正.
+* 生成されるドキュメントの XHTML のバージョン を XHTML 1.0
+ Transitional から XHTML 1.1 plus MathML 2.0 へ変更.
+* Fortran 90/95 パーサにおいて, 継続行の処理方法を修正.
+* Ruby 本家の CVS の更新内容を移植.
+* Institute for Plasma Physics の Giger 氏のコメントを受けて英語を修正
+* "../" で始まるファイル名をパースできないバグを修正.
+* 使用する Ruby 用 MathML ライブラリのバージョンを 0.5 から 0.6a へ.
+* Ruby 用 MathML ライブラリを使用する際, エラーが生じても警告を発して
+ 動作を継続するよう修正.
+
+==== 2006/08/15
+
+* Debian GNU/Linux 用バイナリパッケージのインストール方法を改定.
+* NAMELIST のコメントを取得するプログラムのバグを修正.
+
+==== 2006/08/14
+
+* パッケージ名を rdoc-dennou から rdoc-f95 に変更.
+* 公開アドレスを
+ http://www.gfd-dennou.org/library/dcmodel/rdoc-dennou/ から
+ http://www.gfd-dennou.org/library/dcmodel/rdoc-f95/ へ変更.
+ (過去の URL もしばらく残しておきます).
+* README, README.ja の修正.
+* TeX で書かれた数式を MathML への変換する機能を追加.
+* style オプションの改良.
+* 主プログラムも 'Methods' の欄に追加.
+* 各ファイルに点在している NAMELIST 変数群を自動的に一箇所に
+ 集約して表示するよう改良.
+* F90 ファイルが提供するモジュール群の名前を,
+ 自動的にファイルのドキュメントに追記するよう改良.
+
+
+==== 2006/02/24
+
+* 英語版 README の作成
+
+* README.ja の修正.
+
+
+==== 2006/01/18
+* サブルーチン, 関数の引数の情報をコメントとして出力する際の書式を
+ 少しだけ修正.
+
+ * 引数情報をコメントに出力する際, 引数の後ろに空白を挿入した.
+ これにより, メソッドの並び替えを行う際 (メソッドはメソッド名,
+ 引数, コメントの順に大きさを比較し, 並べる順序を決める),
+ "args" が "args(:)" よりも前に来るようになる.
+
+* 本家 Ruby の CVS レポジトリ内の更新を受け, 最新版をこちらの
+ パッケージ版にも移植.
+
+==== 2005/12/28
+* ruby 1.8.4 のリリースに伴い, パッチを 1.8.4 用に変更.
+
+==== 2005/12/17
+
+* 同名の手続き同士で公開・非公開属性を誤って設定してしまうバグを修正.
+* 以下のバグを修正
+ * program, module, subroutine, function の end 文は必ず
+ end program, end module, end subroutine, end function のように
+ 記述しないと, 書法を正しく解析出来ない.
+ * program 〜 end program 文の, 最初と最後の program という文字を
+ 省略した場合, program 文の内部で定義されるものは全て public だと
+ 認識される.
+ * ";" の文字をコメント内でも改行に変換してしまう
+* !-- 〜 !++ によるコメント削除の指定の際に, "!" よりも前に空白を
+ 含んでよいように修正.
+* interface 文で指定される外部手続きの解析を修正.
+* 継続行の扱いを修正.
+
+==== 2005/12/13
+
+* parsers/parse_f95.rb に注意事項と Todo を追加.
+* 「サンプル」を追加.
+* public, private 文を解析する部分のバグを修正.
+
+==== 2005/12/08
+
+* 「使用上の注意」, 「連絡先」を追加.
+* 公開アドレスを
+ http://www.gfd-dennou.org/library/dcmodel/doc/rdoc-dennou/ から
+ http://www.gfd-dennou.org/library/dcmodel/rdoc-dennou/ へ変更.
+ (過去の URL もしばらく残しておきます).
+
+==== 2005/11/28
+
+* ":nodoc:" の指定を可能にする.
+* サブルーチンや関数内の "contains" 文の処理方法を修正する.
+* 表題を変更する.
+* 過去のバージョンを公開する.
+
+==== 2005/11/17
+
+* 一通り欲しい機能が揃い, ドキュメントのチェックも行ったので,
+ タグをつけて公開する.
diff -Nur --exclude=doc ruby-1.9.0/lib/rdoc/README.org ../rdoc-f95-20080316/README.org
--- ruby-1.9.0/lib/rdoc/README.org 1970-01-01 09:00:00.000000000 +0900
+++ ../rdoc-f95-20080316/README.org 2006-07-08 14:56:44.000000000 +0900
@@ -0,0 +1,502 @@
+= RDOC - Ruby Documentation System
+
+== Annotation
+
+This is a copy from
+{RDoc original README}[http://www.ruby-doc.org/stdlib/libdoc/rdoc/rdoc/index.html]
+
+See README or README.ja .
+
+== Overview
+
+This package contains Rdoc and SimpleMarkup. Rdoc is an application
+that produces documentation for one or more Ruby source files. We work
+similarly to JavaDoc, parsing the source, and extracting the
+definition for classes, modules, and methods (along with includes and
+requires). We associate with these optional documentation contained
+in the immediately preceding comment block, and then render the result
+using a pluggable output formatter. (Currently, HTML is the only
+supported format. Markup is a library that converts plain text into
+various output formats. The Markup library is used to interpret the
+comment blocks that Rdoc uses to document methods, classes, and so on.
+
+This library contains two packages, rdoc itself and a text markup
+library, 'markup'.
+
+== Roadmap
+
+* If you want to use Rdoc to create documentation for your Ruby source
+ files, read on.
+* If you want to include extensions written in C, see rdoc/parsers/parse_c.rb.
+* For information on the various markups available in comment
+ blocks, see markup/simple_markup.rb.
+* If you want to drive Rdoc programatically, see RDoc::RDoc.
+* If you want to use the library to format text blocks into HTML,
+ have a look at SM::SimpleMarkup.
+* If you want to try writing your own HTML output template, see
+ RDoc::Page.
+
+== Summary
+
+Once installed, you can create documentation using the 'rdoc' command
+(the command is 'rdoc.bat' under Windows)
+
+ % rdoc [options] [names...]
+
+Type "rdoc --help" for an up-to-date option summary.
+
+A typical use might be to generate documentation for a package of Ruby
+source (such as rdoc itself).
+
+ % rdoc
+
+This command generates documentation for all the Ruby and C source
+files in and below the current directory. These will be stored in a
+documentation tree starting in the subdirectory 'doc'.
+
+You can make this slightly more useful for your readers by having the
+index page contain the documentation for the primary file. In our
+case, we could type
+
+ % rdoc --main rdoc/rdoc.rb
+
+You'll find information on the various formatting tricks you can use
+in comment blocks in the documentation this generates.
+
+RDoc uses file extensions to determine how to process each file. File
+names ending .rb and .rbw are assumed to be Ruby
+source. Files ending .c are parsed as C files. All other
+files are assumed to contain just SimpleMarkup-style markup (with or
+without leading '#' comment markers). If directory names are passed to
+RDoc, they are scanned recursively for C and Ruby source files only.
+
+== Credits
+
+* The Ruby parser in rdoc/parse.rb is based heavily on the outstanding
+ work of Keiju ISHITSUKA of Nippon Rational Inc, who produced the Ruby
+ parser for irb and the rtags package.
+
+* Code to diagram classes and modules was written by Sergey A Yanovitsky
+ (Jah) of Enticla.
+
+* Charset patch from MoonWolf.
+
+* Rich Kilmer wrote the kilmer.rb output template.
+
+* Dan Brickley led the design of the RDF format.
+
+== License
+
+RDoc is Copyright (c) 2001-2003 Dave Thomas, The Pragmatic Programmers. It
+is free software, and may be redistributed under the terms specified
+in the README file of the Ruby distribution.
+
+
+= Usage
+
+RDoc is invoked from the command line using:
+
+ % rdoc [name...]
+
+Files are parsed, and the information they contain collected, before
+any output is produced. This allows cross references between all files
+to be resolved. If a name is a directory, it is traversed. If no
+names are specified, all Ruby files in the current directory (and
+subdirectories) are processed.
+
+Options are:
+
+[--accessorname[,name...]]
+ specifies the name(s) of additional methods that should be treated
+ as if they were attr_xxx methods. Specifying
+ "--accessor db_opt" means lines such as
+
+ db_opt :name, :age
+
+ will get parsed and displayed in the documentation. Each name may have an
+ optional "=flagtext" appended, in which case the given flagtext will appear
+ where (for example) the 'rw' appears for attr_accessor.
+
+[--all]
+ include protected and private methods in the output (by default
+ only public methods are included)
+
+[--charset _charset_]
+ Set the character set for the generated HTML.
+
+[--diagram]
+ include diagrams showing modules and classes. This is currently
+ an experimental feature, and may not be supported by all output
+ templates. You need dot V1.8.6 or later to use the --diagram
+ option correctly (http://www.research.att.com/sw/tools/graphviz/).
+
+[--excludepattern]
+ exclude files and directories matching this pattern from processing
+
+[--extensionnew=old]
+ treat files ending .new as if they ended
+ .old. Saying '--extension cgi=rb' causes RDoc to treat .cgi
+ files as Ruby source.
+
+[fileboxes]
+ Classes are put in boxes which represents files, where these
+ classes reside. Classes shared between more than one file are
+ shown with list of files that sharing them. Silently discarded if
+ --diagram is not given Experimental.
+
+[--fmt _fmt_]
+ generate output in a particular format.
+
+[--help]
+ generate a usage summary.
+
+[--help-output]
+ explain the various output options.
+
+[--ignore-case]
+ The case of names of classes or modules or methods are ignored.
+
+[--image-formatgif/png/jpg/jpeg]
+ sets output image format for diagrams. Can be png, gif, jpeg,
+ jpg. If this option is omitted, png is used. Requires --diagram.
+
+[--includedir,...]
+ specify one or more directories to be searched when satisfying
+ :+include+: directives. Multiple --include options may be
+ given. The directory containing the file currently being processed
+ is always searched.
+
+[--inline-source]
+ By default, the source code of methods is shown in a popup. With
+ this option, it's displayed inline.
+
+[line-numbers]
+ include line numbers in the source code
+
+[--main _name_]
+ the class of module _name_ will appear on the index page. If you
+ want to set a particular file as a main page (a README, for
+ example) simply specifiy its name as the first on the command
+ line.
+
+[--merge]
+ when generating _ri_ output, if classes being processed already
+ exist in the destination directory, merge in the current details
+ rather than overwrite them.
+
+[--one-file]
+ place all the output into a single file
+
+[--op _dir_]
+ set the output directory to _dir_ (the default is the directory
+ "doc")
+
+[--op-name _name_]
+ set the name of the output. Has no effect for HTML.
+ "doc")
+
+[--opname _name_]
+ set the output name (has no effect for HTML).
+
+[--promiscuous]
+ If a module or class is defined in more than one source file, and
+ you click on a particular file's name in the top navigation pane,
+ RDoc will normally only show you the inner classes and modules of
+ that class that are defined in the particular file. Using this
+ option makes it show all classes and modules defined in the class,
+ regardless of the file they were defined in.
+
+[--quiet]
+ do not display progress messages
+
+[--ri, --ri-site, _and_ --ri-system]
+ generate output than can be read by the _ri_ command-line tool.
+ By default --ri places its output in ~/.rdoc, --ri-site in
+ $datadir/ri//site, and --ri-system in
+ $datadir/ri//system. All can be overridden with a subsequent
+ --op option. All default directories are in ri's default search
+ path.
+
+[--show-hash]
+ A name of the form #name in a comment is a possible hyperlink to
+ an instance method name. When displayed, the '#' is removed unless
+ this option is specified
+
+[--stylestylesheet url]
+ specifies the URL of an external stylesheet to use (rather than
+ generating one of our own)
+
+[tab-width _n_]
+ set the width of tab characters (default 8)
+
+[--templatename]
+ specify an alternate template to use when generating output (the
+ default is 'standard'). This template should be in a directory
+ accessible via $: as rdoc/generators/xxxx_template, where 'xxxx'
+ depends on the output formatter.
+
+[--version]
+ display RDoc's version
+
+[--webcvs _url_]
+ Specify a URL for linking to a web frontend to CVS. If the URL
+ contains a '\%s', the name of the current file will be
+ substituted; if the URL doesn't contain a '\%s', the filename will
+ be appended to it.
+
+= Example
+
+A typical small Ruby program commented using RDoc might be as follows. You
+can see the formatted result in EXAMPLE.rb and Anagram.
+
+ :include: EXAMPLE.rb
+
+= Markup
+
+Comment blocks can be written fairly naturally, either using '#' on
+successive lines of the comment, or by including the comment in
+an =begin/=end block. If you use the latter form, the =begin line
+must be flagged with an RDoc tag:
+
+ =begin rdoc
+ Documentation to
+ be processed by RDoc.
+ =end
+
+Paragraphs are lines that share the left margin. Text indented past
+this margin are formatted verbatim.
+
+1. Lists are typed as indented paragraphs with:
+ * a '*' or '-' (for bullet lists)
+ * a digit followed by a period for
+ numbered lists
+ * an upper or lower case letter followed
+ by a period for alpha lists.
+
+ For example, the input that produced the above paragraph looked like
+ 1. Lists are typed as indented
+ paragraphs with:
+ * a '*' or '-' (for bullet lists)
+ * a digit followed by a period for
+ numbered lists
+ * an upper or lower case letter followed
+ by a period for alpha lists.
+
+2. Labeled lists (sometimes called description
+ lists) are typed using square brackets for the label.
+ [cat] small domestic animal
+ [+cat+] command to copy standard input
+
+3. Labeled lists may also be produced by putting a double colon
+ after the label. This sets the result in tabular form, so the
+ descriptions all line up. This was used to create the 'author'
+ block at the bottom of this description.
+ cat:: small domestic animal
+ +cat+:: command to copy standard input
+
+ For both kinds of labeled lists, if the body text starts on the same
+ line as the label, then the start of that text determines the block
+ indent for the rest of the body. The text may also start on the line
+ following the label, indented from the start of the label. This is
+ often preferable if the label is long. Both the following are
+ valid labeled list entries:
+
+ --outputname [, name]::
+ specify the name of one or more output files. If multiple
+ files are present, the first is used as the index.
+
+ --quiet::: do not output the names, sizes, byte counts,
+ index areas, or bit ratios of units as
+ they are processed.
+
+4. Headings are entered using equals signs
+
+ = Level One Heading
+ == Level Two Heading
+ and so on
+
+5. Rules (horizontal lines) are entered using three or
+ more hyphens.
+
+6. Non-verbatim text can be marked up:
+
+ _italic_:: \_word_ or \text
+ *bold*:: \*word* or \text
+ +typewriter+:: \+word+ or \text
+
+ The first form only works around 'words', where a word is a
+ sequence of upper and lower case letters and underscores. Putting a
+ backslash before inline markup stops it being interpreted, which is
+ how I created the table above:
+
+ _italic_:: \_word_ or \text
+ *bold*:: \*word* or \text
+ +typewriter+:: \+word+ or \text
+
+7. Names of classes, source files, and any method names
+ containing an underscore or preceded by a hash
+ character are automatically hyperlinked from
+ comment text to their description.
+
+8. Hyperlinks to the web starting http:, mailto:, ftp:, or www. are
+ recognized. An HTTP url that references an external image file is
+ converted into an inline . Hyperlinks starting 'link:' are
+ assumed to refer to local files whose path is relative to the --op
+ directory.
+
+ Hyperlinks can also be of the form label[url], in which
+ case the label is used in the displayed text, and url is
+ used as the target. If label contains multiple words,
+ put it in braces: {multi word label}[url].
+
+9. Method parameter lists are extracted and displayed with
+ the method description. If a method calls +yield+, then
+ the parameters passed to yield will also be displayed:
+
+ def fred
+ ...
+ yield line, address
+
+ This will get documented as
+
+ fred() { |line, address| ... }
+
+ You can override this using a comment containing
+ ':yields: ...' immediately after the method definition
+
+ def fred # :yields: index, position
+ ...
+ yield line, address
+
+ which will get documented as
+
+ fred() { |index, position| ... }
+
+
+10. ':yields:' is an example of a documentation modifier. These appear
+ immediately after the start of the document element they are modifying.
+ Other modifiers include
+
+ [:nodoc:[all]]
+ don't include this element in the documentation. For classes
+ and modules, the methods, aliases, constants, and attributes
+ directly within the affected class or module will also be
+ omitted. By default, though, modules and classes within that
+ class of module _will_ be documented. This is turned off by
+ adding the +all+ modifier.
+
+ module SM #:nodoc:
+ class Input
+ end
+ end
+ module Markup #:nodoc: all
+ class Output
+ end
+ end
+
+ In the above code, only class SM::Input will be
+ documented.
+
+ [:doc:]
+ force a method or attribute to be documented even if it
+ wouldn't otherwise be. Useful if, for example, you want to
+ include documentation of a particular private method.
+
+ [:notnew:]
+ only applicable to the +initialize+ instance method. Normally
+ RDoc assumes that the documentation and parameters for
+ #initialize are actually for the ::new method, and so fakes
+ out a ::new for the class. THe :notnew: modifier stops
+ this. Remember that #initialize is protected, so you won't
+ see the documentation unless you use the -a command line
+ option.
+
+
+11. RDoc stops processing comments if it finds a comment
+ line containing '#--'. This can be used to
+ separate external from internal comments, or
+ to stop a comment being associated with a method,
+ class, or module. Commenting can be turned back on with
+ a line that starts '#++'.
+
+ # Extract the age and calculate the
+ # date-of-birth.
+ #--
+ # FIXME: fails if the birthday falls on
+ # February 29th
+ #++
+ # The DOB is returned as a Time object.
+
+ def get_dob(person)
+ ...
+
+12. Comment blocks can contain other directives:
+
+ [:section: title]
+ Starts a new section in the output. The title following
+ :section: is used as the section heading, and the
+ remainder of the comment containing the section is used as
+ introductory text. Subsequent methods, aliases, attributes,
+ and classes will be documented in this section. A :section:
+ comment block may have one or more lines before the :section:
+ directive. These will be removed, and any identical lines at
+ the end of the block are also removed. This allows you to add
+ visual cues such as
+
+ # ----------------------------------------
+ # :section: My Section
+ # This is the section that I wrote.
+ # See it glisten in the noon-day sun.
+ # ----------------------------------------
+
+ [call-seq:]
+ lines up to the next blank line in the comment are treated as
+ the method's calling sequence, overriding the
+ default parsing of method parameters and yield arguments.
+
+ [:include:filename]
+ include the contents of the named file at this point. The
+ file will be searched for in the directories listed by
+ the --include option, or in the current
+ directory by default. The contents of the file will be
+ shifted to have the same indentation as the ':' at the
+ start of the :include: directive.
+
+ [:title:text]
+ Sets the title for the document. Equivalent to the --title command
+ line parameter. (The command line parameter overrides any :title:
+ directive in the source).
+
+ [:enddoc:]
+ Document nothing further at the current level.
+
+ [:main:name]
+ Equivalent to the --main command line parameter.
+
+ [:stopdoc: / :startdoc:]
+ Stop and start adding new documentation elements to the
+ current container. For example, if a class has a number of
+ constants that you don't want to document, put a
+ :stopdoc: before the first, and a
+ :startdoc: after the last. If you don't specifiy a
+ :startdoc: by the end of the container, disables
+ documentation for the entire class or module.
+
+
+---
+
+See also markup/simple_markup.rb.
+
+= Other stuff
+
+Author:: Dave Thomas
+Requires:: Ruby 1.8.1 or later
+License:: Copyright (c) 2001-2003 Dave Thomas.
+ Released under the same license as Ruby.
+
+== Warranty
+
+This software is provided "as is" and without any express or
+implied warranties, including, without limitation, the implied
+warranties of merchantibility and fitness for a particular
+purpose.
diff -Nur --exclude=doc ruby-1.9.0/lib/rdoc/code_objects.rb ../rdoc-f95-20080316/code_objects.rb
--- ruby-1.9.0/lib/rdoc/code_objects.rb 1970-01-01 09:00:00.000000000 +0900
+++ ../rdoc-f95-20080316/code_objects.rb 2008-03-08 16:02:07.000000000 +0900
@@ -0,0 +1,776 @@
+# We represent the various high-level code constructs that appear
+# in Ruby programs: classes, modules, methods, and so on.
+
+require 'rdoc/tokenstream'
+
+module RDoc
+
+ ##
+ # We contain the common stuff for contexts (which are containers)
+ # and other elements (methods, attributes and so on)
+
+ class CodeObject
+
+ attr_accessor :parent
+
+ # We are the model of the code, but we know that at some point
+ # we will be worked on by viewers. By implementing the Viewable
+ # protocol, viewers can associated themselves with these objects.
+
+ attr_accessor :viewer
+
+ # are we done documenting (ie, did we come across a :enddoc:)?
+
+ attr_accessor :done_documenting
+
+ # Which section are we in
+
+ attr_accessor :section
+
+ # do we document ourselves?
+
+ attr_reader :document_self
+
+ def document_self=(val)
+ @document_self = val
+ if !val
+ remove_methods_etc
+ end
+ end
+
+ # set and cleared by :startdoc: and :enddoc:, this is used to toggle
+ # the capturing of documentation
+ def start_doc
+ @document_self = true
+ @document_children = true
+ end
+
+ def stop_doc
+ @document_self = false
+ @document_children = false
+ end
+
+ # do we document ourselves and our children
+
+ attr_reader :document_children
+
+ def document_children=(val)
+ @document_children = val
+ if !val
+ remove_classes_and_modules
+ end
+ end
+
+ # Do we _force_ documentation, even is we wouldn't normally show the entity
+ attr_accessor :force_documentation
+
+ # Default callbacks to nothing, but this is overridden for classes
+ # and modules
+ def remove_classes_and_modules
+ end
+
+ def remove_methods_etc
+ end
+
+ def initialize
+ @document_self = true
+ @document_children = true
+ @force_documentation = false
+ @done_documenting = false
+ end
+
+ # Access the code object's comment
+ attr_reader :comment
+
+ # Update the comment, but don't overwrite a real comment with an empty one
+ def comment=(comment)
+ @comment = comment unless comment.empty?
+ end
+
+ # There's a wee trick we pull. Comment blocks can have directives that
+ # override the stuff we extract during the parse. So, we have a special
+ # class method, attr_overridable, that lets code objects list
+ # those directives. Wehn a comment is assigned, we then extract
+ # out any matching directives and update our object
+
+ def self.attr_overridable(name, *aliases)
+ @overridables ||= {}
+
+ attr_accessor name
+
+ aliases.unshift name
+ aliases.each do |directive_name|
+ @overridables[directive_name.to_s] = name
+ end
+ end
+
+ end
+
+ # A Context is something that can hold modules, classes, methods,
+ # attributes, aliases, requires, and includes. Classes, modules, and
+ # files are all Contexts.
+
+ class Context < CodeObject
+ attr_reader :name, :method_list, :attributes, :aliases, :constants
+ attr_reader :requires, :includes, :in_files, :visibility
+
+ attr_reader :sections
+
+ class Section
+ attr_reader :title, :comment, :sequence
+
+ @@sequence = "SEC00000"
+
+ def initialize(title, comment)
+ @title = title
+ @@sequence.succ!
+ @sequence = @@sequence.dup
+ @comment = nil
+ set_comment(comment)
+ end
+
+ private
+
+ # Set the comment for this section from the original comment block
+ # If the first line contains :section:, strip it and use the rest. Otherwise
+ # remove lines up to the line containing :section:, and look for
+ # those lines again at the end and remove them. This lets us write
+ #
+ # # ---------------------
+ # # :SECTION: The title
+ # # The body
+ # # ---------------------
+
+ def set_comment(comment)
+ return unless comment
+
+ if comment =~ /^.*?:section:.*$/
+ start = $`
+ rest = $'
+ if start.empty?
+ @comment = rest
+ else
+ @comment = rest.sub(/#{start.chomp}\Z/, '')
+ end
+ else
+ @comment = comment
+ end
+ @comment = nil if @comment.empty?
+ end
+ end
+
+
+ def initialize
+ super()
+
+ @in_files = []
+
+ @name ||= "unknown"
+ @comment ||= ""
+ @parent = nil
+ @visibility = :public
+
+ @current_section = Section.new(nil, nil)
+ @sections = [ @current_section ]
+
+ initialize_methods_etc
+ initialize_classes_and_modules
+ end
+
+ # map the class hash to an array externally
+ def classes
+ @classes.values
+ end
+
+ # map the module hash to an array externally
+ def modules
+ @modules.values
+ end
+
+ # Change the default visibility for new methods
+ def ongoing_visibility=(vis)
+ @visibility = vis
+ end
+
+ # Given an array +methods+ of method names, set the
+ # visibility of the corresponding AnyMethod object
+
+ def set_visibility_for(methods, vis, singleton=false)
+ count = 0
+ @method_list.each do |m|
+ if methods.include?(m.name) && m.singleton == singleton
+ m.visibility = vis
+ count += 1
+ end
+ end
+
+ return if count == methods.size || singleton
+
+ # perhaps we need to look at attributes
+
+ @attributes.each do |a|
+ if methods.include?(a.name)
+ a.visibility = vis
+ count += 1
+ end
+ end
+ end
+
+ # Record the file that we happen to find it in
+ def record_location(toplevel)
+ @in_files << toplevel unless @in_files.include?(toplevel)
+ end
+
+ # Return true if at least part of this thing was defined in +file+
+ def defined_in?(file)
+ @in_files.include?(file)
+ end
+
+ def add_class(class_type, name, superclass)
+ add_class_or_module(@classes, class_type, name, superclass)
+ end
+
+ def add_module(class_type, name)
+ add_class_or_module(@modules, class_type, name, nil)
+ end
+
+ def add_method(a_method)
+ puts "Adding #@visibility method #{a_method.name} to #@name" if $DEBUG_RDOC
+ a_method.visibility = @visibility
+ add_to(@method_list, a_method)
+ end
+
+ def add_attribute(an_attribute)
+ add_to(@attributes, an_attribute)
+ end
+
+ def add_alias(an_alias)
+ meth = find_instance_method_named(an_alias.old_name)
+ if meth
+ new_meth = AnyMethod.new(an_alias.text, an_alias.new_name)
+ new_meth.is_alias_for = meth
+ new_meth.singleton = meth.singleton
+ new_meth.params = meth.params
+ new_meth.comment = "Alias for \##{meth.name}"
+ meth.add_alias(new_meth)
+ add_method(new_meth)
+ else
+ add_to(@aliases, an_alias)
+ end
+ end
+
+ def add_include(an_include)
+ add_to(@includes, an_include)
+ end
+
+ def add_constant(const)
+ add_to(@constants, const)
+ end
+
+ # Requires always get added to the top-level (file) context
+ def add_require(a_require)
+ if self.kind_of? TopLevel
+ add_to(@requires, a_require)
+ else
+ parent.add_require(a_require)
+ end
+ end
+
+ def add_class_or_module(collection, class_type, name, superclass=nil)
+ cls = collection[name]
+ if cls
+ puts "Reusing class/module #{name}" if $DEBUG_RDOC
+ else
+ cls = class_type.new(name, superclass)
+ puts "Adding class/module #{name} to #@name" if $DEBUG_RDOC
+# collection[name] = cls if @document_self && !@done_documenting
+ collection[name] = cls if !@done_documenting
+ cls.parent = self
+ cls.section = @current_section
+ end
+ cls
+ end
+
+ def add_to(array, thing)
+ array << thing if @document_self && !@done_documenting
+ thing.parent = self
+ thing.section = @current_section
+ end
+
+ # If a class's documentation is turned off after we've started
+ # collecting methods etc., we need to remove the ones
+ # we have
+
+ def remove_methods_etc
+ initialize_methods_etc
+ end
+
+ def initialize_methods_etc
+ @method_list = []
+ @attributes = []
+ @aliases = []
+ @requires = []
+ @includes = []
+ @constants = []
+ end
+
+ # and remove classes and modules when we see a :nodoc: all
+ def remove_classes_and_modules
+ initialize_classes_and_modules
+ end
+
+ def initialize_classes_and_modules
+ @classes = {}
+ @modules = {}
+ end
+
+ # Find a named module
+ def find_module_named(name)
+ return self if self.name == name
+ res = @modules[name] || @classes[name]
+ return res if res
+ find_enclosing_module_named(name)
+ end
+
+ # find a module at a higher scope
+ def find_enclosing_module_named(name)
+ parent && parent.find_module_named(name)
+ end
+
+ # Iterate over all the classes and modules in
+ # this object
+
+ def each_classmodule
+ @modules.each_value {|m| yield m}
+ @classes.each_value {|c| yield c}
+ end
+
+ def each_method
+ @method_list.each {|m| yield m}
+ end
+
+ def each_attribute
+ @attributes.each {|a| yield a}
+ end
+
+ def each_constant
+ @constants.each {|c| yield c}
+ end
+
+ # Return the toplevel that owns us
+
+ def toplevel
+ return @toplevel if defined? @toplevel
+ @toplevel = self
+ @toplevel = @toplevel.parent until TopLevel === @toplevel
+ @toplevel
+ end
+
+ # allow us to sort modules by name
+ def <=>(other)
+ name <=> other.name
+ end
+
+ # Look up the given symbol. If method is non-nil, then
+ # we assume the symbol references a module that
+ # contains that method
+ def find_symbol(symbol, method=nil)
+ result = nil
+ case symbol
+ when /^::(.*)/
+ result = toplevel.find_symbol($1)
+ when /::/
+ modules = symbol.split(/::/)
+ unless modules.empty?
+ module_name = modules.shift
+ result = find_module_named(module_name)
+ if result
+ modules.each do |name|
+ result = result.find_module_named(name)
+ break unless result
+ end
+ end
+ end
+ else
+ # if a method is specified, then we're definitely looking for
+ # a module, otherwise it could be any symbol
+ if method
+ result = find_module_named(symbol)
+ else
+ result = find_local_symbol(symbol)
+ if result.nil?
+ if symbol =~ /^[A-Z]/
+ result = parent
+ while result && result.name != symbol
+ result = result.parent
+ end
+ end
+ end
+ end
+ end
+ if result && method
+ if !result.respond_to?(:find_local_symbol)
+ p result.name
+ p method
+ fail
+ end
+ result = result.find_local_symbol(method)
+ end
+ result
+ end
+
+ def find_local_symbol(symbol)
+ res = find_method_named(symbol) ||
+ find_constant_named(symbol) ||
+ find_attribute_named(symbol) ||
+ find_module_named(symbol)
+ end
+
+ # Handle sections
+
+ def set_current_section(title, comment)
+ @current_section = Section.new(title, comment)
+ @sections << @current_section
+ end
+
+ private
+
+ # Find a named method, or return nil
+ def find_method_named(name)
+ @method_list.find {|meth| meth.name == name}
+ end
+
+ # Find a named instance method, or return nil
+ def find_instance_method_named(name)
+ @method_list.find {|meth| meth.name == name && !meth.singleton}
+ end
+
+ # Find a named constant, or return nil
+ def find_constant_named(name)
+ @constants.find {|m| m.name == name}
+ end
+
+ # Find a named attribute, or return nil
+ def find_attribute_named(name)
+ @attributes.find {|m| m.name == name}
+ end
+
+ end
+
+ ##
+ # A TopLevel context is a source file
+
+ class TopLevel < Context
+ attr_accessor :file_stat
+ attr_accessor :file_relative_name
+ attr_accessor :file_absolute_name
+ attr_accessor :diagram
+
+ @@all_classes = {}
+ @@all_modules = {}
+
+ def self.reset
+ @@all_classes = {}
+ @@all_modules = {}
+ end
+
+ def initialize(file_name)
+ super()
+ @name = "TopLevel"
+ @file_relative_name = file_name
+ @file_absolute_name = file_name
+ @file_stat = File.stat(file_name)
+ @diagram = nil
+ end
+
+ def full_name
+ nil
+ end
+
+ ##
+ # Adding a class or module to a TopLevel is special, as we only want one
+ # copy of a particular top-level class. For example, if both file A and
+ # file B implement class C, we only want one ClassModule object for C.
+ # This code arranges to share classes and modules between files.
+
+ def add_class_or_module(collection, class_type, name, superclass)
+ cls = collection[name]
+
+ if cls
+ puts "Reusing class/module #{name}" if $DEBUG_RDOC
+ else
+ if class_type == NormalModule
+ all = @@all_modules
+ else
+ all = @@all_classes
+ end
+
+ cls = all[name]
+
+ if !cls
+ cls = class_type.new(name, superclass)
+ all[name] = cls unless @done_documenting
+ end
+
+ puts "Adding class/module #{name} to #{@name}" if $DEBUG_RDOC
+
+ collection[name] = cls unless @done_documenting
+
+ cls.parent = self
+ end
+
+ cls
+ end
+
+ def self.all_classes_and_modules
+ @@all_classes.values + @@all_modules.values
+ end
+
+ def self.find_class_named(name)
+ @@all_classes.each_value do |c|
+ res = c.find_class_named(name)
+ return res if res
+ end
+ nil
+ end
+
+ def find_local_symbol(symbol)
+ find_class_or_module_named(symbol) || super
+ end
+
+ def find_class_or_module_named(symbol)
+ @@all_classes.each_value {|c| return c if c.name == symbol}
+ @@all_modules.each_value {|m| return m if m.name == symbol}
+ nil
+ end
+
+ ##
+ # Find a named module
+
+ def find_module_named(name)
+ find_class_or_module_named(name) || find_enclosing_module_named(name)
+ end
+
+ end
+
+ # ClassModule is the base class for objects representing either a
+ # class or a module.
+
+ class ClassModule < Context
+
+ attr_reader :superclass
+ attr_accessor :diagram
+
+ def initialize(name, superclass = nil)
+ @name = name
+ @diagram = nil
+ @superclass = superclass
+ @comment = ""
+ super()
+ end
+
+ # Return the fully qualified name of this class or module
+ def full_name
+ if @parent && @parent.full_name
+ @parent.full_name + "::" + @name
+ else
+ @name
+ end
+ end
+
+ def http_url(prefix)
+ path = full_name.split("::")
+ File.join(prefix, *path) + ".html"
+ end
+
+ # Return +true+ if this object represents a module
+ def is_module?
+ false
+ end
+
+ # to_s is simply for debugging
+ def to_s
+ res = self.class.name + ": " + @name
+ res << @comment.to_s
+ res << super
+ res
+ end
+
+ def find_class_named(name)
+ return self if full_name == name
+ @classes.each_value {|c| return c if c.find_class_named(name) }
+ nil
+ end
+ end
+
+ # Anonymous classes
+ class AnonClass < ClassModule
+ end
+
+ # Normal classes
+ class NormalClass < ClassModule
+ end
+
+ # Singleton classes
+ class SingleClass < ClassModule
+ end
+
+ # Module
+ class NormalModule < ClassModule
+ def is_module?
+ true
+ end
+ end
+
+ ##
+ # AnyMethod is the base class for objects representing methods
+
+ class AnyMethod < CodeObject
+ attr_accessor :name
+ attr_accessor :visibility
+ attr_accessor :block_params
+ attr_accessor :dont_rename_initialize
+ attr_accessor :singleton
+ attr_reader :text
+
+ # list of other names for this method
+ attr_reader :aliases
+
+ # method we're aliasing
+ attr_accessor :is_alias_for
+
+ attr_overridable :params, :param, :parameters, :parameter
+
+ attr_accessor :call_seq
+
+ include TokenStream
+
+ def initialize(text, name)
+ super()
+ @text = text
+ @name = name
+ @token_stream = nil
+ @visibility = :public
+ @dont_rename_initialize = false
+ @block_params = nil
+ @aliases = []
+ @is_alias_for = nil
+ @comment = ""
+ @call_seq = nil
+ end
+
+ def <=>(other)
+ @name <=> other.name
+ end
+
+ def to_s
+ res = self.class.name + ": " + @name + " (" + @text + ")\n"
+ res << @comment.to_s
+ res
+ end
+
+ def param_seq
+ p = params.gsub(/\s*\#.*/, '')
+ p = p.tr("\n", " ").squeeze(" ")
+ p = "(" + p + ")" unless p[0] == ?(
+
+ if (block = block_params)
+ # If this method has explicit block parameters, remove any
+ # explicit &block
+$stderr.puts p
+ p.sub!(/,?\s*&\w+/)
+$stderr.puts p
+
+ block.gsub!(/\s*\#.*/, '')
+ block = block.tr("\n", " ").squeeze(" ")
+ if block[0] == ?(
+ block.sub!(/^\(/, '').sub!(/\)/, '')
+ end
+ p << " {|#{block}| ...}"
+ end
+ p
+ end
+
+ def add_alias(method)
+ @aliases << method
+ end
+ end
+
+ # Represent an alias, which is an old_name/ new_name pair associated
+ # with a particular context
+ class Alias < CodeObject
+ attr_accessor :text, :old_name, :new_name, :comment
+
+ def initialize(text, old_name, new_name, comment)
+ super()
+ @text = text
+ @old_name = old_name
+ @new_name = new_name
+ self.comment = comment
+ end
+
+ def to_s
+ "alias: #{self.old_name} -> #{self.new_name}\n#{self.comment}"
+ end
+ end
+
+ # Represent a constant
+ class Constant < CodeObject
+ attr_accessor :name, :value
+
+ def initialize(name, value, comment)
+ super()
+ @name = name
+ @value = value
+ self.comment = comment
+ end
+ end
+
+ # Represent attributes
+ class Attr < CodeObject
+ attr_accessor :text, :name, :rw, :visibility
+
+ def initialize(text, name, rw, comment)
+ super()
+ @text = text
+ @name = name
+ @rw = rw
+ @visibility = :public
+ self.comment = comment
+ end
+
+ def to_s
+ "attr: #{self.name} #{self.rw}\n#{self.comment}"
+ end
+
+ def <=>(other)
+ self.name <=> other.name
+ end
+ end
+
+ # a required file
+
+ class Require < CodeObject
+ attr_accessor :name
+
+ def initialize(name, comment)
+ super()
+ @name = name.gsub(/'|"/, "") #'
+ self.comment = comment
+ end
+
+ end
+
+ # an included module
+ class Include < CodeObject
+ attr_accessor :name
+
+ def initialize(name, comment)
+ super()
+ @name = name
+ self.comment = comment
+ end
+
+ end
+
+end
diff -Nur --exclude=doc ruby-1.9.0/lib/rdoc/diagram.rb ../rdoc-f95-20080316/diagram.rb
--- ruby-1.9.0/lib/rdoc/diagram.rb 1970-01-01 09:00:00.000000000 +0900
+++ ../rdoc-f95-20080316/diagram.rb 2008-03-08 16:01:09.000000000 +0900
@@ -0,0 +1,342 @@
+# A wonderful hack by to draw package diagrams using the dot package.
+# Originally written by Jah, team Enticla.
+#
+# You must have the V1.7 or later in your path
+# http://www.research.att.com/sw/tools/graphviz/
+
+require 'rdoc/dot'
+
+module RDoc
+
+ ##
+ # Draw a set of diagrams representing the modules and classes in the
+ # system. We draw one diagram for each file, and one for each toplevel
+ # class or module. This means there will be overlap. However, it also
+ # means that you'll get better context for objects.
+ #
+ # To use, simply
+ #
+ # d = Diagram.new(info) # pass in collection of top level infos
+ # d.draw
+ #
+ # The results will be written to the +dot+ subdirectory. The process
+ # also sets the +diagram+ attribute in each object it graphs to
+ # the name of the file containing the image. This can be used
+ # by output generators to insert images.
+
+ class Diagram
+
+ FONT = "Arial"
+
+ DOT_PATH = "dot"
+
+ ##
+ # Pass in the set of top level objects. The method also creates the
+ # subdirectory to hold the images
+
+ def initialize(info, options)
+ @info = info
+ @options = options
+ @counter = 0
+ FileUtils.mkdir_p(DOT_PATH)
+ @diagram_cache = {}
+ @html_suffix = ".html"
+ if @options.mathml
+ @html_suffix = ".xhtml"
+ end
+ end
+
+ ##
+ # Draw the diagrams. We traverse the files, drawing a diagram for each. We
+ # also traverse each top-level class and module in that file drawing a
+ # diagram for these too.
+
+ def draw
+ unless @options.quiet
+ $stderr.print "Diagrams: "
+ $stderr.flush
+ end
+
+ @info.each_with_index do |i, file_count|
+ @done_modules = {}
+ @local_names = find_names(i)
+ @global_names = []
+ @global_graph = graph = DOT::Digraph.new('name' => 'TopLevel',
+ 'fontname' => FONT,
+ 'fontsize' => '8',
+ 'bgcolor' => 'lightcyan1',
+ 'compound' => 'true')
+
+ # it's a little hack %) i'm too lazy to create a separate class
+ # for default node
+ graph << DOT::Node.new('name' => 'node',
+ 'fontname' => FONT,
+ 'color' => 'black',
+ 'fontsize' => 8)
+
+ i.modules.each do |mod|
+ draw_module(mod, graph, true, i.file_relative_name)
+ end
+ add_classes(i, graph, i.file_relative_name)
+
+ i.diagram = convert_to_png("f_#{file_count}", graph)
+
+ # now go through and document each top level class and
+ # module independently
+ i.modules.each_with_index do |mod, count|
+ @done_modules = {}
+ @local_names = find_names(mod)
+ @global_names = []
+
+ @global_graph = graph = DOT::Digraph.new('name' => 'TopLevel',
+ 'fontname' => FONT,
+ 'fontsize' => '8',
+ 'bgcolor' => 'lightcyan1',
+ 'compound' => 'true')
+
+ graph << DOT::Node.new('name' => 'node',
+ 'fontname' => FONT,
+ 'color' => 'black',
+ 'fontsize' => 8)
+ draw_module(mod, graph, true)
+ mod.diagram = convert_to_png("m_#{file_count}_#{count}",
+ graph)
+ end
+ end
+ $stderr.puts unless @options.quiet
+ end
+
+ private
+
+ def find_names(mod)
+ return [mod.full_name] + mod.classes.collect{|cl| cl.full_name} +
+ mod.modules.collect{|m| find_names(m)}.flatten
+ end
+
+ def find_full_name(name, mod)
+ full_name = name.dup
+ return full_name if @local_names.include?(full_name)
+ mod_path = mod.full_name.split('::')[0..-2]
+ unless mod_path.nil?
+ until mod_path.empty?
+ full_name = mod_path.pop + '::' + full_name
+ return full_name if @local_names.include?(full_name)
+ end
+ end
+ return name
+ end
+
+ def draw_module(mod, graph, toplevel = false, file = nil)
+ return if @done_modules[mod.full_name] and not toplevel
+
+ @counter += 1
+ url = mod.http_url("classes").sub(/\.html$/, @html_suffix)
+ m = DOT::Subgraph.new('name' => "cluster_#{mod.full_name.gsub( /:/,'_' )}",
+ 'label' => mod.name,
+ 'fontname' => FONT,
+ 'color' => 'blue',
+ 'style' => 'filled',
+ 'URL' => %{"#{url}"},
+ 'fillcolor' => toplevel ? 'palegreen1' : 'palegreen3')
+
+ @done_modules[mod.full_name] = m
+ add_classes(mod, m, file)
+ graph << m
+
+ unless mod.includes.empty?
+ mod.includes.each do |inc|
+ m_full_name = find_full_name(inc.name, mod)
+ if @local_names.include?(m_full_name)
+ @global_graph << DOT::Edge.new('from' => "#{m_full_name.gsub( /:/,'_' )}",
+ 'to' => "#{mod.full_name.gsub( /:/,'_' )}",
+ 'ltail' => "cluster_#{m_full_name.gsub( /:/,'_' )}",
+ 'lhead' => "cluster_#{mod.full_name.gsub( /:/,'_' )}")
+ else
+ unless @global_names.include?(m_full_name)
+ path = m_full_name.split("::")
+ url = File.join('classes', *path) + @html_suffix
+ @global_graph << DOT::Node.new('name' => "#{m_full_name.gsub( /:/,'_' )}",
+ 'shape' => 'box',
+ 'label' => "#{m_full_name}",
+ 'URL' => %{"#{url}"})
+ @global_names << m_full_name
+ end
+ @global_graph << DOT::Edge.new('from' => "#{m_full_name.gsub( /:/,'_' )}",
+ 'to' => "#{mod.full_name.gsub( /:/,'_' )}",
+ 'lhead' => "cluster_#{mod.full_name.gsub( /:/,'_' )}")
+ end
+ end
+ end
+ end
+
+ def add_classes(container, graph, file = nil )
+
+ use_fileboxes = @options.fileboxes
+
+ files = {}
+
+ # create dummy node (needed if empty and for module includes)
+ if container.full_name
+ graph << DOT::Node.new('name' => "#{container.full_name.gsub( /:/,'_' )}",
+ 'label' => "",
+ 'width' => (container.classes.empty? and
+ container.modules.empty?) ?
+ '0.75' : '0.01',
+ 'height' => '0.01',
+ 'shape' => 'plaintext')
+ end
+
+ container.classes.each_with_index do |cl, cl_index|
+ last_file = cl.in_files[-1].file_relative_name
+
+ if use_fileboxes && !files.include?(last_file)
+ @counter += 1
+ files[last_file] =
+ DOT::Subgraph.new('name' => "cluster_#{@counter}",
+ 'label' => "#{last_file}",
+ 'fontname' => FONT,
+ 'color'=>
+ last_file == file ? 'red' : 'black')
+ end
+
+ next if cl.name == 'Object' || cl.name[0,2] == "<<"
+
+ url = cl.http_url("classes").sub(/\.html$/, @html_suffix)
+
+ label = cl.name.dup
+ if use_fileboxes && cl.in_files.length > 1
+ label << '\n[' +
+ cl.in_files.collect {|i|
+ i.file_relative_name
+ }.sort.join( '\n' ) +
+ ']'
+ end
+
+ attrs = {
+ 'name' => "#{cl.full_name.gsub( /:/, '_' )}",
+ 'fontcolor' => 'black',
+ 'style'=>'filled',
+ 'color'=>'palegoldenrod',
+ 'label' => label,
+ 'shape' => 'ellipse',
+ 'URL' => %{"#{url}"}
+ }
+
+ c = DOT::Node.new(attrs)
+
+ if use_fileboxes
+ files[last_file].push c
+ else
+ graph << c
+ end
+ end
+
+ if use_fileboxes
+ files.each_value do |val|
+ graph << val
+ end
+ end
+
+ unless container.classes.empty?
+ container.classes.each_with_index do |cl, cl_index|
+ cl.includes.each do |m|
+ m_full_name = find_full_name(m.name, cl)
+ if @local_names.include?(m_full_name)
+ @global_graph << DOT::Edge.new('from' => "#{m_full_name.gsub( /:/,'_' )}",
+ 'to' => "#{cl.full_name.gsub( /:/,'_' )}",
+ 'ltail' => "cluster_#{m_full_name.gsub( /:/,'_' )}")
+ else
+ unless @global_names.include?(m_full_name)
+ path = m_full_name.split("::")
+ url = File.join('classes', *path) + @html_suffix
+ @global_graph << DOT::Node.new('name' => "#{m_full_name.gsub( /:/,'_' )}",
+ 'shape' => 'box',
+ 'label' => "#{m_full_name}",
+ 'URL' => %{"#{url}"})
+ @global_names << m_full_name
+ end
+ @global_graph << DOT::Edge.new('from' => "#{m_full_name.gsub( /:/,'_' )}",
+ 'to' => "#{cl.full_name.gsub( /:/, '_')}")
+ end
+ end
+
+ sclass = cl.superclass
+ next if sclass.nil? || sclass == 'Object'
+ sclass_full_name = find_full_name(sclass,cl)
+ unless @local_names.include?(sclass_full_name) or @global_names.include?(sclass_full_name)
+ path = sclass_full_name.split("::")
+ url = File.join('classes', *path) + @html_suffix
+ @global_graph << DOT::Node.new('name' => "#{sclass_full_name.gsub( /:/, '_' )}",
+ 'label' => sclass_full_name,
+ 'URL' => %{"#{url}"})
+ @global_names << sclass_full_name
+ end
+ @global_graph << DOT::Edge.new('from' => "#{sclass_full_name.gsub( /:/,'_' )}",
+ 'to' => "#{cl.full_name.gsub( /:/, '_')}")
+ end
+ end
+
+ container.modules.each do |submod|
+ draw_module(submod, graph)
+ end
+
+ end
+
+ def convert_to_png(file_base, graph)
+ str = graph.to_s
+ return @diagram_cache[str] if @diagram_cache[str]
+ op_type = @options.image_format
+ dotfile = File.join(DOT_PATH, file_base)
+ src = dotfile + ".dot"
+ dot = dotfile + "." + op_type
+
+ unless @options.quiet
+ $stderr.print "."
+ $stderr.flush
+ end
+
+ File.open(src, 'w+' ) do |f|
+ f << str << "\n"
+ end
+
+ system "dot", "-T#{op_type}", src, "-o", dot
+
+ # Now construct the imagemap wrapper around
+ # that png
+
+ ret = wrap_in_image_map(src, dot)
+ @diagram_cache[str] = ret
+ return ret
+ end
+
+ ##
+ # Extract the client-side image map from dot, and use it to generate the
+ # imagemap proper. Return the whole