ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Guard/Guard.xs
(Generate patch)

Comparing Guard/Guard.xs (file contents):
Revision 1.9 by root, Sat Apr 11 04:42:29 2009 UTC vs.
Revision 1.10 by root, Sun Jul 19 04:43:47 2009 UTC

1#define PERL_NO_GET_CONTEXT 1#define PERL_NO_GET_CONTEXT
2 2
3#include "EXTERN.h" 3#include "EXTERN.h"
4#include "perl.h" 4#include "perl.h"
5#include "XSUB.h" 5#include "XSUB.h"
6
7#ifndef SvSTASH_set
8# define SvSTASH_set(x,a) SvSTASH(x) = (a)
9#endif
10
11#ifndef PERL_MAGIC_ext
12# define PERL_MAGIC_ext '~'
13#endif
6 14
7static HV *guard_stash; 15static HV *guard_stash;
8 16
9static SV * 17static SV *
10guard_get_cv (pTHX_ SV *cb_sv) 18guard_get_cv (pTHX_ SV *cb_sv)

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines