From 6855e0bb157903a7ba9da4e5632fac7925d3c950 Mon Sep 17 00:00:00 2001 From: Alex Vondrak Date: Sun, 3 Jul 2011 13:16:26 -0700 Subject: [PATCH] compiler.cfg.gvn: fix special vreg insn handling --- extra/compiler/cfg/gvn/gvn.factor | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/extra/compiler/cfg/gvn/gvn.factor b/extra/compiler/cfg/gvn/gvn.factor index c51b7defb0..1ce57aeb31 100644 --- a/extra/compiler/cfg/gvn/gvn.factor +++ b/extra/compiler/cfg/gvn/gvn.factor @@ -33,8 +33,10 @@ GENERIC: value-number ( insn -- ) M: array value-number [ value-number ] each ; -M: alien-call-insn value-number drop ; -M: ##callback-inputs value-number drop ; +: record-defs ( insn -- ) defs-vregs [ dup set-vn ] each ; + +M: alien-call-insn value-number record-defs ; +M: ##callback-inputs value-number record-defs ; M: ##copy value-number [ src>> vreg>vn ] [ dst>> ] bi set-vn ;