hoon: preserve structural sharing by testing subject/product equality in +burp

This commit is contained in:
Joe Bryan 2022-03-25 10:28:05 -04:00 committed by drbeefsupreme
parent 0c255c1294
commit f7f4b3e748
No known key found for this signature in database
GPG Key ID: B70D5683DE7F9EFC

View File

@ -9107,7 +9107,7 @@
::
^- type
~+
~= sut
=- ?.(=(sut -) - sut)
?+ sut sut
[%cell *] [%cell burp(sut p.sut) burp(sut q.sut)]
[%core *] :+ %core