diff --git a/basis/compiler/tree/propagation/transforms/transforms.factor b/basis/compiler/tree/propagation/transforms/transforms.factor index e0ce989dff..689ae20202 100644 --- a/basis/compiler/tree/propagation/transforms/transforms.factor +++ b/basis/compiler/tree/propagation/transforms/transforms.factor @@ -156,8 +156,8 @@ IN: compiler.tree.propagation.transforms \ clone [ in-d>> first value-info literal>> { { V{ } [ [ drop { } 0 vector boa ] ] } - { H{ } [ [ drop 0 0 8 ((empty)) hashtable boa ] ] } - { HS{ } [ [ drop 0 0 4 ((empty)) hash-set boa ] ] } + { H{ } [ [ drop 0 ] ] } + { HS{ } [ [ drop 0 ] ] } [ drop f ] } case ] "custom-inlining" set-word-prop