return ret;
}
+static int magic_free(pTHX_ SV *sv, MAGIC *mg) {
+ lex_stuff_pvn("}", 1, 0);
++ /* fprintf(stderr, "!~ [%.*s]\n", (int)(PL_bufend - PL_bufptr), PL_bufptr); */
+ return 0;
+}
+
+static int magic_nop(pTHX_ SV *sv, MAGIC *mg) {
+ return 0;
+}
+
+static MGVTBL my_vtbl = {
+ 0, /* get */
+ 0, /* set */
+ 0, /* len */
+ 0, /* clear */
+ magic_free, /* free */
+ 0, /* copy */
+ 0, /* dup */
+ magic_nop /* local */
+};
+
WARNINGS_RESET
MODULE = Function::Parameters PACKAGE = Function::Parameters