flaw-dx11/Flaw/Graphics/DirectX11.hs
Reduce duplication Open
Open
srvInterface <- book bk $ allocateCOMObject $ with srvDesc $ \srvDescPtr ->
createCOMObjectViaPtr $ m_ID3D11Device_CreateShaderResourceView deviceInterface (pokeCOMObject resourceInterface) srvDescPtr
- Read upRead up
- Exclude checks
Found
srvInterface <- book bk $
allocateCOMObject $
with srvDesc $
\ srvDescPtr ->
createCOMObjectViaPtr $
m_ID3D11Device_CreateShaderResourceView deviceInterface
(pokeCOMObject resourceInterface)
srvDescPtr
releaseResourceInterface
samplerState <- book bk $
createSamplerState device samplerStateInfo
Perhaps
Combine with flaw-dx11/Flaw/Graphics/DirectX11.hs:552:5