From ad4364d413406e8e62a85f919efbe907de06d21a Mon Sep 17 00:00:00 2001 From: Anton Dyudin Date: Tue, 1 Sep 2015 17:56:19 -0700 Subject: [PATCH] reset after a dojo crash, just maybe fixing #295 --- ape/dojo.hoon | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/ape/dojo.hoon b/ape/dojo.hoon index 5868d9df1c..db3d7832e7 100644 --- a/ape/dojo.hoon +++ b/ape/dojo.hoon @@ -664,6 +664,14 @@ %det (he-stir +.act) %ret (he-done (tufa buf.say)) == + :: + ++ he-lame :: handle error + |= [wut=term why=tang] + ^+ +> + %- (slog (flop `tang`[>%dojo-lame wut< why])) + ?^ poy + he-pine:~(dy-amok dy u.poy) + he-pine :: XX give mean to original keystroke -- :: ++ peer-sole @@ -698,6 +706,10 @@ |= [way=wire dep=@uvH reg=gage] he-abet:(~(he-made he [[ost.hid ~] (~(got by hoc) ost.hid)]) way dep reg) :: +++ lame + |= [wut=term why=tang] + he-abet:(~(he-lame he [[ost.hid ~] (~(got by hoc) ost.hid)]) wut why) +:: ++ unto |= [way=wire cit=cuft] he-abet:(~(he-unto he [[ost.hid ~] (~(got by hoc) ost.hid)]) cit)