From: Yitzchak Scott-Thoennes <sthoenna@efn.org>
Date: Wed, 21 Sep 2005 18:45:56 +0000 (-0700)
Subject: quiet a few warnings
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ec1aec95445a95d039a6c0ba6bc5dca901f81175;p=p5sagit%2Fp5-mst-13.2.git

quiet a few warnings
Message-ID: <20050922014555.GA2852@efn.org>

p4raw-id: //depot/perl@25586
---

diff --git a/cygwin/cygwin.c b/cygwin/cygwin.c
index 21f3b34..03f48dd 100644
--- a/cygwin/cygwin.c
+++ b/cygwin/cygwin.c
@@ -23,8 +23,8 @@ do_spawnvp (const char *path, const char * const *argv)
     Sigsave_t ihand,qhand;
     int childpid, result, status;
 
-    rsignal_save(SIGINT, SIG_IGN, &ihand);
-    rsignal_save(SIGQUIT, SIG_IGN, &qhand);
+    rsignal_save(SIGINT, (Sighandler_t) SIG_IGN, &ihand);
+    rsignal_save(SIGQUIT, (Sighandler_t) SIG_IGN, &qhand);
     childpid = spawnvp(_P_NOWAIT,path,argv);
     if (childpid < 0) {
 	status = -1;
diff --git a/embed.fnc b/embed.fnc
index 3fd0ec0..0903c89 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -884,7 +884,7 @@ p	|int	|yyparse
 p	|int	|yywarn		|NN const char* s
 #if defined(MYMALLOC)
 Ap	|void	|dump_mstats	|NN char* s
-ApR	|int	|get_mstats	|NN perl_mstats_t *buf|int buflen|int level
+Ap	|int	|get_mstats	|NN perl_mstats_t *buf|int buflen|int level
 #endif
 Anpa	|Malloc_t|safesysmalloc	|MEM_SIZE nbytes
 Anpa	|Malloc_t|safesyscalloc	|MEM_SIZE elements|MEM_SIZE size
diff --git a/proto.h b/proto.h
index b7d8918..cc4b7db 100644
--- a/proto.h
+++ b/proto.h
@@ -2398,7 +2398,6 @@ PERL_CALLCONV void	Perl_dump_mstats(pTHX_ char* s)
 			__attribute__nonnull__(pTHX_1);
 
 PERL_CALLCONV int	Perl_get_mstats(pTHX_ perl_mstats_t *buf, int buflen, int level)
-			__attribute__warn_unused_result__
 			__attribute__nonnull__(pTHX_1);
 
 #endif