flaw-editor/exe/model-editor.hs
Use readTVarIO Open
Open
exit <- atomically $ readTVar exitVar
- Read upRead up
- Exclude checks
Found
atomically $ readTVar exitVar
Perhaps
readTVarIO exitVar
Reduce duplication Open
Open
renderUniform usLight uLightColor lightColor
- Read upRead up
- Exclude checks
Found
renderUniform usLight uLightColor lightColor
renderUploadUniformStorage usLight
renderUniformStorage usLight
Perhaps
Combine with flaw-editor/exe/model-editor.hs:930:11
Reduce duplication Open
Open
let v = undefined :: VertexPNT
- Read upRead up
- Exclude checks
Found
let v = undefined :: VertexPNT
aPosition <- vertexAttribute 0 0 $ vertexPositionAttribute v
aNormal <- vertexAttribute 0 0 $ vertexNormalAttribute v
Perhaps
Combine with flaw-editor/exe/model-editor.hs:398:5
Reduce duplication Open
Open
renderUniformStorage usObject
- Read upRead up
- Exclude checks
Found
renderUniformStorage usObject
renderVertexBuffer 0 vbObject
renderIndexBuffer ibObject
Perhaps
Combine with flaw-editor/exe/model-editor.hs:886:11
Reduce duplication Open
Open
renderUploadUniformStorage usObject
- Read upRead up
- Exclude checks
Found
renderUploadUniformStorage usObject
renderUniformStorage usObject
renderDraw icObject
Perhaps
Combine with flaw-editor/exe/model-editor.hs:899:11