1 files changed, 5 insertions, 0 deletions
diff --git a/reentr.c b/reentr.c
index bae687679d..25fccf858b 100644
--- a/reentr.c
+++ b/reentr.c
@@ -314,6 +314,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