bitclust-core 1.7.0 → 1.8.0

data/test/test_epub_generator.rb

@@ -0,0 +1,330 @@
+# frozen_string_literal: true
+require 'test/unit'
+require 'tmpdir'
+require 'fileutils'
+require 'rexml/document'
+require 'bitclust'
+require 'bitclust/generators/epub'
+require 'bitclust/screen'
+require 'bitclust/subcommands/statichtml_command'
+
+# contents.opf のマニフェストは、statichtml が OEBPS 以下に生成する
+# class/method/library/doc/function ページと css/image リソースを
+# すべて（ユニークな id で）列挙しなければならない（EPUB の仕様上必須）。
+class TestEpubGeneratorContentsOpf < Test::Unit::TestCase
+  def build_epub_generator
+    datadir = File.expand_path('../data/bitclust', __dir__)
+    BitClust::Generators::EPUB.new(:templatedir => Pathname.new("#{datadir}/template.epub"))
+  end
+
+  def setup
+    @dir = Dir.mktmpdir
+    @epub_directory = Pathname.new(@dir)
+    @oebps = @epub_directory + "OEBPS"
+    FileUtils.mkdir_p(@oebps + "class")
+    FileUtils.mkdir_p(@oebps + "method/-array/i")
+    FileUtils.mkdir_p(@oebps + "doc")
+    FileUtils.mkdir_p(@oebps + "library")
+    FileUtils.mkdir_p(@oebps + "function")
+    FileUtils.mkdir_p(@oebps + "images")
+
+    File.write(@oebps + "class/-array.xhtml", "<html/>")
+    File.write(@oebps + "class/index.xhtml", "<html/>") # クラス一覧ページ
+    File.write(@oebps + "method/-array/i/each.xhtml", "<html/>")
+    File.write(@oebps + "doc/index.xhtml", "<html/>") # マニュアルのトップページ
+    File.write(@oebps + "doc/help.xhtml", "<html/>")
+    File.write(@oebps + "library/index.xhtml", "<html/>")
+    File.write(@oebps + "library/json.xhtml", "<html/>")
+    File.write(@oebps + "function/index.xhtml", "<html/>")
+    File.write(@oebps + "function/rb_ary_new.xhtml", "<html/>")
+    File.write(@oebps + "style.css", "body{}")
+    File.write(@oebps + "images/rurema.png", "\x89PNG\r\n")
+    File.write(@epub_directory + "nav.xhtml", "<html/>")
+
+    @generator = build_epub_generator
+    @generator.send(:generate_contents_opf, @epub_directory)
+    @opf_path = @epub_directory + "contents.opf"
+    @xml = File.read(@opf_path)
+    @doc = REXML::Document.new(@xml)
+  end
+
+  def teardown
+    FileUtils.rm_rf(@dir)
+  end
+
+  def items
+    REXML::XPath.match(@doc, "//manifest/item")
+  end
+
+  def test_contents_opf_is_well_formed_xml
+    assert_nothing_raised { REXML::Document.new(@xml) }
+  end
+
+  def test_manifest_lists_every_xhtml_page_under_oebps
+    hrefs = items.map {|item| item.attributes['href'] }
+    %w[
+      OEBPS/class/-array.xhtml
+      OEBPS/class/index.xhtml
+      OEBPS/method/-array/i/each.xhtml
+      OEBPS/doc/index.xhtml
+      OEBPS/doc/help.xhtml
+      OEBPS/library/index.xhtml
+      OEBPS/library/json.xhtml
+      OEBPS/function/index.xhtml
+      OEBPS/function/rb_ary_new.xhtml
+      nav.xhtml
+    ].each do |href|
+      assert_include(hrefs, href)
+    end
+  end
+
+  def test_manifest_lists_non_xhtml_resources_that_exist
+    hrefs = items.map {|item| item.attributes['href'] }
+    assert_include(hrefs, "OEBPS/style.css")
+    assert_include(hrefs, "OEBPS/images/rurema.png")
+    style_item = items.find {|item| item.attributes['href'] == "OEBPS/style.css" }
+    assert_equal("text/css", style_item.attributes['media-type'])
+    image_item = items.find {|item| item.attributes['href'] == "OEBPS/images/rurema.png" }
+    assert_equal("image/png", image_item.attributes['media-type'])
+  end
+
+  def test_manifest_item_ids_are_unique
+    ids = items.map {|item| item.attributes['id'] }
+    assert_equal(ids.size, ids.uniq.size, "duplicate manifest item ids: #{ids}")
+  end
+
+  def test_manifest_item_ids_are_valid_xml_ncnames
+    ids = items.map {|item| item.attributes['id'] }
+    assert_false(ids.empty?)
+    ids.each do |id|
+      assert_match(/\A[A-Za-z_][A-Za-z0-9_.-]*\z/, id, "not a valid NCName: #{id.inspect}")
+    end
+  end
+
+  # doc/index.xhtml はマニフェスト中に決め打ちの id="index" として
+  # 一度だけ登場し、doc 以下を走査する側から重複登録されない。
+  def test_doc_index_is_listed_exactly_once_with_the_index_id
+    index_items = items.select {|item| item.attributes['href'] == "OEBPS/doc/index.xhtml" }
+    assert_equal(1, index_items.size)
+    assert_equal("index", index_items.first.attributes['id'])
+  end
+
+  def test_manifest_references_xhtml_not_html_for_the_index
+    hrefs = items.map {|item| item.attributes['href'] }
+    assert_not_include(hrefs, "OEBPS/doc/index.html")
+  end
+
+  # 目次ページ (nav) ・マニュアルのトップページ・クラスページだけが
+  # spine（読み進める順序）に載る。約 11,700 あるメソッドページなどを
+  # spine に加えると読書順序が壊れるので、マニフェストには載るが spine
+  # には載らない。
+  def test_spine_still_excludes_method_library_doc_and_function_pages
+    spine_idrefs = REXML::XPath.match(@doc, "//spine/itemref").map {|el| el.attributes['idref'] }
+    assert_equal(%w[toc index], spine_idrefs.first(2))
+
+    class_item_ids = items.select {|item| item.attributes['href'].to_s.start_with?('OEBPS/class/') }
+                          .map {|item| item.attributes['id'] }
+    assert_equal(%w[toc index] + class_item_ids, spine_idrefs)
+
+    other_ids = items.map {|item| item.attributes['id'] } - %w[toc index] - class_item_ids
+    assert_false(other_ids.empty?)
+    other_ids.each do |id|
+      assert_not_include(spine_idrefs, id)
+    end
+  end
+end
+
+# EPUB のパッケージ（contents.opf）に載る前に、statichtml が出力ルートへ
+# 書く 2 行のリダイレクトスタブ（<meta http-equiv=refresh> + <a>、
+# ルート要素を持たず XML として整形式でない）を消す。
+class TestEpubGeneratorIndexStub < Test::Unit::TestCase
+  def build_epub_generator
+    datadir = File.expand_path('../data/bitclust', __dir__)
+    BitClust::Generators::EPUB.new(:templatedir => Pathname.new("#{datadir}/template.epub"))
+  end
+
+  def setup
+    @dir = Dir.mktmpdir
+    @contents_directory = Pathname.new(@dir) + "OEBPS"
+    FileUtils.mkdir_p(@contents_directory)
+    @generator = build_epub_generator
+  end
+
+  def teardown
+    FileUtils.rm_rf(@dir)
+  end
+
+  def test_removes_the_redirect_stub_statichtml_writes_at_the_root
+    stub_path = @contents_directory + "index.xhtml"
+    File.write(stub_path, "<meta http-equiv=\"refresh\" content=\"0; URL=doc/index.xhtml\">\n<a href=\"doc/index.xhtml\">Go</a>\n")
+    assert_raise(REXML::ParseException) { REXML::Document.new(File.read(stub_path)) }
+
+    @generator.send(:remove_index_stub, @contents_directory)
+
+    assert_false(stub_path.exist?)
+  end
+
+  def test_is_a_noop_when_the_stub_is_absent
+    stub_path = @contents_directory + "index.xhtml"
+    assert_nothing_raised { @generator.send(:remove_index_stub, @contents_directory) }
+    assert_false(stub_path.exist?)
+  end
+
+  # doc/index.xhtml (マニュアルのトップページ) と紛れないことを確認する
+  def test_does_not_touch_the_doc_index_page
+    doc_dir = @contents_directory + "doc"
+    FileUtils.mkdir_p(doc_dir)
+    doc_index = doc_dir + "index.xhtml"
+    File.write(doc_index, "<html/>")
+    @generator.send(:remove_index_stub, @contents_directory)
+    assert_true(doc_index.exist?)
+  end
+end
+
+# data/bitclust/template.epub が整形式 XHTML を出力すること（layout の
+# <meta>/<link> の自己終了、class のインデックス一覧での "<=>" や "&" を
+# 含むメソッド名のエスケープ）を検証する。
+#
+# Screen#run_template は ERB 化したテンプレート本体をレシーバの
+# self.class（ClassScreen / MethodScreen そのもの）に「respond_to? なら
+# コンパイルしない」というガード付きでキャッシュする。同一プロセス内で
+# template.offline 用の別テスト（例: test_class_screen.rb）が先に走ると、
+# そちらのコンパイル結果を再利用してしまい、このテストが実際には
+# template.epub を検証できなくなる（test_method_screen.rb に既知の注記
+# あり）。
+#
+# 専用のサブクラスに分けるだけでは防げない: respond_to? は継承した
+# メソッドにも true を返すので、スーパークラス（本物の ClassScreen /
+# MethodScreen）側で他のテストが先に class_template 等をコンパイル済みだと、
+# このサブクラスの run_template はガードに阻まれて自分の
+# @template_repository（= template.epub）で再コンパイルしない。
+# そこで、最初の render より前に明示的に def_method して
+# class_template / method_template / layout をこのサブクラス自身に
+# 直接定義しておく。直接定義されたメソッドは継承したものより優先されるので、
+# 他のテストの実行順序に関係なく template.epub の内容を使わせられる。
+class EpubTestClassScreen < BitClust::ClassScreen; end
+class EpubTestMethodScreen < BitClust::MethodScreen; end
+class EpubTestClassIndexScreen < BitClust::ClassIndexScreen; end
+
+epub_template_repository = BitClust::TemplateRepository.new(
+  "#{File.expand_path('../data/bitclust', __dir__)}/template.epub"
+)
+[
+  [EpubTestClassScreen, 'class', 'class_template'],
+  [EpubTestMethodScreen, 'method', 'method_template'],
+  [EpubTestClassIndexScreen, 'class-index', 'class_index_template'],
+].each do |klass, id, method_name|
+  ERB.new(epub_template_repository.load(id)).def_method(klass, method_name, "#{id}.erb")
+end
+[EpubTestClassScreen, EpubTestMethodScreen, EpubTestClassIndexScreen].each do |klass|
+  ERB.new(epub_template_repository.load('layout')).def_method(klass, 'layout', 'layout.erb')
+end
+
+class TestEpubTemplateWellFormedness < Test::Unit::TestCase
+  SRC = <<'HERE'
+= module Helper
+比較演算子を提供するヘルパーモジュール
+= class Spaceship < Object
+extend Helper
+比較演算子とビット演算子を持つサンプルクラス
+== Instance Methods
+--- <=>(other) -> Integer
+
+比較する。
+
+--- &(other) -> Spaceship
+
+論理積を返す。
+HERE
+
+  def setup
+    datadir = File.expand_path('../data/bitclust', __dir__)
+    @lib, @db = BitClust::RRDParser.parse(SRC, 'testlib', { 'version' => '3.4' })
+    urlmapper = BitClust::Subcommands::StatichtmlCommand::URLMapperEx.new(
+      :suffix => '.xhtml',
+      :css_url => 'style.css',
+      :favicon_url => 'rurema.png'
+    )
+    urlmapper.bitclust_html_base = '..'
+    @manager = BitClust::ScreenManager.new(
+      :templatedir => "#{datadir}/template.epub",
+      :catalogdir => "#{datadir}/catalog",
+      :encoding => 'utf-8',
+      :default_encoding => 'utf-8',
+      :urlmapper => urlmapper,
+      :target_version => '3.4'
+    )
+  end
+
+  def class_entry
+    @lib.fetch_class('Spaceship')
+  end
+
+  def method_entry(name)
+    class_entry.fetch_method(BitClust::MethodSpec.parse("Spaceship##{name}"))
+  end
+
+  def render_class_page
+    @manager.send(:new_screen, EpubTestClassScreen, class_entry, :database => @db).body
+  end
+
+  def render_method_page(name)
+    @manager.send(:new_screen, EpubTestMethodScreen, [method_entry(name)], :database => @db).body
+  end
+
+  def render_class_index_page
+    @manager.send(:new_screen, EpubTestClassIndexScreen, [class_entry], :database => @db).body
+  end
+
+  def test_class_page_escapes_spaceship_operator_in_the_index_list
+    html = render_class_page
+    assert_include(html, '&lt;=&gt;')
+  end
+
+  def test_class_page_escapes_ampersand_operator_in_the_index_list
+    html = render_class_page
+    # "&" 単体がエスケープされて "&amp;" として出る（リンクテキストの終端）
+    assert_match(/&amp;<\/a>/, html)
+  end
+
+  def test_class_page_is_well_formed_xml
+    html = render_class_page
+    assert_nothing_raised { REXML::Document.new(html) }
+  end
+
+  def test_method_page_for_spaceship_operator_is_well_formed_xml
+    html = render_method_page('<=>')
+    assert_nothing_raised { REXML::Document.new(html) }
+  end
+
+  def test_method_page_for_ampersand_operator_is_well_formed_xml
+    html = render_method_page('&')
+    assert_nothing_raised { REXML::Document.new(html) }
+  end
+
+  def test_layout_void_elements_are_self_closing
+    html = render_class_page
+    assert_not_match(%r{<meta[^>]*[^/]>}, html)
+    assert_not_match(%r{<link[^>]*[^/]>}, html)
+  end
+
+  # template.epub/class の "extend:" 行も <br>（非自己終了）を出しており、
+  # そのクラスページ全体が整形式 XML にならなかった（実データベースの
+  # Array・CSV クラスで再現した。どちらも extend/aliases 行を持つ）。
+  def test_class_page_extend_line_uses_a_self_closing_br
+    html = render_class_page
+    assert_include(html, 'extend: ')
+    assert_not_match(%r{<br[^>]*[^/]>}, html)
+    assert_nothing_raised { REXML::Document.new(html) }
+  end
+
+  # template.epub/class-index には対応する <ul> の無い孤立した </ul> が
+  # あり、実データベースで OEBPS/class/index.xhtml が整形式にならなかった
+  # （template.offline/class-index にも同じ孤立タグがあるが、HTML5 として
+  # 読まれる分には実害がないため未修正のまま。EPUB の XHTML では致命的）。
+  def test_class_index_page_has_no_orphaned_closing_tag
+    html = render_class_index_page
+    assert_not_include(html, '</ul>')
+    assert_nothing_raised { REXML::Document.new(html) }
+  end
+end

