diff --git a/src/xpdev/genwrap.c b/src/xpdev/genwrap.c
index 20dfbae00d57902cd53da6e5b567585a31e4dce6..da72cb47063049bb53d7b247a1ad679e39709ecf 100644
--- a/src/xpdev/genwrap.c
+++ b/src/xpdev/genwrap.c
@@ -55,6 +55,20 @@
 
 #include "genwrap.h"	/* Verify prototypes */
 
+/****************************************************************************/
+/* Return last character of string											*/
+/****************************************************************************/
+char DLLCALL lastchar(const char* str)
+{
+	size_t	len;
+
+	len = strlen(str);
+
+	if(len)
+		return(str[len-1]);
+	return(0);
+}
+
 /****************************************************************************/
 /* Convert ASCIIZ string to upper case										*/
 /****************************************************************************/
diff --git a/src/xpdev/genwrap.h b/src/xpdev/genwrap.h
index 097630a13e1cc9695fa64af9ac0aa6065099d17d..b606dfe1b512eeb076ca6d0706d8f209e5e3da15 100644
--- a/src/xpdev/genwrap.h
+++ b/src/xpdev/genwrap.h
@@ -123,6 +123,8 @@ extern "C" {
 	#endif
 #endif
 
+DLLEXPORT char	DLLCALL	lastchar(const char* str);
+
 /****************************/
 /* Common Utility Functions */
 /****************************/