#

# Copyright (c) 2004, Oracle and/or its affiliates. All rights reserved.

#

TYPEMAP

const char * T_PV

const char ** T_PV

priv_op_t T_IV

boolean_t T_IV

uint_t T_IV

sysret T_SYSRET

Sun::Solaris::Privilege::Privset * T_PTROBJ

INPUT

OUTPUT

#

# System call return.

#

T_SYSRET

{

if ($var != -1) {

if ($var == 0)

sv_setpvn($arg, "0 but true", 10);

else

sv_setiv($arg, (IV)$var);

}

}