fix: add back a leading slash removed by accident

TokTok · Jan 11, 2024 · f640e80 · f640e80
1 parent 18c438a
commit f640e80
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tools/check-c.hs b/tools/check-c.hs
@@ -42,7 +42,7 @@ main = do
     let (opts, rest) = partition (isPrefixOf "--") args
     let (cppOpts, files) = partition (isPrefixOf "-") rest
     let cc = Maybe.fromMaybe "clang" $ getFlag "--cc=" opts
-    let sysInclude = Maybe.fromMaybe "src/workspace/hs-tokstyle/include" $ getFlag "--include=" opts
+    let sysInclude = Maybe.fromMaybe "/src/workspace/hs-tokstyle/include" $ getFlag "--include=" opts
     result <- Par.mapM (processFile cc sysInclude cppOpts) files
     mapM_ (mapM_ (Text.hPutStrLn stderr) . snd) result
     unless (all fst result) $ exitWith (ExitFailure 1)