Comment out some more free() calls, which need to be turned on per-subsystem to weed...
authorDuke Leto <jonathan@leto.net>
Mon, 17 May 2010 21:51:28 +0000 (17 14:51 -0700)
committerDuke Leto <jonathan@leto.net>
Mon, 17 May 2010 21:51:28 +0000 (17 14:51 -0700)
swig/gsl_typemaps.i

index 3827fef..09bdb7b 100644 (file)
 }
 
 %typemap(freearg) float [] {
-    if ($1) free(((char*)$1)-sizeof(struct perl_array));
+    // if ($1) free(((char*)$1)-sizeof(struct perl_array));
 }
 
-%apply float const [] { 
+%apply float const [] {
     float *C
 };
 
 }
 
 %typemap(freearg) size_t const [] {
-        if ($1) free($1);
+      //  if ($1) free($1);
 }
 
 %apply double const [] {