Fix bad function pointer type.

-type Ac97CodecIfVtbl_lock = Ptr Ac97CodecIf -> IO (Ptr ())
+type Ac97CodecIfVtbl_lock = Ptr Ac97CodecIf -> IO ()