Fix update bug.

This commit is contained in:
C. Guy Yarvin 2013-12-29 17:24:29 -05:00
parent de9bf707d2
commit a9d4fc73b4

View File

@ -166,9 +166,9 @@
++ duce :: produce request
|= [hen=duct rav=rave]
^+ +>
=. qyx (~(put by qyx) hen rav)
?~ ref +>
|- ^+ +>+.$
=. qyx (~(put by qyx) hen rav)
=+ ^= vaw ^- rave
?. ?=([%& %v *] rav) rav
[%| [%ud let.dom] `case`q.p.rav]