extend Base.adjoint instead (#74)

Ferrite-FEM · Aug 22, 2017 · 1f86e74 · 1f86e74
1 parent 26dd4fc
commit 1f86e74
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/transpose.jl b/src/transpose.jl
@@ -53,4 +53,8 @@ Computes the major transpose of a fourth order tensor.
     Tensor{4, dim}(@inline function(i, j, k, l) @inboundsret S[k,l,i,j]; end)
 end
 
-@inline Base.ctranspose(S::AllTensors) = transpose(S)
+if VERSION >= v"0.7.0-DEV.1415"
+    @inline Base.adjoint(S::AllTensors) = transpose(S)
+else
+    @inline Base.ctranspose(S::AllTensors) = transpose(S)
+end