    let unoffset (Offset i) = i
    pure $ T.unlines $
      ls & _last %~ T.take (fromIntegral $ unoffset $ p_col end)
         & _head %~ T.drop (fromIntegral $ unoffset $ p_col start)

positionToVim :: Pos' Int64 -> (Int64, Int64)
positionToVim p =
  ( fromIntegral $ getVimLineNumber $ p_line p
  , fromIntegral $ p_col p
  )

reportError :: Text -> Neovim env ()