Data.Text.Internal.Fusion.Common.index: Index too large

[fendor]

Your environment

Which OS do you use: Ubuntu
Which LSP client (editor/plugin) do you use: VSCode
Describe your project (alternative: link to the project):
bios project with custom hie.yaml. I do not believe the project itself is important, but it does use TH.

Noticeably, this HLS version is installed via nix, is based on the hackage release 1.5.1, and applies the patch #2359.

Steps to reproduce

Open HLS and perform some arbitrary editing of files.

Expected behaviour

HLS should be happy and report diagnostics.

Actual behaviour

Stops responding and shows no diagnostics any more. Logs contain:

haskell-language-server: Data.Text.Internal.Fusion.Common.index: Index too large
CallStack (from HasCallStack):
  error, called at libraries/text/src/Data/Text/Internal/Fusion/Common.hs:943:24 in text-1.2.4.1:Data.Text.Internal.Fusion.Common

Include debug information

Since HLS has been installed via nix, I am not sure at the moment, whether an outdated dependency might cause the issue.
The error was thrown while all non-essential plugins were disabled via the VSCode settings.

[jneira]

I've just seen this issue: #2149 which is reporting the same error 😟

[fendor]

Ah, I knew I've seen this before! Unfortunately, no solution yet.
Going to run with profiling mode to get a proper stack-trace.

[fendor]

According to #2149, the first commit with this issue is: 9c40dcf

[drsooch]

Just ran into this. Can't tell when the error fired (wasn't paying attention). I've been working on TypeLenses.hs from ghcide/src/development/ide/plugin/. On Emacs with all plugins enabled (plus a WIP plugin).

[Bodigrim]

haskell-language-server/ghcide/src/Development/IDE/Plugin/Completions/Logic.hs

Lines 733 to 736 in ffd0f34

	openingBacktick :: T.Text -> T.Text -> T.Text -> Position -> Bool
	openingBacktick line prefixModule prefixText Position { _character=(fromIntegral -> c) }
	| backtickIndex < 0 || backtickIndex > T.length line = False
	| otherwise = (line `T.index` backtickIndex) == '`'

This is wrong, should be backtickIndex >= T.length line.

[Bodigrim]

(I'll appreciate if someone else raises a PR)

[pepeiborra]

Raised #2629

[fendor]

At the same time, I raised #2630 :D

I was slower, so closed in favour of #2629