--Convenience QIs - are they really used?

queryIUnknown :: IID (IUnknown a) -> IUnknown () -> IO (IUnknown a)
queryIUnknown          = queryInterface
queryIUnknown :: IID (IUnknown a) -> IUnknown () -> IO (IUnknown a)
queryIUnknown          = queryInterface
queryIUnknown          = queryInterface