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