From 94810222866b7cc36bf442993826f9b38dbe9c41 Mon Sep 17 00:00:00 2001 From: Aaron Griffin Date: Sun, 15 Oct 2006 19:38:02 +0000 Subject: Final frugalware changes commit --- bindings/perl/alpm.i | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 bindings/perl/alpm.i (limited to 'bindings/perl/alpm.i') diff --git a/bindings/perl/alpm.i b/bindings/perl/alpm.i new file mode 100644 index 00000000..dc4d680e --- /dev/null +++ b/bindings/perl/alpm.i @@ -0,0 +1,23 @@ +#if defined(SWIGPERL) +%module "Alpm::Core" +#else +%module alpm +#endif +%include "cpointer.i" + +/* Wrap a class interface around a "long *" */ +%pointer_class(long, longp); + +/* Create casting functions */ + +%pointer_cast(char *, long *, void_to_long); +%pointer_cast(void *, char *, void_to_char); +%pointer_cast(void *, unsigned long, void_to_unsigned_long); +%pointer_cast(void *, PM_LIST *, void_to_PM_LIST); +%pointer_cast(void *, PM_PKG *, void_to_PM_PKG); +%pointer_cast(void *, PM_GRP *, void_to_PM_GRP); +%pointer_cast(void *, PM_SYNCPKG *, void_to_PM_SYNCPKG); +%pointer_cast(void *, PM_DB *, void_to_PM_DB); +%pointer_cast(void *, PM_CONFLICT *, void_to_PM_CONFLICT); + +%include "alpm.h" -- cgit v1.2.3-54-g00ecf