Репозиторий Sisyphus
Последнее обновление: 1 октября 2023 | Пакетов: 18631 | Посещений: 37759341
en ru br
Репозитории ALT

Группа :: Разработка/Perl
Пакет: perl-EV-ADNS

 Главная   Изменения   Спек   Патчи   Sources   Загрузить   Gear   Bugs and FR  Repocop 

Патч: EV-ADNS-2.2-alt-gcc_warnings_fix.patch
Скачать


Fix compilation warnings
--- ADNS.xs
+++ ADNS.xs
@@ -219,7 +219,7 @@ process (adns_state ads)
                 break;
 
               case adns_r_unknown:
-                sv = newSVpvn (a->rrs.byteblock [i].data, a->rrs.byteblock [i].len);
+                sv = newSVpvn ((const char * const) a->rrs.byteblock [i].data, a->rrs.byteblock [i].len);
                 break;
 
               default:
@@ -485,6 +485,7 @@ void DESTROY (SV *req)
         cancel = 1
 	CODE:
 {
+        PERL_UNUSED_VAR (ix);
         struct ctx *c;
 
         if (!(SvROK (req) && SvOBJECT (SvRV (req))
 
дизайн и разработка: Vladimir Lettiev aka crux © 2004-2005, Andrew Avramenko aka liks © 2007-2008
текущий майнтейнер: Michael Shigorin