compiler.tree.propagation.branches: fix recent constraints change

Slava Pestov 2009-11-13 07:11:26 -06:00
parent b201cc4a6f
commit aaad7b6b16
1 changed files with 2 additions and 2 deletions

View File

@ -133,7 +133,7 @@ M: #phi propagate-before ( #phi -- )
{ {
{ { t f } { t } } { { t f } { t } }
[ [
first =t first =f
condition-value get =t /\ condition-value get =t /\
swap f--> swap f-->
] ]
@ -141,7 +141,7 @@ M: #phi propagate-before ( #phi -- )
{ {
{ { t } { t f } } { { t } { t f } }
[ [
second =t second =f
condition-value get =f /\ condition-value get =f /\
swap f--> swap f-->
] ]