FSyaccで解析中の意味のあるエラー

Question

私はF＃Power Packのfsyacc/fslexを使ってソースコードを解析しています。

use inputChannel = new StreamReader(File.OpenRead tempFileName) 
let lexbuf = Lexing.LexBuffer<_>.FromTextReader inputChannel 

let ast = try 
       Parser.start Lexer.tokenize lexbuf 
       with e -> 
       let pos = lexbuf.EndPos 
       let line = pos.Line 
       let column = pos.Column 
       let message = e.Message 
       let lastToken = new System.String(lexbuf.Lexeme) 
       printf "Parse failed at line %d, column %d:\n" line column 
       printf "Last loken: %s" lastToken 
       printf "\n" 
       exit 1 

しかし、このコードは、複数行のソースファイルの解析にエラーメッセージをスローした場合、私は間違っている行と列の位置を取得しています：

Parse failed at line 0, column 10899: 

私は、次のコードを使用してエラーを検出する

エラーが発生した行番号を正しく取得するにはどうすればよいですか？字句の間に

Answer 1

、あなたはなぜそれをデバッグしないで手動で

... 
let newline = ('\n' | '\r' '\n') 

rule tokenize = parse 
| newline { lexbuf.EndPos <- lexbuf.EndPos.NextLine; tokenize lexbuf } 
...