diff options
| author | John P. Linderman <jpl@research.att.com> | 2007-03-27 08:33:39 -0400 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-03-28 08:43:10 +0000 |
| commit | fd061412c8b2788b74d7b7850b97a2b1bcb19bc0 (patch) | |
| tree | c1ff5e589d650cc0c03188be7e16706ece4feb55 /pod/perlguts.pod | |
| parent | 19a94d75aea23d860dc398284bf0810d3e2bbfa2 (diff) | |
| download | perl-fd061412c8b2788b74d7b7850b97a2b1bcb19bc0.tar.gz | |
: perlguts.pod
From: "John P. Linderman" <jpl@research.att.com>
Message-Id: <200703271633.l2RGXd3u3443680@raptor.research.att.com>
p4raw-id: //depot/perl@30775
Diffstat (limited to 'pod/perlguts.pod')
| -rw-r--r-- | pod/perlguts.pod | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/pod/perlguts.pod b/pod/perlguts.pod index 3a40e683b2..e1b3809d84 100644 --- a/pod/perlguts.pod +++ b/pod/perlguts.pod @@ -2056,9 +2056,9 @@ your Foo.xs: #include "perl.h" #include "XSUB.h" - static my_private_function(int arg1, int arg2); + STATIC void my_private_function(int arg1, int arg2); - static SV * + STATIC void my_private_function(int arg1, int arg2) { dTHX; /* fetch context */ @@ -2096,9 +2096,9 @@ the Perl guts: #include "XSUB.h" /* pTHX_ only needed for functions that call Perl API */ - static my_private_function(pTHX_ int arg1, int arg2); + STATIC void my_private_function(pTHX_ int arg1, int arg2); - static SV * + STATIC void my_private_function(pTHX_ int arg1, int arg2) { /* dTHX; not needed here, because THX is an argument */ |