Sign upLogin

quyse/flaw

View on GitHub
Star

Showing 292 of 292 total issues

Use camelCase
Open

data C_AVFrame
Severity: Minor
Found in flaw-ffmpeg/Flaw/Media/FFmpeg.hs by hlint

Found

data C_AVFrame

Perhaps

data CAVFrame

Redundant bracket
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))
Severity: Minor
Found in flaw-math/Flaw/Math.hs by hlint

Found

(conT ''Vectorized) `appT` (varT a)

Perhaps

(conT ''Vectorized) `appT` varT a

Use camelCase
Open

type FN_vkGetDeviceQueue
  =  VkDevice
  -> Word32
  -> Word32
  -> Ptr VkQueue
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkGetDeviceQueue =
    VkDevice -> Word32 -> Word32 -> Ptr VkQueue -> IO ()

Perhaps

type FNVkGetDeviceQueue =
    VkDevice -> Word32 -> Word32 -> Ptr VkQueue -> IO ()

Use camelCase
Open

type FN_vkCreateRenderPass
  =  VkDevice
  -> Ptr VkRenderPassCreateInfo
  -> Ptr VkAllocationCallbacks
  -> Ptr VkRenderPass
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkCreateRenderPass =
    VkDevice
    -> Ptr VkRenderPassCreateInfo
       -> Ptr VkAllocationCallbacks -> Ptr VkRenderPass -> IO Word32

Perhaps

type FNVkCreateRenderPass =
    VkDevice
    -> Ptr VkRenderPassCreateInfo
       -> Ptr VkAllocationCallbacks -> Ptr VkRenderPass -> IO Word32

Use camelCase
Open

type FN_vkDestroyRenderPass
  =  VkDevice
  -> VkRenderPass
  -> Ptr VkAllocationCallbacks
  -> IO ()
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkDestroyRenderPass =
    VkDevice -> VkRenderPass -> Ptr VkAllocationCallbacks -> IO ()

Perhaps

type FNVkDestroyRenderPass =
    VkDevice -> VkRenderPass -> Ptr VkAllocationCallbacks -> IO ()

Redundant bracket
Open

        unit <- (read . T.unpack) <$> getElementAttr "meter" unitElement
Severity: Minor
Found in flaw-collada/Flaw/Asset/Collada.hs by hlint

Found

(read . T.unpack) <$> getElementAttr "meter" unitElement

Perhaps

read . T.unpack <$> getElementAttr "meter" unitElement

Redundant $
Open

        resultDecl = tySynInstD (mkName $ "SwizzleVecResult" ++ nameSuffix) $ tySynEqn [ [t| $(conT srcDataName) $elemType |] ] $ [t| $(conT dataName) $elemType |]
Severity: Minor
Found in flaw-math/Flaw/Math.hs by hlint

Found

tySynEqn [[t| $( conT srcDataName ) $elemType |]] $
  [t| $( conT dataName ) $elemType |]

Perhaps

tySynEqn [[t| $( conT srcDataName ) $elemType |]]
  [t| $( conT dataName ) $elemType |]

Use camelCase
Open

type FN_vkCreateDevice
  =  VkPhysicalDevice
  -> Ptr VkDeviceCreateInfo
  -> Ptr VkAllocationCallbacks
  -> Ptr VkDevice
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkCreateDevice =
    VkPhysicalDevice
    -> Ptr VkDeviceCreateInfo
       -> Ptr VkAllocationCallbacks -> Ptr VkDevice -> IO Word32

Perhaps

type FNVkCreateDevice =
    VkPhysicalDevice
    -> Ptr VkDeviceCreateInfo
       -> Ptr VkAllocationCallbacks -> Ptr VkDevice -> IO Word32

Reduce duplication
Open

        i1 = indices VG.! (i * 3)
Severity: Minor
Found in flaw-visual/Flaw/Visual/Geometry/Simplification.hs by hlint

Found

i1 = indices VG.! (i * 3)
i2 = indices VG.! (i * 3 + 1)
i3 = indices VG.! (i * 3 + 2)

Perhaps

Combine with flaw-visual/Flaw/Visual/Geometry/Simplification.hs:200:11

Reduce duplication
Open

      p <- VGM.unsafeRead pairHeap i
Severity: Minor
Found in flaw-visual/Flaw/Visual/Geometry/Simplification.hs by hlint

Found

p <- VGM.unsafeRead pairHeap i
let m = (i - 1) `quot` 2
mp <- VGM.unsafeRead pairHeap m

Perhaps

Combine with flaw-visual/Flaw/Visual/Geometry/Simplification.hs:327:9

Use camelCase
Open

hb_y_advance p = advancePtr (castPtr p) 1
Severity: Minor
Found in flaw-font-fhi/Flaw/Graphics/Font/Harfbuzz.hs by hlint

Found

hb_y_advance p = ...

Perhaps

hbYAdvance p = ...

Redundant bracket
Open

