diff --git a/XS/Makefile.PL b/XS/Makefile.PL index 1755931..59d3a84 100644 --- a/XS/Makefile.PL +++ b/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"}, diff --git a/XS/XS.xs b/XS/XS.xs index df8e29a..1e2acf4 100644 --- a/XS/XS.xs +++ b/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 diff --git a/lib/Graphics/Raylib/Key.pm b/lib/Graphics/Raylib/Key.pm index b9d7997..b4c2ec1 100644 --- a/lib/Graphics/Raylib/Key.pm +++ b/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;