From 330bea3cc2e9f3de9436e5039c9bc1ce3e642f67 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sun, 21 Jun 2009 00:23:34 -0500 Subject: [PATCH] compiler.cfg.linear-scan.resolve: unit tests --- basis/compiler/cfg/linear-scan/resolve/resolve-tests.factor | 6 ++++++ 1 file changed, 6 insertions(+) create mode 100644 basis/compiler/cfg/linear-scan/resolve/resolve-tests.factor diff --git a/basis/compiler/cfg/linear-scan/resolve/resolve-tests.factor b/basis/compiler/cfg/linear-scan/resolve/resolve-tests.factor new file mode 100644 index 0000000000..475e8ea167 --- /dev/null +++ b/basis/compiler/cfg/linear-scan/resolve/resolve-tests.factor @@ -0,0 +1,6 @@ +IN: compiler.cfg.linear-scan.resolve.tests +USING: compiler.cfg.linear-scan.resolve tools.test arrays kernel ; + +[ { 1 2 3 4 5 6 } ] [ + { 3 4 } V{ 1 2 } clone [ { 5 6 } 3append-here ] keep >array +] unit-test \ No newline at end of file