If you return void from a filter subroutine, the caller's status is

[perl5.git] / unixish.h

diff --git a/unixish.h b/unixish.h
index 23b3cad..f464d83 100644 (file)
--- a/unixish.h
+++ b/unixish.h
@@ -131,7 +131,7 @@
 #endif
 
 #ifndef PERL_SYS_TERM
-#define PERL_SYS_TERM()                OP_REFCNT_TERM; MALLOC_TERM
+#define PERL_SYS_TERM()                HINTS_REFCNT_TERM; OP_REFCNT_TERM; MALLOC_TERM
 #endif
 
 #define BIT_BUCKET "/dev/null"