data/test/test_extract_command.rb

@@ -0,0 +1,45 @@
+require 'test/unit'
+require 'stringio'
+require 'tmpdir'
+require 'bitclust'
+require 'bitclust/subcommands/extract_command'
+require 'bitclust/subcommands/htmlfile_command'
+
+class TestRdOnlyCommandsRejectMarkdown < Test::Unit::TestCase
+  def with_md_file
+    Dir.mktmpdir do |dir|
+      path = File.join(dir, 'Array.md')
+      File.write(path, "---\nlibrary: _builtin\n---\n# class Array < Object\n")
+      yield path
+    end
+  end
+
+  def capture_stderr
+    err = StringIO.new
+    orig, $stderr = $stderr, err
+    yield
+    err.string
+  ensure
+    $stderr = orig
+  end
+
+  def test_extract_explains_markdown_is_unsupported
+    with_md_file do |path|
+      cmd = BitClust::Subcommands::ExtractCommand.new
+      cmd.parse([path])
+      msg = capture_stderr { assert_raise(SystemExit) { cmd.exec([path], {:prefix => nil, :capi => false}) } }
+      assert_match(/Markdown/, msg)
+      assert_match(/refm/, msg)
+    end
+  end
+
+  def test_htmlfile_explains_markdown_is_unsupported
+    with_md_file do |path|
+      cmd = BitClust::Subcommands::HtmlfileCommand.new
+      cmd.parse([path])
+      msg = capture_stderr { assert_raise(SystemExit) { cmd.exec([path], {:prefix => nil, :capi => false}) } }
+      assert_match(/Markdown/, msg)
+      assert_match(/rake generate|bitclust server/, msg)
+    end
+  end
+end

