`DOT_INT`,`DOT_LIDENT`,`DOT_UIDENT` These tokens do not match the source position of the source code

[illusory0x0]

fn only_col(tse : (@tokens.Token,@basic.Position,@basic.Position)) -> (@tokens.Token, Int,Int)  {
  (tse.0, tse.1.cnum, tse.2.cnum)
}

test {
  let tokens = @lexer.tokens_from_string("1",comment=false)
  inspect(tokens.tokens.map(only_col), content=(
    #|[(INT("1"), 0, 1), (EOF, 1, 1)]
  ))

  let tokens = @lexer.tokens_from_string(".1",comment=false)
  // range of DOT_INT is not corepsonding to the source code
  // here ignore `.` character. 
  inspect(tokens.tokens.map(only_col), content=(
    "[(DOT_INT(1), 1, 2), (EOF, 2, 2)]"
  ))
}

[Yoorkin]

moonbitlang/parser aims to maintain parsing result consistency with the OCaml implementation. Therefore, this issue will remain marked wontfix until that behavior in the OCaml implementation changes.