zap unnecessary SvGETMAGIC (thanks @sisyphus)

ingydotnet · May 4, 2019 · fc7cc5b · fc7cc5b
1 parent cad7b4e
commit fc7cc5b
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 2 deletions.
diff --git a/doc/Inline/C/Cookbook.swim b/doc/Inline/C/Cookbook.swim
@@ -343,7 +343,6 @@ How do I pass a variable-sized list of arguments to an Inline C function?
     SV *sum(SV *array) {
         int total = 0;
         int numelts, i;
-        SvGETMAGIC(array);
         if ((!SvROK(array))
             || (SvTYPE(SvRV(array)) != SVt_PVAV)
             || ((numelts = av_len((AV *)SvRV(array))) < 0)

diff --git a/test/29refargs.t b/test/29refargs.t
@@ -9,7 +9,6 @@ my $c_text = <<'EOC';
 SV *sum(SV *array) {
     int total = 0;
     int numelts, i;
-    SvGETMAGIC(array);
     if ((!SvROK(array))
         || (SvTYPE(SvRV(array)) != SVt_PVAV)
         || ((numelts = av_len((AV *)SvRV(array))) < 0)