More debug.

This commit is contained in:
C. Guy Yarvin 2013-12-29 00:23:05 -05:00
parent c8f129c033
commit c599b27c65
2 changed files with 3 additions and 0 deletions

View File

@ -1198,6 +1198,7 @@
::
++ dine :: dine:la:ho:um:am
|= fud=meal :: interpret meal
~? =(her ~nibbus-sivnex) [%dine fud]
^+ +>
?- -.fud
%back

View File

@ -432,6 +432,7 @@
?> ?=(^ wru)
?> ?=(%re q.fav)
=+ ryf=((hard riff) s.fav)
~? =(~nibbus-sivnex p.fav) [%wart ryf]
:_ ..^$
:~ :+ [~ %iron q.u.wru]
[/c [%c (scot %p p.fav) r.fav] hen]
@ -441,6 +442,7 @@
%writ
?> ?=([@ *] tea)
=+ him=(need (slaw %p i.tea))
~? =(him ~nibbus-sivnex) [%writ t.tea]
:_ ..^$
:~ :+ wru
[/a [%c ~] hen]