data/test/test_irb_plugin.rb

@@ -3,11 +3,14 @@ require 'test/unit'
 require 'tmpdir'
 require 'fileutils'
 require 'stringio'
+require 'json'
 require 'bitclust'
 require 'bitclust/methoddatabase'
 require 'bitclust/searcher'
+require 'bitclust/irb'
 
-# bitclust-irb gem の irb コマンド(refe)。
+# bitclust-irb gem の irb コマンド(refe)。リモート検索そのものは
+# test_remote.rb で検証する。
 #
 # テストリスト:
 # [x] TerminalView が io: に出力する(既定は従来どおり $stdout)
@@ -16,6 +19,11 @@ require 'bitclust/searcher'
 # [x] 空のパターンは使い方を表示して例外にしない
 # [x] 見つからないパターンはメッセージを io へ書いて例外にしない
 # [x] require で IRB::Command::Base のサブクラスとして登録される
+# [x] Searcher#local_database? は既定の場所に DB が無ければ false・あれば true
+# [x] Irb.lookup: db が与えられていれば remote を使わない
+# [x] Irb.lookup: ローカル DB が無ければ remote で検索する
+# [x] Irb.lookup: remote が nil なら bitclust setup を案内する
+# [x] refe の CLI(Searcher#exec)も DB が無ければ remote で検索する
 class TestBitClustIrbPlugin < Test::Unit::TestCase
   FOO_MD = <<~'MD'
     ---
