Make array construction use LOADVN (slightly faster)

diff --git a/compile.c b/compile.c
index 95cd59e52d627c945730cbc30f583c96657e15e7..bf4f92fdc79e9238ce60eaebd6a2633e9011fb41 100644 (file)
--- a/compile.c
+++ b/compile.c
@@ -317,7 +317,7 @@ block gen_collect(block expr) {
                gen_op_target(FORK, tail),
                expr, 
                tail,
-               gen_op_var_bound(LOADV, array_var));
+               gen_op_var_bound(LOADVN, array_var));
 }
 
 block gen_reduce(const char* varname, block source, block init, block body) {