Fix bug in raw_data_mut

Author: bluss

src/lib.rs

@@ -684,6 +684,7 @@ impl<A, D> Array<A, D> where D: Dimension
     pub fn raw_data_mut<'a>(&'a mut self) -> &'a mut [A]
         where A: Clone
     {
+        self.ensure_unique();
         &mut Rc::make_mut(&mut self.data)[..]
     }
 

tests/array.rs

@@ -336,3 +336,14 @@ fn map1()
     let c = a.map(|x| x);
     assert_eq!(a[(0, 0)], *c[(0, 0)]);
 }
+
+#[test]
+fn raw_data_mut()
+{
+    let mut a = arr2(&[[1., 2.], [3., 4.0f32]]);
+    let mut b = a.clone();
+    for elt in b.raw_data_mut() {
+        *elt = 0.;
+    }
+    assert!(a != b, "{:?} != {:?}", a, b);
+}