let L.({lex_curr_p = {pos_lnum=l; pos_bol=b; pos_cnum=c; _}; _}) = lb in
let msg = sprintf "Syntax error around line: %d, column: %d" l (c - b) in
Error msg
let L.({lex_curr_p = {pos_lnum=l; pos_bol=b; pos_cnum=c; _}; _}) = lb in
let msg = sprintf "Syntax error around line: %d, column: %d" l (c - b) in
Error msg