// equaltest — exercises bytes.equal. A failing row aborts via the
// assert/abort builtin (task #5 @test conversion).
// Vectors mirror ref/hare/bytes/equal.ha.

package bytes_test;

import bytes;

// ref/hare/bytes/equal.ha:21.

@test fn equal_cases() void = {
	let a: [3]u8; a[0] = 1u8; a[1] = 2u8; a[2] = 3u8;
	let b: [3]u8; b[0] = 1u8; b[1] = 2u8; b[2] = 3u8;
	let c: [3]u8; c[0] = 1u8; c[1] = 4u8; c[2] = 5u8;
	let d: [4]u8; d[0] = 1u8; d[1] = 2u8; d[2] = 3u8; d[3] = 4u8;
	let e: [2]u8; e[0] = 1u8; e[1] = 2u8;
	let z: [1]u8;
	assert(!(!bytes.equal(a[0:3], b[0:3])));
	assert(!( bytes.equal(a[0:3], c[0:3])));
	assert(!( bytes.equal(a[0:3], d[0:4])));
	assert(!( bytes.equal(a[0:3], e[0:2])));
	assert(!(!bytes.equal(z[0:0], z[0:0])));	// empty-empty
};