From 3c8e73cbc81ee1ca09132269574f9f800c9eeb79 Mon Sep 17 00:00:00 2001 From: Liam Fitzgerald Date: Fri, 29 Jan 2021 10:09:52 +1000 Subject: [PATCH] Revert "language-server: parse commands permissively" This reverts commit 8f8ec8bcc5b413e7bed66a5f747ac4e76ba3ab44. --- pkg/arvo/lib/language-server/complete.hoon | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/pkg/arvo/lib/language-server/complete.hoon b/pkg/arvo/lib/language-server/complete.hoon index 6e352e819..18f16c168 100644 --- a/pkg/arvo/lib/language-server/complete.hoon +++ b/pkg/arvo/lib/language-server/complete.hoon @@ -247,15 +247,15 @@ :: ++ get-id |= [pos=@ud txt=tape] - ^- [forward=(unit @t) backward=(unit @t) id=(unit @t)] - =/ seek - ;~(sfix (punt (cook crip (star prn))) (star ;~(pose prn (just `@`10)))) - =/ forward=(unit @t) - (scan (slag pos txt) seek) - =/ backward=(unit @t) + ^- [forward=(unit term) backward=(unit term) id=(unit term)] + =/ forward=(unit term) + %+ scan `tape`(slag pos txt) + ;~(sfix (punt sym) (star ;~(pose prn (just `@`10)))) + =/ backward=(unit term) %- (lift |=(t=@tas (swp 3 t))) - (scan (flop (scag pos txt)) seek) - =/ id=(unit @t) + %+ scan `tape`(flop (scag pos txt)) + ;~(sfix (punt sym) (star ;~(pose prn (just `@`10)))) + =/ id=(unit term) ?~ forward ?~ backward ~