diff --git a/src/kernel_internals/typing/cabs2cil.ml b/src/kernel_internals/typing/cabs2cil.ml index cccda3a9169be72d7c7d2202aec9827b2b477ada..5623a49326f7b2fa2c1af1c4c7cddec14c543e6f 100644 --- a/src/kernel_internals/typing/cabs2cil.ml +++ b/src/kernel_internals/typing/cabs2cil.ml @@ -7597,11 +7597,11 @@ and compileCondExp ~ghost ce st sf = match e.enode with | Const(CInt64(i,_,_)) when (not (Integer.equal i Integer.zero)) && canDrop sf -> - clean_up_chunk_locals sf; + full_clean_up_chunk_locals sf; se @@ (st, ghost) | Const(CInt64(z,_,_)) when (Integer.equal z Integer.zero) && canDrop st -> - clean_up_chunk_locals st; + full_clean_up_chunk_locals st; se @@ (sf, ghost) | _ -> (empty @@ (se, ghost)) @@ (ifChunk ~ghost e e.eloc st sf, ghost) end