Changeset 06e04a9 for perlconfig.c

Timestamp:

Feb 19, 2013, 8:28:55 PM (11 years ago)

Author:

David Benjamin <davidben@mit.edu>

Branches:

master, release-1.10

Children:

353719a

Parents:

6a20996

git-author:

Adam Glasgall <adam@crossproduct.net> (07/20/11 00:04:42)

git-committer:

David Benjamin <davidben@mit.edu> (02/19/13 20:28:55)

Message:

perlvariables - iteration N

Later commits reworked a lot of this, but the use of GValue over void*
was kept.

File:

• perlconfig.c (modified) (1 diff)

perlconfig.c

@@ -559 +559 @@
   SvREFCNT_dec(v);
 }
+
+void owl_perl_delete_perl_variable(owl_variable *variable, void *data)
+{
+  g_closure_unref(variable->delete_fn);
+  variable->delete_fn = NULL;
+  SvREFCNT_dec((SV*)data);
+  owl_variable_delete(variable);
+}