@@ -32,6 +40,16 @@ class TestBitClustIrbPlugin < Test::Unit::TestCase
     bar の説明。
   MD
 
+  BASE_URL = 'https://docs.ruby-lang.org/ja/latest/'
+  INDEX_JS = "var search_data = #{JSON.generate(index: [
+    { name: 'String', full_name: 'String', type: 'class', path: 'class/String.html' },
+    { name: 'gsub', full_name: 'String#gsub', type: 'instance_method', path: 'method/String/i/gsub.html' },
+  ])};\n"
+  PAGES = {
+    'js/search_data.js' => INDEX_JS,
+    'method/String/i/gsub.md' => "# String#gsub\n\n置き換えます。\n",
+  }.freeze
+
   def build_markdown_db(dir)
     api = File.join(dir, 'manual', 'api')
     FileUtils.mkdir_p(File.join(api, 'foo'))
@@ -56,15 +74,44 @@ class TestBitClustIrbPlugin < Test::Unit::TestCase
     end
   end
 
+  # 既定の DB 探索(環境変数・設定ファイル)がどれも当たらない状態
+  DB_ENV_KEYS = %w[REFE2_SERVER BITCLUST_SERVER REFE2_DATADIR BITCLUST_DATADIR
+                   HOME XDG_CONFIG_HOME XDG_DATA_HOME XDG_CACHE_HOME].freeze
+
+  def without_local_db
+    saved = DB_ENV_KEYS.to_h {|k| [k, ENV[k]] }
+    Dir.mktmpdir do |home|
+      DB_ENV_KEYS.each {|k| ENV.delete(k) }
+      ENV['HOME'] = home
+      yield home
+    end
+  ensure
+    saved.each {|k, v| v ? ENV[k] = v : ENV.delete(k) }
+  end
+
+  def fake_remote(dir, pages = PAGES)
+    fetcher = lambda do |uri, _headers|
+      rel = uri.to_s.delete_prefix(BASE_URL)
+      pages.key?(rel) ? [200, pages[rel].dup] : [404, '']
+    end
+    BitClust::Remote.new(base_url: BASE_URL, fetcher: fetcher, cache_dir: File.join(dir, 'cache'))
+  end
+
+  def never_remote(dir)
+    BitClust::Remote.new(base_url: BASE_URL, cache_dir: File.join(dir, 'cache'),
+                         fetcher: ->(_uri, _headers) { flunk 'remote must not be used' })
+  end
+
   def test_terminal_view_writes_to_given_io
     out = StringIO.new
     view = BitClust::TerminalView.new(BitClust::Plain.new, {}, io: out)
     view.send(:puts, 'hello')
     assert_equal("hello\n", out.string)
