1 # 2 # Copyright (c) 2004, Oracle and/or its affiliates. All rights reserved. 3 # 4 5 TYPEMAP 6 const char * T_PV 7 const char ** T_PV 8 priv_op_t T_IV 9 boolean_t T_IV 10 uint_t T_IV 11 sysret T_SYSRET 12 Sun::Solaris::Privilege::Privset * T_PTROBJ 13 14 INPUT 15 16 OUTPUT 17 # 18 # System call return. 19 # 20 T_SYSRET 21 { 22 if ($var != -1) { 23 if ($var == 0) 24 sv_setpvn($arg, "0 but true", 10); 25 else 26 sv_setiv($arg, (IV)$var); 27 } 28 }