parse reference as @p, not @uv

This commit is contained in:
Anton Dyudin 2017-05-25 10:32:07 -07:00
parent c06e10e7c2
commit f5d8c1997c

View File

@ -12,16 +12,18 @@
|%
++ noun {cord reference invite}:womb :: clam from %noun
++ json
%+ corl need
|= jon/^json ^- {cord reference invite}:womb
%- need
%. jon
=> jo
=+ ^= mail
;~ simu
;~(pfix (plus ;~(less pat next)) pat)
(cook crip (star ;~(less ace prn)))
==
=/ mail
;~ simu
;~(pfix (plus ;~(less pat next)) pat)
(cook crip (star ;~(less ace prn)))
==
%- ot :~
tid+so
ref+(mu (su (pick ;~(pfix (jest '0v') viz:ag) mail)))
ref+(mu (su (pick ;~(pfix sig fed:ag) mail)))
inv+(ot who+(su mail) pla+ni sta+ni wel+(ot intro+sa hello+sa ~) ~)
==
--