diff options
Diffstat (limited to 'src/perl')
-rw-r--r-- | src/perl/ui/Formats.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/perl/ui/Formats.xs b/src/perl/ui/Formats.xs index 42376f8a..11a2951c 100644 --- a/src/perl/ui/Formats.xs +++ b/src/perl/ui/Formats.xs @@ -1,6 +1,6 @@ #include "module.h" -static int magic_free_text_dest(SV *sv, MAGIC *mg) +static int magic_free_text_dest(pTHX_ SV *sv, MAGIC *mg) { TEXT_DEST_REC *dest = (TEXT_DEST_REC *) mg->mg_ptr; g_free((char *) dest->target); |