X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=dosish.h;h=59bf122859b977401daf3b2b92f88b4e382ed1fe;hb=a22f28a4268aa03ce2bafaf594271b8ff764a5f8;hp=0981137811de5106f40e2d160d7dddd873813fd0;hpb=e9a8c0991ec6634f51266c0ad53e02c328bc0761;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/dosish.h b/dosish.h
index 0981137..59bf122 100644
--- a/dosish.h
+++ b/dosish.h
@@ -26,7 +26,12 @@
 #  if (DJGPP==2 && DJGPP_MINOR < 2)
 #    define NO_LOCALECONV_MON_THOUSANDS_SEP
 #  endif
-#  define PERL_FS_VER_FMT	"%d_%d_%d"
+#  ifndef PERL_CORE
+#    define PERL_FS_VER_FMT	"%d_%d_%d"
+#  endif
+#  define PERL_FS_VERSION	STRINGIFY(PERL_REVISION) "_" \
+				STRINGIFY(PERL_VERSION) "_" \
+				STRINGIFY(PERL_SUBVERSION)
 #else	/* DJGPP */
 #  ifdef WIN32
 #    define PERL_SYS_INIT_BODY(c,v)					\