diff yetilab/transform/fft.yeti @ 221:ddc8fa794880 matrix_opaque_immutable

Fix complex (avoiding dodgy bytecode)

--- a/yetilab/transform/fft.yeti	Sat May 11 12:20:40 2013 +0100
+++ b/yetilab/transform/fft.yeti	Sat May 11 14:50:43 2013 +0100
@@ -19,14 +19,16 @@
 
 complexToPacked arr =
    (n = length arr;
-    v = (map do i:
-            ix = int (i/2);
+    v = new double[n*2-2];
+    for [0..(n-1)*2-1] do i:
+        ix = int (i/2);
+        v[i] :=
             if i == ix*2 then
                 complex.real arr[ix]
             else 
                 complex.imaginary arr[ix] 
             fi;
-            done [0..(n-1)*2-1]) as ~double[];
+    done;
     v[1] := complex.real arr[n-1];
     v);