Skip to content

Auto-generate Version_libclang_bindings module #2

Auto-generate Version_libclang_bindings module

Auto-generate Version_libclang_bindings module #2

Triggered via pull request November 20, 2025 10:12
Status Failure
Total duration 13s
Artifacts

check-hlint.yml

on: pull_request
Fit to window
Zoom out
Zoom in

Annotations

2 errors and 10 warnings
HLint
HLint failed with status: 1. Error (1), Warning (6), Suggestion (395)
HLint: src/Clang/Internal/ByValue.hs#L179
Error: Parse error: src/Clang/Internal/ByValue.hs:179:11: error: [GHC-72516] Parse error in pattern: #w1 ▫︎ Found: " -> IO (a, b)\n mkByteArray (I# sz) wrap fill = IO $ \\w0 ->\n> let !(# w1, arr #) = newPinnedByteArray# sz w0\n !(# w2, b #) = unIO (fill arr) w1\n !(# w3, arr' #) = unsafeFreezeByteArray# arr w2\n"
HLint: src/Clang/HighLevel/Diagnostics.hs#L110
Suggestion in clang_getDiagnostics in module Clang.HighLevel.Diagnostics: Replace case with maybe ▫︎ Found: "case mDisplayOptions of\n Just displayOptions -> return displayOptions\n Nothing -> clang_defaultDiagnosticDisplayOptions" ▫︎ Perhaps: "maybe clang_defaultDiagnosticDisplayOptions return mDisplayOptions"
HLint: src/Clang/HighLevel/Diagnostics.hs#L109
Suggestion in clang_getDiagnostics in module Clang.HighLevel.Diagnostics: Use camelCase ▫︎ Found: "clang_getDiagnostics unit mDisplayOptions = ..." ▫︎ Perhaps: "clangGetDiagnostics unit mDisplayOptions = ..."
HLint: src/Clang/HighLevel/Diagnostics.hs#L101
Suggestion in clang_getDiagnostics in module Clang.HighLevel.Diagnostics: Use camelCase ▫︎ Found: "clang_getDiagnostics ::\n MonadIO m =>\n CXTranslationUnit\n -> Maybe (BitfieldEnum CXDiagnosticDisplayOptions)\n -> m [Diagnostic]" ▫︎ Perhaps: "clangGetDiagnostics ::\n MonadIO m =>\n CXTranslationUnit\n -> Maybe (BitfieldEnum CXDiagnosticDisplayOptions)\n -> m [Diagnostic]"
HLint: src/Clang/Version.hs#L133
Suggestion in clang_getClangVersion in module Clang.Version: Redundant $ ▫︎ Found: "preallocate_ $ wrap_getClangVersion" ▫︎ Perhaps: "preallocate_ wrap_getClangVersion"
HLint: src/Clang/Version.hs#L133
Suggestion in clang_getClangVersion in module Clang.Version: Use camelCase ▫︎ Found: "clang_getClangVersion = ..." ▫︎ Perhaps: "clangGetClangVersion = ..."
HLint: src/Clang/Version.hs#L132
Suggestion in clang_getClangVersion in module Clang.Version: Use camelCase ▫︎ Found: "clang_getClangVersion :: MonadIO m => m Text" ▫︎ Perhaps: "clangGetClangVersion :: MonadIO m => m Text"
HLint: src/Clang/Version.hs#L93
Warning in parseClangVersion in module Clang.Version: Use isDigit ▫︎ Found: "c >= '0' && c <= '9'" ▫︎ Perhaps: "isDigit c"
HLint: src/Clang/Version.hs#L87
Warning in parseClangVersion in module Clang.Version: Fuse mapMaybe/map ▫︎ Found: "mapMaybe exactlyThree\n . map (splitOn '.' . takeWhile isPartOfVersionProper) . words" ▫︎ Perhaps: "mapMaybe\n (exactlyThree . splitOn '.' . takeWhile isPartOfVersionProper)\n . words"
HLint: src/Clang/Version.hs#L85
Suggestion in parseClangVersion in module Clang.Version: Use <=< ▫︎ Found: "(>>= readParts)\n . listToMaybe\n . mapMaybe exactlyThree\n . map (splitOn '.' . takeWhile isPartOfVersionProper) . words" ▫︎ Perhaps: "(readParts\n Control.Monad.<=<\n (listToMaybe\n . mapMaybe exactlyThree\n . map (splitOn '.' . takeWhile isPartOfVersionProper) . words))"
HLint: src/Clang/Version.hs#L67
Warning in clangVersion in module Clang.Version: Missing NOINLINE pragma ▫︎ Found: "clangVersion\n = unsafePerformIO $ parseClangVersion <$> clang_getClangVersion" ▫︎ Perhaps: "{-# NOINLINE clangVersion #-}\nclangVersion\n = unsafePerformIO $ parseClangVersion <$> clang_getClangVersion"