Make first for initializer loc non-synthetic

Author: sim642

src/frontc/cabs2cil.ml

@@ -6769,15 +6769,15 @@ and doStatement (s : A.statement) : chunk =
     | A.FOR(fc1,e2,e3,s,loc,eloc) -> begin
         let loc' = convLoc loc in
         let eloc' = convLoc eloc in
-        currentLoc := SynthetizeLoc.doLoc loc';
+        currentLoc := loc';
         currentExpLoc := SynthetizeLoc.doLoc eloc';
         enterScope (); (* Just in case we have a declaration *)
         let (se1, _, _) =
           match fc1 with
             FC_EXP e1 -> doExp false e1 ADrop
           | FC_DECL d1 -> (doDecl false d1, zero, voidType)
         in
-        let se1 = SynthetizeLoc.doChunkHead se1 in
+        let se1 = SynthetizeLoc.eDoChunkHead (SynthetizeLoc.doChunkTail se1) in
         let (se3, _, _) = doExp false e3 ADrop in
         let se3 = SynthetizeLoc.doChunkHead se3 in
         startLoop false;