fine: use $@(~ (cask)) consistently

It's what ends up in the packet, probably better than passing units and
converting them all over.
This commit is contained in:
fang 2022-02-01 12:02:47 +01:00
parent 4bea69bc7d
commit c72c187edd
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972

View File

@ -1171,7 +1171,7 @@
?- res
~ ~
[~ ~] ``noun+!>((encode-response:fine:ven path ~))
[~ ~ *] ``noun+!>((encode-response:fine:ven path `[p q.q]:u.u.res))
[~ ~ *] ``noun+!>((encode-response:fine:ven path [p q.q]:u.u.res))
==
==
--
@ -2527,7 +2527,7 @@
[(mod life.ames-state 16) (mod (lyfe:keys ship) 16) ~ syn]
::
++ encode-response ::TODO unit tests
|= [=path data=(unit (cask))]
|= [=path data=$@(~ (cask))]
^- song
:: prepend request descriptions to each response packet
::