diff --git a/src/HieDb/Create.hs b/src/HieDb/Create.hs index 08f57e0..2539519 100644 --- a/src/HieDb/Create.hs +++ b/src/HieDb/Create.hs @@ -358,7 +358,7 @@ addRefsFromLoaded_unsafe AstInfo refsGen declsGen importsGen = genAstInfo path smod GeneratedInfo refmapGeneratedOnly unless (skipRefs skipOptions) $ do - executeMany conn "INSERT INTO refs VALUES (?,?,?,?,?,?,?,?)" (refsSrc <> refsGen) + executeMany conn "INSERT INTO refs VALUES (?,?,?,?,?,?,?,?,?)" (refsSrc <> refsGen) unless (skipDecls skipOptions) $ do executeMany conn "INSERT INTO decls VALUES (?,?,?,?,?,?,?)" (declsSrc <> declsGen) unless (skipImports skipOptions) $ do