/*
* A set of definitions for C source code control systems, to provide accurate
* and definitive version information to the VM. This file identifies the
* platform plugin code, which is shared between Cog and the trunk interpreter.
* It is included by platforms/Cross/vm/sqSCCSVersion.h.
*
* Currently instantiated only for Subversion. Please add definitions for
* other repositories as appropriate.
*/
#if SUBVERSION
static char SvnRawPluginsRevisionString[] = "$Rev: 3005 $";
# define PLUGINS_REV_START (SvnRawPluginsRevisionString + 6)
static char SvnRawPluginsRepositoryURL[] = "$URL: http://squeakvm.org/svn/squeak/trunk/platforms/Cross/plugins/sqPluginsSCCSVersion.h $";
# define URL_START (SvnRawPluginsRepositoryURL + 6)
static char *
pluginsRevisionAsString()
{
char *maybe_space = strchr(PLUGINS_REV_START,' ');
if (maybe_space)
*maybe_space = 0;
return PLUGINS_REV_START;
}
static char *
pluginsRepositoryURL()
{
char *maybe_sqplugins = strstr(URL_START, "/sqPlugins");
if (maybe_sqplugins)
*maybe_sqplugins = 0;
return URL_START;
}
# undef PLUGINS_REV_START
# undef URL_START
#else /* SUBVERSION */
static char *
pluginsRevisionAsString() { return "?"; }
static char *
pluginsRepositoryURL() { return "unknown"; }
#endif /* SUBVERSION */
|