+    assert_same(out, view.io)
+    assert_same($stdout, BitClust::TerminalView.new(BitClust::Plain.new, {}).io)
   end
 
   def test_lookup_method
-    require 'bitclust/irb'
     with_db do |db|
       out = StringIO.new
       BitClust::Irb.lookup('Foo#bar', db: db, io: out)
@@ -74,7 +121,6 @@ class TestBitClustIrbPlugin < Test::Unit::TestCase
   end
 
   def test_lookup_class
-    require 'bitclust/irb'
     with_db do |db|
       out = StringIO.new
       BitClust::Irb.lookup('Foo', db: db, io: out)
@@ -84,7 +130,6 @@ class TestBitClustIrbPlugin < Test::Unit::TestCase
   end
 
   def test_lookup_empty_pattern_shows_usage
-    require 'bitclust/irb'
     with_db do |db|
       out = StringIO.new
       assert_nothing_raised do
@@ -95,7 +140,6 @@ class TestBitClustIrbPlugin < Test::Unit::TestCase
   end
 
   def test_lookup_not_found_reports_instead_of_raising
-    require 'bitclust/irb'
     with_db do |db|
       out = StringIO.new
       assert_nothing_raised do
@@ -111,8 +155,58 @@ class TestBitClustIrbPlugin < Test::Unit::TestCase
     rescue LoadError
       omit 'irb >= 1.13 is not available'
     end
