dill,clay: minor printing cleanup

This commit is contained in:
Ted Blackman 2021-07-14 01:51:35 +03:00
parent 529502543b
commit f4232ce415
2 changed files with 4 additions and 1 deletions

View File

@ -4083,7 +4083,7 @@
::
!.
=- ?: ?=(%& -<) p.-
((slog leaf+"gall: read-at-aeon fail {<mun>}" p.-) [[~ ~] fod])
((slog leaf+"clay: read-at-aeon fail {<mun>}" p.-) [[~ ~] fod])
%- mule |.
?- care.mun
%d

View File

@ -267,6 +267,9 @@
^+ +>
?- sih
[%gall %onto *]
:: NOTE effects during initial boot sequence are ignored,
:: so :hood compilation errors will not print; slog if desired
::
:: ~& [%take-gall-onto +>.sih]
?- -.+>.sih
%| (crud %onto p.p.+>.sih)