<pre style='margin:0'>
Ryan Schmidt (ryandesign) pushed a commit to branch master
in repository macports-ports.

</pre>
<p><a href="https://github.com/macports/macports-ports/commit/2f4ab6aba65ef96824d797315da336d5e87a8e65">https://github.com/macports/macports-ports/commit/2f4ab6aba65ef96824d797315da336d5e87a8e65</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 2f4ab6aba65ef96824d797315da336d5e87a8e65
</span>Author: Ryan Schmidt <ryandesign@macports.org>
AuthorDate: Wed Jan 26 02:55:57 2022 -0600

<span style='display:block; white-space:pre;color:#404040;'>    p5-sdl: Fix implicit declaration of function
</span>---
 perl/p5-sdl/Portfile             |  3 ++-
 perl/p5-sdl/files/implicit.patch | 35 +++++++++++++++++++++++++++++++++++
 2 files changed, 37 insertions(+), 1 deletion(-)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/perl/p5-sdl/Portfile b/perl/p5-sdl/Portfile
</span><span style='display:block; white-space:pre;color:#808080;'>index 5ec3db25dda..fca022575a1 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/perl/p5-sdl/Portfile
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/perl/p5-sdl/Portfile
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -11,7 +11,6 @@ categories-append   devel
</span> description         Simple DirectMedia Layer for Perl
 long_description    ${description}
 homepage            http://sdl.perl.org/
<span style='display:block; white-space:pre;background:#ffe0e0;'>-platforms           darwin
</span> 
 checksums           rmd160  ce525b44414aa8abf302ccba0172cc1c2872f6f2 \
                     sha256  252a192bfa9c2070a4883707d139c3a45d9c4518ccd66a1e699b5b7959bd4fb5 \
<span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -26,6 +25,8 @@ if {${perl5.major} != ""} {
</span>                     port:p${perl5.major}-tie-simple \
                     port:p${perl5.major}-yaml
 
<span style='display:block; white-space:pre;background:#e0ffe0;'>+    patchfiles      implicit.patch
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span>     post-patch {
         reinplace "s|gcc|${configure.cc} [get_canonical_archflags]|g" \
             MacOSX/Makefile.test \
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/perl/p5-sdl/files/implicit.patch b/perl/p5-sdl/files/implicit.patch
</span>new file mode 100644
<span style='display:block; white-space:pre;color:#808080;'>index 00000000000..bf22d88b3ac
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>--- /dev/null
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/perl/p5-sdl/files/implicit.patch
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -0,0 +1,35 @@
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+Fix:
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+lib/SDLx/Surface.xs:25:25: error: implicit declaration of function '_calc_offset' is invalid in C99 [-Werror,-Wimplicit-function-declaration]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+https://github.com/PerlGameDev/SDL/pull/299
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+--- src/SDLx/Surface.xs.orig       2018-05-19 05:55:52.000000000 -0500
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++++ src/SDLx/Surface.xs    2022-01-26 02:50:53.000000000 -0600
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+@@ -16,6 +16,14 @@
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ #include <SDL_gfxPrimitives.h>
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ #endif
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++int _calc_offset ( SDL_Surface* surface, int x, int y )
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++{
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++    int offset;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++    offset  = (surface->pitch * y) / surface->format->BytesPerPixel;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++    offset += x;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++    return offset;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>++
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ SV * get_pixel32 (SDL_Surface *surface, int x, int y)
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+     /* Convert the pixels to 32 bit  */
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+@@ -52,14 +60,6 @@
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+     return newRV_noinc((SV *)matrix);
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ }
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ 
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-int _calc_offset ( SDL_Surface* surface, int x, int y )
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-{
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-    int offset;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-    offset  = (surface->pitch * y) / surface->format->BytesPerPixel;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-    offset += x;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-    return offset;
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ unsigned int _get_pixel(SDL_Surface * surface, int offset)
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+     unsigned int value;
</span></pre><pre style='margin:0'>

</pre>