From 6fb7dca404a85c99a6f7392253559def823ecaab Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sun, 14 Jun 2009 17:00:52 -0500 Subject: [PATCH] compiler.cfg.linear-scan.resolve: fix compile error --- basis/compiler/cfg/linear-scan/resolve/resolve.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/compiler/cfg/linear-scan/resolve/resolve.factor b/basis/compiler/cfg/linear-scan/resolve/resolve.factor index 8996327beb..df2dbb1198 100644 --- a/basis/compiler/cfg/linear-scan/resolve/resolve.factor +++ b/basis/compiler/cfg/linear-scan/resolve/resolve.factor @@ -21,7 +21,7 @@ IN: compiler.cfg.linear-scan.resolve ; : resolve-edge-data-flow ( bb to -- ) - [ 2dup live-in [ resolve-value-data-flow ] with with each ] + [ dup live-in [ resolve-value-data-flow ] with with each ] [ resolve-mappings ] 2bi ;