PERL_SIGNALS_UNSAFE_FLAG
#ifndef PERL_SIGNALS_UNSAFE_FLAG
#define PERL_SIGNALS_UNSAFE_FLAG 0x0001
__NEED_VAR__ U32 PL_signals = PERL_SIGNALS_UNSAFE_FLAG;
#endif
U32 get_PL_signals_1(void) { return PL_signals; }
extern U32 get_PL_signals_2(void); extern U32 get_PL_signals_3(void);
int compare_PL_signals() CODE: { U32 ref = get_PL_signals_1(); RETVAL = ref == get_PL_signals_2() && ref == get_PL_signals_3(); } OUTPUT: RETVAL
ok(Devel::PPPort::compare_PL_signals());
5 POD Errors
The following errors were encountered while parsing the POD:
- Around line 18:
Unknown directive: =provides
- Around line 22:
Unknown directive: =implementation
- Around line 32:
Unknown directive: =xsmisc
- Around line 42:
Unknown directive: =xsubs
- Around line 54:
Unknown directive: =tests