summaryrefslogtreecommitdiffstats
path: root/perl-install/Newt/typemap
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-11-14 23:09:15 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-11-14 23:09:15 +0000
commit773013b8e45a6916a74ea64152e51fb6cb951920 (patch)
tree1fe018ccc96d5ddf11081ea8d57f263b3be6ae00 /perl-install/Newt/typemap
parent16caaa0fdfae2bdcec187bdffac3f12d7bb9a8a1 (diff)
downloaddrakx-773013b8e45a6916a74ea64152e51fb6cb951920.tar
drakx-773013b8e45a6916a74ea64152e51fb6cb951920.tar.gz
drakx-773013b8e45a6916a74ea64152e51fb6cb951920.tar.bz2
drakx-773013b8e45a6916a74ea64152e51fb6cb951920.tar.xz
drakx-773013b8e45a6916a74ea64152e51fb6cb951920.zip
no_comment
Diffstat (limited to 'perl-install/Newt/typemap')
-rw-r--r--perl-install/Newt/typemap25
1 files changed, 25 insertions, 0 deletions
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);