From 46e0426795bc2b0332e988a379fd77f094bee9e2 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Fri, 12 Dec 2014 17:14:39 -0800 Subject: [PATCH] compiler.cfg.stack-frame: fix tests. --- basis/compiler/cfg/stack-frame/stack-frame-tests.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/compiler/cfg/stack-frame/stack-frame-tests.factor b/basis/compiler/cfg/stack-frame/stack-frame-tests.factor index f40003426e..edad20182d 100644 --- a/basis/compiler/cfg/stack-frame/stack-frame-tests.factor +++ b/basis/compiler/cfg/stack-frame/stack-frame-tests.factor @@ -13,7 +13,7 @@ IN: compiler.cfg.stack-frame.tests { allot-area-size 10 } { spill-area-align 8 } { spill-area-size 16 } - } dup finalize-stack-frame + } finalize-stack-frame [ spill-area-base>> ] [ stack-frame set 37 spill-offset ] bi ] unit-test