diff --git a/src/EVM.hs b/src/EVM.hs
index 60eb88f14..e6cbfa2a3 100644
--- a/src/EVM.hs
+++ b/src/EVM.hs
@@ -2015,6 +2015,7 @@ delegateCall this gasGiven xTo xContext xValue xInOffset xInSize xOutOffset xOut
                     assign #returndata mempty
                     assign #calldata calldata
                     assign #overrideCaller Nothing
+                    assign #resetCaller False
                   continue xTo
 
 -- -- * Contract creation