1 files changed, 1 insertions, 1 deletions
diff --git a/sv.c b/sv.c
index c2c1cc03d0..4e75506baf 100644
--- a/sv.c
+++ b/sv.c
@@ -4369,7 +4369,7 @@ Perl_sv_clear(pTHX_ register SV *sv)
 
     if (SvOBJECT(sv)) {
 	if (PL_defstash) {		/* Still have a symbol table? */
-	    djSP;
+	    dSP;
 	    CV* destructor;
 	    SV tmpref;