[ruby-list:33554] Re: racc fails on alpha-freebsd

あおきです。

  In mail "[ruby-list:33551] Re: racc fails on alpha-freebsd"
    IKEGAMI Daisuke <[e-mail]> wrote:

> いけがみです。
> 
> DEC AlphaStation Digital UNIX では落ちずに終了しました。

どうもありがとうございます。Alpha でも落ちないこともあるんですね。
とすると cc の最適化とか、libc ヘッダの違いでしょうか。


で、すみません、さらにもうひとつお願いなんですが、すんごくバカな
見落としをしていたことに気付いたので、FreeBSD/NetBSD on Alpha を
持ってらっしゃるかたどなたか、添付のスクリプトを実行してみていた
だけませんか。なにごともなく ok と出たらぼくの見込み違い、SEGV
したら ruby のバグ発見です。
-------------------------------------------------------------------
青木峰郎

def dotest( entries )
  map = '-' * 10240
  entries.each do |exp, items|
    head = map.index(exp)
    items.each_with_index do |item, offset|
      map[ head + offset ] = ?o if item
    end
  end
end

dotest([
  [/-{6}.{3}-{2}/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10, 88]],
  [/-{5}.{5}-/, [12, 16, 18, 20, 41, nil, nil, nil, nil, nil, 59]],
  [/-{6}.{3}-/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10]],
  [/-{6}.{3}-/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10]],
  [/-{6}.{3}-/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10]],
  [/-{6}.{3}-/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10]],
  [/-{6}.{3}-/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10]],
  [/-{10}/, [12, 16, 18, 20, 26, 30, 34, 3, 6, 10]],
  [/-{4}.-.{3}-/, [12, 16, 18, 20, nil, 47, nil, nil, nil, 10]],
  [/-{6}.{3}-/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10]],
  [/-{6}.{3}-/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10]],
  [/-{4}.-.{3}-/, [12, 16, 18, 20, nil, 47, nil, nil, nil, 10]],
  [/-{6}.{3}-/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10]],
  [/-{10}/, [12, 16, 18, 20, 26, 30, 34, 3, 6, 10]],
  [/-{6}.{3}-/, [12, 16, 18, 20, 26, 69, nil, nil, nil, 10]],
  [/-{2}.{3}-{2}/, [64, 65, nil, nil, nil, 62, 63]],
  [/-{2}.{3}-{2}/, [64, 65, nil, nil, nil, 62, 87]],
  [/-.{4}-/, [26, nil, nil, nil, nil, 76]],
  [/-{2}.{3}-/, [64, 65, nil, nil, nil, 62]],
  [/-{5}/, [12, 16, 18, 20, 41]],
  [/-{4}/, [12, 16, 18, 20]],
  [/-/, [80]],
  [/-/, [53]],
  [/-/, [52]],
  [/-/, [75]],
  [/-/, [52]],
  [/-/, [52]],
  [/-/, [79]],
  [/-/, [72]],
  [/-/, [81]],
  [/-/, [43]],
  [/-/, [82]],
  [/-/, [41]],
  [/-/, [26]],
  [/-/, [43]],
  [/-/, [26]],
  [/-/, [43]],
  [/-/, [12]],
  [/-/, [16]],
  [/-/, [20]],
  [/-/, [18]]
])

dotest([
  [/-.{28}-.{22}-/, [40, nil, nil, nil, nil, nil, nil, nil, nil,
   nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
   nil, nil, nil, nil, nil, nil, nil, 60, nil, nil, nil, nil, nil,
   nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
   nil, nil, nil, nil, 83]],
  [/-.{22}-.{26}-/, [31, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, 31, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, nil, 77]],
  [/-.{33}-/, [36, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 36]],
  [/-.-{2}.{27}-{2}/, [67, nil, 73, 74, nil, nil, nil, nil, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, nil, 85, 86]],
  [/-.{16}-.{5}-.{4}-/, [35, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, 48, nil, nil, nil, nil,
  nil, 35, nil, nil, nil, nil, 48]],
  [/-.{16}-.{5}-.{4}-/, [4, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, 45, nil, nil, nil, nil,
  nil, 4, nil, nil, nil, nil, 45]],
  [/-.{22}-/, [27, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 56]],
  [/-.{5}-{2}.{10}-{2}/, [84, nil, nil, nil, nil, nil, 84, 84, nil,
  nil, nil, nil, nil, nil, nil, nil, nil, nil, 84, 84]],
  [/-.{10}-/, [46, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil,
  57]],
  [/-.{3}-/, [42, nil, nil, nil, 44]],
  [/-.-/, [49, nil, 54]],
  [/-/, [39]],
  [/-/, [38]],
  [/-/, [55]],
  [/-/, [58]],
  [/-/, [61]],
  [/-/, [37]],
  [/-/, [19]],
  [/-/, [23]],
  [/-/, [78]]
])

puts 'ok'