これもまた簡単に実装できた。 入出力関係は素直に書こうとするとやっぱり手続き型言語みたいになっちゃうのかな。 let version = "0.1" let display_linenum = ref false let filenames = ref [] let spec = [("-n", Arg.Set display_linenum, "Display lin…