sky: better error handling

This commit is contained in:
Will Hanlen 2024-05-30 22:10:35 +02:00 committed by SuperCoolYun
parent 8b0e0c5209
commit 98f0b5f41d

View File

@ -299,23 +299,47 @@
^- stud:neo
~| %no-stud-specified
(~(got by pam.purl) 'stud')
=/ =pail:neo [poke-stud (node [poke-stud body])]
=/ bol *bowl:neo
=. here.bol here
=. our.bol our.bowl
=. now.bol now.bowl
=. eny.bol eny.bowl
=/ =manx
?~ converter=(mole |.((htmx pail)))
(default-refresher here)
:: XX virtualize
(u.converter bol)
:- [here %poke pail]
%: eyre-cards
eyre-id
bowl
200
manx
=/ mul
%- mule
|.((node [poke-stud body]))
?- -.mul
%.n
%: eyre-cards
eyre-id
bowl
400
;div
;*
%+ turn (tang p.mul)
|= =tank
;div: {(of-wall:format (~(win re tank) 0 55))}
==
==
::
%.y
=/ =pail:neo [poke-stud p.mul]
=/ bol *bowl:neo
=. here.bol here
=. our.bol our.bowl
=. now.bol now.bowl
=. eny.bol eny.bowl
=/ =manx
?~ converter=(mole |.((htmx pail)))
(default-refresher here)
=/ mul
%- mule
|.((u.converter bol))
?- -.mul
%.y p.mul
%.n ;div: error
==
:- [here %poke pail]
%: eyre-cards
eyre-id
bowl
200
manx
==
==
==
--