module test

f :: !Int -> !Int
f _ = code {
	ccall bork "I:I"
}

Start = f