From 773013b8e45a6916a74ea64152e51fb6cb951920 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sun, 14 Nov 1999 23:09:15 +0000 Subject: no_comment --- perl-install/Newt/typemap | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) create mode 100644 perl-install/Newt/typemap (limited to 'perl-install/Newt/typemap') diff --git a/perl-install/Newt/typemap b/perl-install/Newt/typemap new file mode 100644 index 000000000..5aaa2f668 --- /dev/null +++ b/perl-install/Newt/typemap @@ -0,0 +1,25 @@ +TYPEMAP + +const char * T_PV +const void * T_PV +int * T_PV +void ** T_PACKED + +enum newtFlagsSense T_IV +enum newtGridElement T_IV +SV ** T_SV + +Newt::Component NewtComponent +Newt::Grid NewtGrid + +INPUT +NewtComponent + $var = ($type) SvIV((SV*)SvRV($arg)) +NewtGrid + $var = ($type) SvIV((SV*)SvRV($arg)) + +OUTPUT +NewtComponent + sv_setref_pv($arg, "Newt::Component", (void*) $var); +NewtGrid + sv_setref_pv($arg, "Newt::Grid", (void*) $var); -- cgit v1.2.1