Showing 292 of 292 total issues
Use camelCase Open
Open
type FN_vkDestroyImageView
= VkDevice
-> VkImageView
-> Ptr VkAllocationCallbacks
-> IO ()
- Read upRead up
- Exclude checks
Found
type FN_vkDestroyImageView =
VkDevice -> VkImageView -> Ptr VkAllocationCallbacks -> IO ()
Perhaps
type FNVkDestroyImageView =
VkDevice -> VkImageView -> Ptr VkAllocationCallbacks -> IO ()
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
Use camelCase Open
Open
type FN_vkDestroyPipeline
= VkDevice
-> VkPipeline
-> Ptr VkAllocationCallbacks
-> IO ()
- Read upRead up
- Exclude checks
Found
type FN_vkDestroyPipeline =
VkDevice -> VkPipeline -> Ptr VkAllocationCallbacks -> IO ()
Perhaps
type FNVkDestroyPipeline =
VkDevice -> VkPipeline -> Ptr VkAllocationCallbacks -> IO ()
Reduce duplication Open
Open
verify (== 4) $ atomically $ readEntityVar intVar1
- Read upRead up
- Exclude checks
Found
verify (== 4) $ atomically $ readEntityVar intVar1
verify (== 5) $ atomically $ readEntityVar intVar2
clientWaitAndSync c1
Perhaps
Combine with flaw-editor/test/entity-test.hs:151:5
Reduce duplication Open
Open
(albedoOcclusion, material, viewNormal, depth) <- deferredPipelineLightPassInput $ zw__ screenPositionTexcoord
- Read upRead up
- Exclude checks
Found
(albedoOcclusion, material, viewNormal,
depth) <- deferredPipelineLightPassInput $
zw__ screenPositionTexcoord
let albedo = xyz__ albedoOcclusion
diffuse = x_ material
specular = y_ material
metalness = zzz__ material
glossiness = w_ material
viewPositionH <- temp $
invProj `mul` cvec211 (xy__ screenPositionTexcoord) depth 1
viewPosition <- temp $ xyz__ viewPositionH / www__ viewPositionH
Perhaps
Combine with flaw-visual/Flaw/Visual/Pipeline/Deferred.hs:224:3
Redundant bracket Open
Open
registerEntityInterface :: EntityManager -> EntityInterfaceId -> (GetEntity SomeEntityInterface) -> IO ()
- Read upRead up
- Exclude checks
Found
(GetEntity SomeEntityInterface) -> IO ()
Perhaps
GetEntity SomeEntityInterface -> IO ()
Redundant bracket Open
Open
[ patSynSigD v (forallT [PlainTV a] (sequence [(conT ''Vectorized) `appT` (varT a)]) $ foldr (appT . (appT arrowT) . varT) ((conT v) `appT` (varT a)) (replicate (dimN * dimM) a))
- Read upRead up
- Exclude checks
Found
(conT ''Vectorized) `appT` (varT a)
Perhaps
conT ''Vectorized `appT` (varT a)
Use camelCase Open
Open
type FN_vkCreateShaderModule
= VkDevice
-> Ptr VkShaderModuleCreateInfo
-> Ptr VkAllocationCallbacks
-> Ptr VkShaderModule
- Read upRead up
- Exclude checks
Found
type FN_vkCreateShaderModule =
VkDevice
-> Ptr VkShaderModuleCreateInfo
-> Ptr VkAllocationCallbacks -> Ptr VkShaderModule -> IO Word32
Perhaps
type FNVkCreateShaderModule =
VkDevice
-> Ptr VkShaderModuleCreateInfo
-> Ptr VkAllocationCallbacks -> Ptr VkShaderModule -> IO Word32
Use camelCase Open
Open
data Hb_glyph_position_t
- Read upRead up
- Exclude checks
Found
data Hb_glyph_position_t
Perhaps
data HbGlyphPositionT
Use camelCase Open
Open
hb_glyph_info_t_size :: Int
- Read upRead up
- Exclude checks
Found
hb_glyph_info_t_size :: Int
Perhaps
hbGlyphInfoTSize :: Int
Redundant bracket Open
Open
[ patSynSigD v (forallT [PlainTV a] (sequence [(conT ''Vectorized) `appT` (varT a)]) $ foldr (appT . (appT arrowT) . varT) ((conT v) `appT` (varT a)) (replicate dim a))
- Read upRead up
- Exclude checks
Found
(appT arrowT) . varT
Perhaps
appT arrowT . varT
Move guards forward Open
Open
[ valD (varP (detName imask jmask)) (normalB $ detExp imask jmask) []
| imask <- [1..dimMask]
, jmask <- [1..dimMask]
, let l = length (maskBits imask)
, l > 1 && ((1 `shiftL` max 0 (dim - l - 1)) - 1) .&. imask == 0 && l == length (maskBits jmask)
- Read upRead up
- Exclude checks
Found
[valD (varP (detName imask jmask)) (normalB $ detExp imask jmask)
[]
| imask <- [1 .. dimMask], jmask <- [1 .. dimMask],
let l = length (maskBits imask),
l > 1 &&
((1 `shiftL` max 0 (dim - l - 1)) - 1) .&. imask == 0 &&
l == length (maskBits jmask)]
Perhaps
[valD (varP (detName imask jmask)) (normalB $ detExp imask jmask)
[]
| imask <- [1 .. dimMask], let l = length (maskBits imask),
jmask <- [1 .. dimMask],
l > 1 &&
((1 `shiftL` max 0 (dim - l - 1)) - 1) .&. imask == 0 &&
l == length (maskBits jmask)]
Use camelCase Open
Open
type FN_vkAllocationFunction = Ptr () -> CSize -> CSize -> VkSystemAllocationScope -> IO (Ptr ())
- Read upRead up
- Exclude checks
Found
type FN_vkAllocationFunction =
Ptr () -> CSize -> CSize -> VkSystemAllocationScope -> IO (Ptr ())
Perhaps
type FNVkAllocationFunction =
Ptr () -> CSize -> CSize -> VkSystemAllocationScope -> IO (Ptr ())
Use camelCase Open
Open
type FN_vkDestroyFramebuffer
= VkDevice
-> VkFramebuffer
-> Ptr VkAllocationCallbacks
-> IO ()
- Read upRead up
- Exclude checks
Found
type FN_vkDestroyFramebuffer =
VkDevice -> VkFramebuffer -> Ptr VkAllocationCallbacks -> IO ()
Perhaps
type FNVkDestroyFramebuffer =
VkDevice -> VkFramebuffer -> Ptr VkAllocationCallbacks -> IO ()
Use camelCase Open
Open
hb_y_advance :: Ptr Hb_glyph_position_t -> Ptr Hb_position_t
- Read upRead up
- Exclude checks
Found
hb_y_advance :: Ptr Hb_glyph_position_t -> Ptr Hb_position_t
Perhaps
hbYAdvance :: Ptr Hb_glyph_position_t -> Ptr Hb_position_t
Use camelCase Open
Open
hb_codepoint :: Ptr Hb_glyph_info_t -> Ptr Hb_codepoint_t
- Read upRead up
- Exclude checks
Found
hb_codepoint :: Ptr Hb_glyph_info_t -> Ptr Hb_codepoint_t
Perhaps
hbCodepoint :: Ptr Hb_glyph_info_t -> Ptr Hb_codepoint_t
Use camelCase Open
Open
data FT_FaceRec
- Read upRead up
- Exclude checks
Found
data FT_FaceRec
Perhaps
data FTFaceRec
Use camelCase Open
Open
type FT_Face = Ptr FT_FaceRec
- Read upRead up
- Exclude checks
Found
type FT_Face = Ptr FT_FaceRec
Perhaps
type FTFace = Ptr FT_FaceRec
Redundant bracket Open
Open
[ patSynSigD v (forallT [PlainTV a] (sequence [(conT ''Vectorized) `appT` (varT a)]) $ foldr (appT . (appT arrowT) . varT) ((conT v) `appT` (varT a)) (replicate dim a))
- Read upRead up
- Exclude checks
Found
(conT v) `appT` (varT a)
Perhaps
(conT v) `appT` varT a
Use tuple-section Open
Open
[ newtypeInstD (sequence []) ''Quat [elemType] Nothing (normalC conName [fmap (\t -> (Bang NoSourceUnpackedness NoSourceStrictness, t)) [t| Vec4 $elemType |]]) [derivClause Nothing [ [t| Generic |] ] ]
- Read upRead up
- Exclude checks
Found
\ t -> (Bang NoSourceUnpackedness NoSourceStrictness, t)
Perhaps
(Bang NoSourceUnpackedness NoSourceStrictness,)
Applying this change:
- may require
{-# LANGUAGE TupleSections #-}
adding to the top of the file