個人的に Ruby 10 周年

ハードディスクをさがしてみたらこんなファイルが

$ ls -l fact.rb
-rw-r--r--  1 ksmakoto  ksmakoto  172 Dec 16  1999 fact.rb

中身

def fact n
  fact_sub n, proc {|x| x}
end

def fact_sub n, k
  if n <= 1
    k.call 1
  else
    fact_sub n - 1, proc {|x| k.call n * x}
  end
end

print fact 6
print "\n"