ford,kiln: nicer errors

This commit is contained in:
Philip Monk 2020-06-24 21:19:46 -07:00
parent 7044f1fae6
commit 51c6faaa31
No known key found for this signature in database
GPG Key ID: B66E1F02604E44EC
2 changed files with 3 additions and 3 deletions

View File

@ -443,7 +443,7 @@
?>(?=(%wake +<.sign-arvo) +>.sign-arvo)
[%ota *] abet:(take:update t.wire sign-arvo)
*
?+ +<.sign-arvo ~|([%kiln-bad-take-card +<.sign-arvo] !!)
?+ +<.sign-arvo ~|([%kiln-bad-take-card +<.sign-arvo wire] !!)
%done %+ done wire
?>(?=(%done +<.sign-arvo) +>.sign-arvo)
%mere %+ take-mere wire

View File

@ -2,8 +2,8 @@
|= pit=vase
|= [our=ship now=@da eny=@uvJ ski=sley]
|%
++ call |=(* ~&(%ford-call-gone `..^$))
++ take |=(* ~&(%ford-take-gone `..^$))
++ call |=(* ((slog leaf+"ford: gone (+call)" ~) `..^$))
++ take |=(* ((slog leaf+"ford: gone (+take)" ~) `..^$))
++ scry |=(* ``mass+!>(*(list mass)))
++ stay ~
++ load |=(* ..^$)