diff options
| author | Theo Schlossnagle <jesus@omniti.com> | 2012-09-08 13:51:40 -0400 |
|---|---|---|
| committer | Theo Schlossnagle <jesus@omniti.com> | 2012-09-08 13:51:40 -0400 |
| commit | a713f2641820ce9f50418e0b6b77029c3c7ce8f0 (patch) | |
| tree | c1ad28f1c9b8385904da8caed595d3b9c444ce7e /usr/src/cmd/perl | |
| parent | 85cef32287385c37e36e9d7835bf8f9654e96c06 (diff) | |
| download | illumos-joyent-a713f2641820ce9f50418e0b6b77029c3c7ce8f0.tar.gz | |
3165 Privilege.xs perform unsafe casting of priv_ptype_t to int
Reviewed by: Richard Lowe <richlowe@richlowe.net>
Approved by: Dan McDonald <danmcd@nexenta.com>
Diffstat (limited to 'usr/src/cmd/perl')
| -rw-r--r-- | usr/src/cmd/perl/contrib/Sun/Solaris/Privilege/Privilege.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/usr/src/cmd/perl/contrib/Sun/Solaris/Privilege/Privilege.xs b/usr/src/cmd/perl/contrib/Sun/Solaris/Privilege/Privilege.xs index aeeeb4a497..90289423d1 100644 --- a/usr/src/cmd/perl/contrib/Sun/Solaris/Privilege/Privilege.xs +++ b/usr/src/cmd/perl/contrib/Sun/Solaris/Privilege/Privilege.xs @@ -11,7 +11,7 @@ #include "perl.h" #include "XSUB.h" -#define IVCONST(s, c) newCONSTSUB(s, #c, newSViv((int)c)); +#define IVCONST(s, c) newCONSTSUB(s, #c, newSViv((int)(intptr_t)c)); #define POFF (sizeof ("PRIV_") - 1) #define RETPRIVSET(set) \ |