! Copyright (C) 2008 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. IN: compiler.tree.branch-fusion : fuse-branches ( nodes -- nodes' ) ;