S式ストリームパーサ版を作ろうと思って書いてたら id:mzp が書いてしまったので方向転換． 逆ポーランド計算機 #load "camlp4o.cma" type token = Op of string | Num of int let lexer = Genlex.make_lexer ["+"; "-"; "*"; "/"]let rec parse = parser | […