Make sure pTHX is available for sterror

Leont · Jul 17, 2012 · ac13e28 · ac13e28
1 parent a854e89
commit ac13e28
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/Changes b/Changes
@@ -2,6 +2,7 @@ Revision history for File-Map
 
 {{$NEXT}}
           It's called HAS_STRERROR_R and not HAVE_STRERROR_R
+          Make sure pTHX is available for sterror (5.8.7 compatibility)
 
 0.51      2012-06-13 21:06:41 Europe/Amsterdam
           Remove threads.pm from dependencies

diff --git a/lib/File/Map.xs b/lib/File/Map.xs
@@ -130,7 +130,7 @@ static const struct {
 
 #else
 
-static void get_sys_error(char* buffer, size_t buffer_size) {
+static void S_get_sys_error(pTHX_ char* buffer, size_t buffer_size) {
 #ifdef HAS_STRERROR_R
 #	if STRERROR_R_PROTO == REENTRANT_PROTO_B_IBW
 	const char* message = strerror_r(errno, buffer, buffer_size);
@@ -145,6 +145,7 @@ static void get_sys_error(char* buffer, size_t buffer_size) {
 	buffer[buffer_size - 1] = '\0';
 #endif
 }
+#define get_sys_error(buffer, buffer_size) S_get_sys_error(aTHX_ buffer, buffer_size)
 
 static size_t page_size() {
 	static size_t pagesize = 0;