diff --git a/extra/compiler/cfg/graphviz/graphviz.factor b/extra/compiler/cfg/graphviz/graphviz.factor
index 591e496dbd..35be22db7a 100644
--- a/extra/compiler/cfg/graphviz/graphviz.factor
+++ b/extra/compiler/cfg/graphviz/graphviz.factor
@@ -60,7 +60,6 @@ IN: compiler.cfg.graphviz
     tri* ;
 
 SYMBOL: passes
-\ optimize-cfg def>> passes set
 
 : watch-pass ( cfg pass pass# -- cfg' )
     [ perform-pass ] 2keep draw-cfg ;
diff --git a/extra/compiler/cfg/gvn/testing/testing.factor b/extra/compiler/cfg/gvn/testing/testing.factor
index c1702f23a5..51fd05cacc 100644
--- a/extra/compiler/cfg/gvn/testing/testing.factor
+++ b/extra/compiler/cfg/gvn/testing/testing.factor
@@ -14,7 +14,9 @@ M: integer-expr expr>str value>> number>string ;
 
 M: reference-expr expr>str value>> unparse ;
 
-M: object expr>str [ unparse ] map " " join ;
+M: sequence expr>str [ unparse ] map " " join ;
+
+M: object expr>str unparse ;
 
 : value-mapping ( from to -- str )
     over exprs>vns get value-at* [