Fix build compatibility with modern Perl and raylib

XS/Makefile.PL

@@ -39,10 +39,9 @@ if  (eval {require ExtUtils::Constant; 1}) {
   # you will need to use the generated const-c.inc and const-xs.inc
   # files to replace their "fallback" counterparts before distributing your
   # changes.
-  my @names = (qw(DEG2RAD FormatText LOC_MAP_DIFFUSE LOC_MAP_SPECULAR
+  my @names = (qw(DEG2RAD LOC_MAP_DIFFUSE LOC_MAP_SPECULAR
 		 MAP_DIFFUSE MAP_SPECULAR MAX_MATERIAL_MAPS
-		 MAX_SHADER_LOCATIONS MAX_TOUCH_POINTS RAD2DEG ShowWindow
-		 SubText),
+		 MAX_SHADER_LOCATIONS MAX_TOUCH_POINTS RAD2DEG),
               {name=>"BLEND_ADDITIVE", macro=>"1"},
               {name=>"BLEND_ALPHA", macro=>"1"},
               {name=>"BLEND_MULTIPLIED", macro=>"1"},

XS/XS.xs

@@ -12,6 +12,8 @@
 
 MODULE = Graphics::Raylib::XS		PACKAGE = Graphics::Raylib::XS		
 
+PROTOTYPES: DISABLE
+
 INCLUDE: const-xs.inc
 
 void
@@ -1918,3 +1920,27 @@ UpdateTextureFromImage(texture, image)
 	Image image
   CODE:
 	UpdateTexture(texture, GetImageData(image));
+
+# Function pointer exports for compatibility
+# These are function pointers in modern raylib, exported as integer addresses
+
+IV
+FormatText()
+  CODE:
+    RETVAL = (IV)FormatText;
+  OUTPUT:
+    RETVAL
+
+IV
+ShowWindow()
+  CODE:
+    RETVAL = (IV)ShowWindow;
+  OUTPUT:
+    RETVAL
+
+IV
+SubText()
+  CODE:
+    RETVAL = (IV)SubText;
+  OUTPUT:
+    RETVAL

lib/Graphics/Raylib/Key.pm

@@ -148,3 +148,15 @@ sub tonum {
     my $self = shift;
     return $self->keycode;
 }
+
+=head1 NAME
+
+Graphics::Raylib::Key - Keyboard Key class
+
+=head1 DESCRIPTION
+
+This module provides a class for handling keyboard keys in Graphics::Raylib.
+
+=cut
+
+1;