Don't put any grams into the prize if they weren't requested.

This commit is contained in:
Fang 2017-12-09 14:59:29 +01:00
parent 211045abdd
commit 100f0cb431

View File

@ -1926,7 +1926,8 @@
?~ soy ~
:+ ~ ~
:- %circle
:+ %+ turn
:+ ?. (~(has in wat.qer) %grams) ~
%+ turn
=- (~(so-first-grams so:ta nom.qer ~ -) ran.qer)
::TODO this can be done more efficiently.
?~ wer.qer u.soy