urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-20 01:01:37 +03:00
Code Issues Packages Projects Releases Wiki Activity

hoon: fix batch comment parsing for ++ $ arms

Browse Source 
comments for ++  $  arms are set using four aces
This commit is contained in:
drbeefsupreme 2022-06-28 13:29:42 -04:00
parent 8f48f08f1a
commit 77b5c736aa
1 changed files with 11 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
pkg/arvo/sys/hoon.hoon
View File

@ -11652,13 +11652,15 @@
%- stew
^. stet ^. limo
:~ :- '|'
;~(pfix bar (stag %chat sym))
(stag %chat (ifix [bar cola] sym))
:- '.'
;~(pfix dot (stag %frag sym))
(stag %frag (ifix [dot cola] sym))
:- '+'
;~(pfix lus (stag %funk sym))
(stag %funk (ifix [lus cola] sym))
:- '$'
;~(pfix buc (stag %grog sym))
(stag %grog (ifix [buc cola] sym))
:- ' '
(stag %funk ;~(pfix step (easy *term)))
==
++ shot
;~(plug ;~(sfix line (just `@`10) (punt gap)) (rant ;~(less tine text)))
@ -11668,13 +11670,14 @@
++ code ;~(pfix step step (cook crip (star prn))) :: code line
++ noel ;~(plug (punt ;~(pfix step hax)) null) :: header padding
++ null (cold ~ (star ace)) :: blank line
++ cola ;~(plug col ace)
++ fine :: definition line
;~ (glue ;~(plug col ace))
;~ (glue cola)
sym
(cook crip (star prn))
==
++ tine
;~ (glue ;~(plug col ace))
;~ (glue cola)
dibs
(cook crip (star prn))
==
@ -11683,7 +11686,7 @@
:: +into: :: and indent to end of line, consuming following space.
:: +indo: :: to end of line, consuming following space.
:: +exit: :: to end of line, not consuming following space.
:: +ingo: :: then consume, followed by col ace
:: +ingo: :: then consume
::
++ step ;~(plug ace ace)
++ into |*(bod=rule (indo ;~(pfix step bod)))
@ -11692,7 +11695,7 @@
(ifix [;~(plug col gar) ;~(plug (just `@`10) (punt gap))] bod)
++ ingo
|* bod=rule
(ifix [;~(plug col gar step) ;~(plug col ace)] bod)
;~(pfix ;~(plug col gar step) bod)
::
++ exit
|* bod=rule