18 lines
386 B
Factor
18 lines
386 B
Factor
USING: compiler.tree.propagation.copy compiler.tree.propagation.info
|
|
compiler.tree.propagation.nodes namespaces tools.test ;
|
|
IN: compiler.tree.propagation.nodes.tests
|
|
|
|
|
|
{
|
|
H{ { 1234 "hello" } }
|
|
} [
|
|
H{ { 1234 1234 } } copies set
|
|
{
|
|
H{
|
|
{ 1234 "hello" }
|
|
{ 4321 "stuff" }
|
|
}
|
|
} value-infos set
|
|
{ 1234 } extract-value-info
|
|
] unit-test
|