Add cat for all dimensions (fixes #171)

JuliaLang · Aug 22, 2011 · 2f92f4c · 2f92f4c
1 parent c31addf
commit 2f92f4c
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/j/array.j b/j/array.j
@@ -241,7 +241,7 @@ function hcat{T}(A::Array{T,2}...)
        end
    end
 
-    return B
+   return B
 end
 
 function vcat{T}(A::Array{T,2}...)
@@ -270,7 +270,7 @@ function cat(catdim::Int, X...)
     elseif catdim == 2
         dimsC = (1, nargs)
     else
-        # TODO
+        dimsC = tuple(ntuple(catdim-1, i->1)..., nargs)
     end
     C = Array(typeC, dimsC)
 
@@ -290,7 +290,7 @@ function cat(catdim::Int, A::Array...)
     dimsA = map(size, A)
     ndimsA = map(ndims, A)
     d_max = max(ndimsA)
-    d_min = min(ndimsA)
+    #d_min = min(ndimsA)
 
     cat_ranges = ntuple(nargs, i->(catdim <= ndimsA[i] ? dimsA[i][catdim] : 1))