1 /* 2 3 Create a file with this name, 'perlfragments.swg', in your working 4 directory and add all the %fragments you want to take precedence 5 over the ones defined by default by swig. 6 7 For example, if you add: 8 9 %fragment(SWIG_AsVal_frag(int),"header") { 10 SWIGINTERNINLINE int 11 SWIG_AsVal(int)(PyObject *obj, int *val) 12 { 13 <your code here>; 14 } 15 } 16 17 this will replace the code used to retrieve an integer value for all 18 the typemaps that need it, including: 19 20 int, std::vector<int>, std::list<std::pair<int,int> >, etc. 21 22 23 */ 24