Better debug.

This commit is contained in:
C. Guy Yarvin 2013-12-28 22:50:27 -05:00
parent 13e63a1db1
commit 6fd2a8c841

View File

@ -14,9 +14,9 @@
:- [%la %leaf "updating..."]
%+ turn syn
|= des=@tas
~& [%awaiting bos]
~& [%reading /(scot %p bos)/[des]/=]
=+ der=((hard dome) .^(%cv /(scot %p bos)/[des]/=))
~& [%awaiting who]
~& [%reading /(scot %p who)/[des]/=]
=+ owr=((hard dome) .^(%cv /(scot %p who)/[des]/=))
=+ sab=`saba`[bos des [0 let.der] (flop (turn hit.der |=(a=frog q.a)))]
=+ lum=(~(auld ze est owr) est %fine sab)