`let-bind`s within `let`s are misparsed

```lean
def d : OptionM Nat := do
  let a := (← some 1)
  let b ← none
  let c := (← none) + 2  -- this let is not highlighted, the others well
  pure b
```