diff options
| author | rjray <devnull@localhost> | 2002-05-10 07:38:21 +0000 |
|---|---|---|
| committer | rjray <devnull@localhost> | 2002-05-10 07:38:21 +0000 |
| commit | 76c37b4c7634a086e152c4cb155e2a563fc2b74b (patch) | |
| tree | fa1134181b55f9584736c82390e0b8158f438fd6 /Perl-RPM | |
| parent | 5a5b62e9c14f51d430c11642e05d77052c223ee8 (diff) | |
| download | librpm-tizen-76c37b4c7634a086e152c4cb155e2a563fc2b74b.tar.gz librpm-tizen-76c37b4c7634a086e152c4cb155e2a563fc2b74b.tar.bz2 librpm-tizen-76c37b4c7634a086e152c4cb155e2a563fc2b74b.zip | |
Some casts to reduce compiler warnings on some systems.
CVS patchset: 5429
CVS date: 2002/05/10 07:38:21
Diffstat (limited to 'Perl-RPM')
| -rw-r--r-- | Perl-RPM/RPM/Error.xs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Perl-RPM/RPM/Error.xs b/Perl-RPM/RPM/Error.xs index 4be436bfd..9ff29b325 100644 --- a/Perl-RPM/RPM/Error.xs +++ b/Perl-RPM/RPM/Error.xs @@ -4,7 +4,7 @@ #include "RPM.h" -static char * const rcsid = "$Id: Error.xs,v 1.4 2002/04/11 23:07:01 rjray Exp $"; +static char * const rcsid = "$Id: Error.xs,v 1.5 2002/05/10 07:38:21 rjray Exp $"; static CV* err_callback; @@ -29,7 +29,7 @@ static void rpm_catch_errors(void) error_string = rpmErrorString(); /* Set the string part, first */ - sv_setsv(rpm_errSV, newSVpv(error_string, strlen(error_string))); + sv_setsv(rpm_errSV, newSVpv((char*)error_string, strlen(error_string))); /* Set the IV part */ sv_setiv(rpm_errSV, error_code); /* Doing that didn't erase the PV part, but it cleared the flag: */ @@ -44,7 +44,7 @@ static void rpm_catch_errors(void) SAVETMPS; PUSHMARK(sp); XPUSHs(sv_2mortal(newSViv(error_code))); - XPUSHs(sv_2mortal(newSVpv(error_string, strlen(error_string)))); + XPUSHs(sv_2mortal(newSVpv((char*)error_string, strlen(error_string)))); PUTBACK; /* The actual call */ |