Perl and OpenBsd

I am currently patching Perl. Here is something I found in reentr.inc
Waiting to go to OpenCon :)

/*
* As of OpenBSD 3.7, reentrant functions are now working, they just are
* incompatible with everyone else. To make OpenBSD happy, we have to
* memzero out certain structures before calling the functions.
*/
#if defined(__OpenBSD__)
# define REENTR_MEMZERO(a,b) memzero(a,b)
#else
# define REENTR_MEMZERO(a,b) 0
#endif

# Must make OpenBSD happy
my $memzero = '';