hoon: when +gain:ar a cell, make sure to recurse

Into the head and tail for more complete gains.

Co-authored-by: joemfb <joemfb@users.noreply.github.com>
This commit is contained in:
fang 2022-07-01 18:28:31 +02:00
parent fa36819a27
commit 7370343abf
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972

View File

@ -8895,7 +8895,9 @@
|- ^- type
?- ref
%void %void
%noun [%cell %noun %noun]
%noun =+ ^$(skin skin.skin)
?: =(%void -) %void
(cell - ^$(skin ^skin.skin))
[%atom *] %void
[%cell *] =+ ^$(skin skin.skin, ref p.ref)
?: =(%void -) %void