c3c/test/unit/regression/faults.c3

module faults @test;

fault Foo
{
	ABC,
	CDE
}

fn void ordinals()
{
	Foo z = {};
	assert(z.ordinal == 0);
	$assert Foo.ABC.ordinal == 1;
	$assert Foo.CDE.ordinal == 2;
	$assert (Foo{}).ordinal == 0;
	Foo x = Foo.CDE;
	assert(x.ordinal == 2);
	x = Foo.ABC;
	assert(x.ordinal == 1);
}