-    require 'bitclust/irb'
     assert(BitClust::Irb::RefeCommand < ::IRB::Command::Base)
     assert_match(/るりま|リファレンス/, BitClust::Irb::RefeCommand.description)
   end
+
+  def test_searcher_local_database_p
+    without_local_db do
+      assert_false(BitClust::Searcher.new.local_database?)
+      with_db do |db|
+        ENV['BITCLUST_DATADIR'] = db.instance_variable_get(:@prefix)
+        assert_true(BitClust::Searcher.new.local_database?)
+      end
+    end
+  end
+
+  def test_lookup_uses_local_db_when_given
+    with_db do |db|
+      Dir.mktmpdir do |dir|
+        out = StringIO.new
+        BitClust::Irb.lookup('Foo#bar', db: db, io: out, remote: never_remote(dir))
+        assert_match(/bar の説明。/, out.string)
+      end
+    end
+  end
+
+  def test_lookup_falls_back_to_remote_without_local_db
+    without_local_db do |home|
+      out = StringIO.new
+      BitClust::Irb.lookup('String#gsub', io: out, remote: fake_remote(home))
+      assert_match(/置き換えます。/, out.string)
+      assert_match(%r{method/String/i/gsub\.html}, out.string)
+    end
+  end
+
+  def test_lookup_without_remote_and_local_db_shows_setup_hint
+    without_local_db do
+      out = StringIO.new
+      assert_nothing_raised do
+        BitClust::Irb.lookup('String#gsub', io: out, remote: nil)
+      end
+      assert_match(/bitclust setup/, out.string)
+    end
+  end
+
+  def test_refe_cli_falls_back_to_remote_without_local_db
+    without_local_db do |home|
+      out = StringIO.new
+      searcher = BitClust::Searcher.new
+      searcher.remote = fake_remote(home)
+      searcher.parse(%w[String#gsub])
+      view = BitClust::TerminalView.new(BitClust::Plain.new, {}, io: out)
+      searcher.run_query(nil, %w[String#gsub], view)
+      assert_match(/置き換えます。/, out.string)
+    end
+  end
 end

data/test/test_markdown_bridge.rb

@@ -91,6 +91,41 @@ class TestMarkdownBridge < Test::Unit::TestCase
       out["thread.rd"]
   end
 
+  def test_membership_version_and_else_wrap_include_sites
+    # bitclust#331: #@version V は #@if (version == "V")、その #@else は
+    # #@if (version != "V") で再具現化する。範囲の #@else は 2 つの
+    # membership（A 未満 / B 以上）になるので include サイトも 2 つ
+    out = build_from(
+      "builtin.md" => "---\ntype: library\n---\nbuiltin 概要。\n",
+      "onlylib.md" => "---\ntype: library\n---\nonlylib 概要。\n",
+      "range.md" => "---\ntype: library\n---\nrange 概要。\n",
+      "onlylib/Shared.md" =>
+        "---\n" \
+        "library:\n" \
+        "\#@version 3.2\n" \
+        "  - onlylib\n" \
+        "\#@else\n" \
+        "  - builtin\n" \
+        "\#@end\n" \
+        "\#@version 3.1...3.3\n" \
+        "  - range\n" \
+        "\#@else\n" \
+        "  - range\n" \
+        "\#@end\n" \
+        "---\n" \
+        "# class Shared < Object\nS。\n"
+    )
+    assert_equal "onlylib 概要。\n\n\#@if (version == \"3.2\")\n\#@include(onlylib/Shared)\n\#@end\n",
+      out["onlylib.rd"]
+    assert_equal "builtin 概要。\n\n\#@if (version != \"3.2\")\n\#@include(onlylib/Shared)\n\#@end\n",
+      out["builtin.rd"]
+    assert_equal "range 概要。\n\n" \
+      "\#@until 3.3\n\#@since 3.1\n\#@include(onlylib/Shared)\n\#@end\n\#@end\n" \
+      "\#@until 3.1\n\#@include(onlylib/Shared)\n\#@end\n" \
+      "\#@since 3.3\n\#@include(onlylib/Shared)\n\#@end\n",
+      out["range.rd"]
+  end
+
   def test_libraries_manifest
     out = build
     assert_equal "bar/baz\ndual\nfoo\n\#@until 3.1\ngated\n\#@end\nsub/sub\n", out["LIBRARIES"]