1TYPEMAP 2heap T_PTROBJ_HEAP 3 4INPUT 5T_PTROBJ_HEAP 6 $var = C_HEAP($arg, \"$var\"); 7 8OUTPUT 9T_PTROBJ_HEAP 10 sv_setref_pv($arg, \"Heap::Simple::XS\", (void*)$var); 11