1 files changed, 5 insertions, 0 deletions
diff --git a/reentr.pl b/reentr.pl
index ddbfab36f1..8bed03c7ab 100644
--- a/reentr.pl
+++ b/reentr.pl
@@ -857,6 +857,11 @@ Perl_reentrant_retry(const char *f, ...)
     dTHX;
     void *retptr = NULL;
     va_list ap;
+#ifdef USE_REENTRANT_API
+    /* Easier to special case this here than in embed.pl. (Look at what it
+       generates for proto.h) */
+    PERL_ARGS_ASSERT_REENTRANT_RETRY;
+#endif
     va_start(ap, f);
     {
 #ifdef USE_REENTRANT_API