[fix] server diags

This commit is contained in:
Andy Bunce 2025-08-28 16:44:48 +01:00
parent 776d5013d0
commit 18f3f309c7
2 changed files with 20 additions and 5 deletions

View file

@ -52,7 +52,7 @@ declare function lsp-diags:parse-error($text as xs:string, $xml as element(ERROR
as map(*)*{
if(string-length($text) gt 0)
then let $last:= string-length($text)
then let $last:= string-length($text)-1
let $dmesg:=$xml/string()=>trace("parse-error")
let $dmesg:=translate($dmesg,"
",";")
let $b:=number($xml/@b)-1
@ -60,7 +60,7 @@ as map(*)*{
return (
(: mark error :)
lsp-diags:nostic(pos:Range(pos:toPosition($text, $b),
pos:toPosition($text, min(($e,$last)))),
pos:toPosition($text, $e)),
1,
$dmesg,'XPST0003'),