/tags/rel-1.3.35/Lib/perl5/perlfragments.swg
Unknown | 23 lines | 16 code | 7 blank | 0 comment | 0 complexity | bc6aa728b636bf02c330a9278aadea0c MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
- /*
- Create a file with this name, 'perlfragments.swg', in your working
- directory and add all the %fragments you want to take precedence
- over the ones defined by default by swig.
- For example, if you add:
-
- %fragment(SWIG_AsVal_frag(int),"header") {
- SWIGINTERNINLINE int
- SWIG_AsVal(int)(PyObject *obj, int *val)
- {
- <your code here>;
- }
- }
-
- this will replace the code used to retrieve an integer value for all
- the typemaps that need it, including:
-
- int, std::vector<int>, std::list<std::pair<int,int> >, etc.
-
- */