registerBasicOrdEntityType :: EntityManager -> EntityTypeId -> (GetEntity SomeBasicOrdEntity) -> IO ()
Severity: Minor
Found in flaw-editor/Flaw/Editor/Entity.hs by hlint

Found

(GetEntity SomeBasicOrdEntity) -> IO ()

Perhaps

GetEntity SomeBasicOrdEntity -> IO ()

Use camelCase
Open

hb_y_offset :: Ptr Hb_glyph_position_t -> Ptr Hb_position_t
Severity: Minor
Found in flaw-font-fhi/Flaw/Graphics/Font/Harfbuzz.hs by hlint

Found

hb_y_offset :: Ptr Hb_glyph_position_t -> Ptr Hb_position_t

Perhaps

hbYOffset :: Ptr Hb_glyph_position_t -> Ptr Hb_position_t

Redundant $
Open

        , funD 'S.get [clause [] (normalB $ doE $ map (\a -> bindS (varP a) [| S.get |]) as ++ [noBindS $ [| return $(foldl appE (conE conName) $ map varE as) |] ]) []]
Severity: Minor
Found in flaw-math/Flaw/Math.hs by hlint

Found

noBindS $ [| return $( foldl appE (conE conName) $ map varE as ) |]

Perhaps

noBindS [| return $( foldl appE (conE conName) $ map varE as ) |]

Use camelCase
Open

type FN_vkReallocationFunction = Ptr () -> Ptr () -> CSize -> CSize -> VkSystemAllocationScope -> IO (Ptr ())
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkReallocationFunction =
    Ptr ()
    -> Ptr ()
       -> CSize -> CSize -> VkSystemAllocationScope -> IO (Ptr ())

Perhaps

type FNVkReallocationFunction =
    Ptr ()
    -> Ptr ()
       -> CSize -> CSize -> VkSystemAllocationScope -> IO (Ptr ())

Use camelCase
Open

type FN_vkGetDeviceProcAddr
  =  VkDevice
  -> Ptr CChar
  -> IO (FunPtr (IO ()))
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkGetDeviceProcAddr =
    VkDevice -> Ptr CChar -> IO (FunPtr (IO ()))

Perhaps

type FNVkGetDeviceProcAddr =
    VkDevice -> Ptr CChar -> IO (FunPtr (IO ()))

Use camelCase
Open

type FN_vkCreateImageView
  =  VkDevice
  -> Ptr VkImageViewCreateInfo
  -> Ptr VkAllocationCallbacks
  -> Ptr VkImageView
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkCreateImageView =
    VkDevice
    -> Ptr VkImageViewCreateInfo
       -> Ptr VkAllocationCallbacks -> Ptr VkImageView -> IO Word32

Perhaps

type FNVkCreateImageView =
    VkDevice
    -> Ptr VkImageViewCreateInfo
       -> Ptr VkAllocationCallbacks -> Ptr VkImageView -> IO Word32

Use camelCase
Open

type FN_vkCreateComputePipelines
  =  VkDevice
  -> VkPipelineCache
  -> Word32
  -> Ptr VkComputePipelineCreateInfo
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkCreateComputePipelines =
    VkDevice
    -> VkPipelineCache
       -> Word32
          -> Ptr VkComputePipelineCreateInfo
             -> Ptr VkAllocationCallbacks -> Ptr VkPipeline -> IO Word32

Perhaps

type FNVkCreateComputePipelines =
    VkDevice
    -> VkPipelineCache
       -> Word32
          -> Ptr VkComputePipelineCreateInfo
             -> Ptr VkAllocationCallbacks -> Ptr VkPipeline -> IO Word32

Use camelCase
Open

type FN_vkInternalFreeNotification = Ptr () -> CSize -> VkInternalAllocationType -> VkSystemAllocationScope -> IO ()
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkInternalFreeNotification =
    Ptr ()
    -> CSize
       -> VkInternalAllocationType -> VkSystemAllocationScope -> IO ()

Perhaps

type FNVkInternalFreeNotification =
    Ptr ()
    -> CSize
       -> VkInternalAllocationType -> VkSystemAllocationScope -> IO ()

Use camelCase
Open

type FN_vkGetPhysicalDeviceQueueFamilyProperties
  =  VkPhysicalDevice
  -> Ptr Word32
  -> Ptr VkQueueFamilyProperties
  -> IO ()
Severity: Minor
Found in flaw-vulkan/Flaw/Graphics/Vulkan/FFI.hs by hlint

Found

type FN_vkGetPhysicalDeviceQueueFamilyProperties =
    VkPhysicalDevice
    -> Ptr Word32 -> Ptr VkQueueFamilyProperties -> IO ()

Perhaps

type FNVkGetPhysicalDeviceQueueFamilyProperties =
    VkPhysicalDevice
    -> Ptr Word32 -> Ptr VkQueueFamilyProperties -> IO ()
Severity
Category
Status
Source
Language