store_array.c in numo-narray-0.9.0.5

- old
+ new

@@ -17,10 +17,10 @@
     v1 = lp->args[1].value;
     i = 0;
 
     if (lp->args[1].ptr) {
         if (v1 == Qtrue) {
-            iter_<%=tp%>_store_<%=tp%>(lp);
+            iter_<%=type_name%>_store_<%=type_name%>(lp);
             i = lp->args[1].shape[0];
             if (idx1) {
                 idx1 += i;
             } else {
                 p1 += s1 * i;