added some printfs to gall

This commit is contained in:
Philip C Monk 2014-12-02 01:31:34 -05:00
parent 39246eef22
commit 4187db53a2

View File

@ -395,7 +395,9 @@
^- [(list move) _..^$]
?+ -.sih !!
%a
?> ?=(%woot +<.sih)
?. ?=(%woot +<.sih)
~& [%gall-bad-gasp-a pax=pax lgsih=+<.sih]
~& [%gall-bad-gasp-b pax=pax sih=sih] !!
:_ ..^$ :_ ~
?~ q.sih
[hen %give %nice ~]