eyre: faster wain-to-octs conversion

Avoid allocating hundreds of thousands of cells when giving large
requests.  This took the footprint of this function on initial landscape
load from 1 second to 100 ms.
This commit is contained in:
Philip Monk 2021-03-28 00:57:33 -07:00
parent a1647a9767
commit a777567bb6
No known key found for this signature in database
GPG Key ID: B66E1F02604E44EC

View File

@ -425,10 +425,12 @@
:- ~ :- ~
%- as-octs:mimes:html %- as-octs:mimes:html
%- crip %- crip
%- zing %- zing ^- ^wall
%- zing ^- (list ^wall)
%+ turn wall %+ turn wall
|= t=tape |= t=tape
"{t}\0a" ^- ^wall
~[t "\0a"]
:: +internal-server-error: 500 page, with a tang :: +internal-server-error: 500 page, with a tang
:: ::
++ internal-server-error ++ internal-server-error