diff --git a/src/Juvix/Compiler/Concrete/Translation/ImportScanner/FlatParse.hs b/src/Juvix/Compiler/Concrete/Translation/ImportScanner/FlatParse.hs
index bee8afc2c7..7cedfec0b7 100644
--- a/src/Juvix/Compiler/Concrete/Translation/ImportScanner/FlatParse.hs
+++ b/src/Juvix/Compiler/Concrete/Translation/ImportScanner/FlatParse.hs
@@ -50,8 +50,8 @@ scanner fp bs = do
         allFileLocs :: [FileLoc]
         allFileLocs =
           [ FileLoc
-              { _locLine = Pos (fromIntegral l),
-                _locCol = Pos (fromIntegral c),
+              { _locLine = Pos (1 + fromIntegral l),
+                _locCol = Pos (1 + fromIntegral c),
                 _locOffset = Pos (fromIntegral p)
               }
             | (FP.Pos p, (l, c)) <- zipExact importsPositions (posLineCols bs importsPositions)