language-server: use modern tisfas syntax

This commit is contained in:
Liam Fitzgerald 2019-11-16 11:46:17 +10:00
parent b0c5b7b0fe
commit f299bf9d2c
2 changed files with 2 additions and 2 deletions

View File

@ -194,7 +194,7 @@
=+ (get-id:auto (get-pos buf row col) txt) =+ (get-id:auto (get-pos buf row col) txt)
?~ id ?~ id
[(json-response *json) buf] [(json-response *json) buf]
=/ match/(unit [=term =type]) =/ match=(unit [=term =type])
(search-exact:auto u.id (get-identifiers:auto -:!>(..zuse))) (search-exact:auto u.id (get-identifiers:auto -:!>(..zuse)))
?~ match ?~ match
[(json-response *json) buf] [(json-response *json) buf]

View File

@ -71,7 +71,7 @@
++ search-exact ++ search-exact
|= [sid=term ids=(list [term type])] |= [sid=term ids=(list [term type])]
^- (unit [term type]) ^- (unit [term type])
=/ match/(list [term type]) =/ match=(list [term type])
%+ skim ids %+ skim ids
|= [id=term ty=type] |= [id=term ty=type]
=(sid id) =(sid id)