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

db4
Slava Pestov 2009-11-13 07:11:26 -06:00
parent afecb9c758
commit 7377c96a21
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-->
] ]