diff options
author | Father Chrysostomos <sprout@cpan.org> | 2016-08-12 08:31:43 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2016-08-12 08:39:46 -0700 |
commit | beb162121766004ac91b7bcb84a59a1402fe1634 (patch) | |
tree | 28ccf4675d6d977782013af4711508ad14b42f82 /pod/perlcall.pod | |
parent | e3f7a67e8485950fdf5fd9c7131d0a78b6c8cf32 (diff) | |
download | perl-beb162121766004ac91b7bcb84a59a1402fe1634.tar.gz |
perlcall: Remove redundant dSP
call_argv does not use a stack pointer. This example has had the
redundant dSP since perl 5.000, presumably due to copying and
pasting from another example.
Diffstat (limited to 'pod/perlcall.pod')
-rw-r--r-- | pod/perlcall.pod | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/pod/perlcall.pod b/pod/perlcall.pod index c41d835791..9a268aa4c1 100644 --- a/pod/perlcall.pod +++ b/pod/perlcall.pod @@ -1223,8 +1223,6 @@ I<PrintList>. static void call_PrintList() { - dSP; - call_argv("PrintList", G_DISCARD, words); } |