Random encoding/decoding tests for PrimeFieldRepr. Closes #3.

src/tests/mod.rs

@@ -1,3 +1,4 @@
 pub mod curve;
 pub mod field;
 pub mod engine;
+pub mod repr;

src/tests/repr.rs

@@ -0,0 +1,21 @@
+use rand::{SeedableRng, XorShiftRng};
+use ::{PrimeFieldRepr};
+
+pub fn random_repr_tests<R: PrimeFieldRepr>() {
+	random_encoding_tests::<R>();
+}
+
+fn random_encoding_tests<R: PrimeFieldRepr>() {
+	let mut rng = XorShiftRng::from_seed([0x5dbe6259, 0x8d313d76, 0x3237db17, 0xe5bc0654]);
+
+	for _ in 0..1000 {
+		let r = R::rand(&mut rng);
+		let mut rdecoded = R::default();
+
+		let mut v: Vec<u8> = vec![];
+		r.write_be(&mut v).unwrap();
+		rdecoded.read_be(&v[0..]).unwrap();
+
+		assert_eq!(r, rdecoded);
+	}
+}