author | Dan McDonald <danmcd@nexenta.com> |
Sat, 08 Sep 2012 13:50:33 -0400 | |
changeset 13868 | 273d7ae67113 |
parent 13867 | e05f5705283d |
child 13869 | ca8df0188218 |
usr/src/cmd/perl/contrib/Sun/Solaris/Privilege/Privilege.xs | file | annotate | diff | comparison | revisions |
--- a/usr/src/cmd/perl/contrib/Sun/Solaris/Privilege/Privilege.xs Sat Sep 08 13:45:24 2012 -0400 +++ b/usr/src/cmd/perl/contrib/Sun/Solaris/Privilege/Privilege.xs Sat Sep 08 13:50:33 2012 -0400 @@ -11,7 +11,7 @@ #include "perl.h" #include "XSUB.h" -#define IVCONST(s, c) newCONSTSUB(s, #c, newSViv((int)(intptr_t)c)); +#define IVCONST(s, c) newCONSTSUB(s, #c, newSViv((int)c)); #define POFF (sizeof ("PRIV_") - 1) #define RETPRIVSET(set) \