Author: eliot Date: 2012-04-05 11:45:10 -0700 (Thu, 05 Apr 2012) New Revision: 2544
Added: trunk/platforms/Cross/plugins/sqPluginsSCCSVersion.h Log: Add distinct source code control version info for the plugins tree.
Added: trunk/platforms/Cross/plugins/sqPluginsSCCSVersion.h =================================================================== --- trunk/platforms/Cross/plugins/sqPluginsSCCSVersion.h (rev 0) +++ trunk/platforms/Cross/plugins/sqPluginsSCCSVersion.h 2012-04-05 18:45:10 UTC (rev 2544) @@ -0,0 +1,43 @@ +/* + * 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$"; +# define PLUGINS_REV_START (SvnRawPluginsRevisionString + 6) + +static char SvnRawPluginsRepositoryURL[] = "$URL$"; +# 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_platforms = strstr(URL_START, "/platforms"); + if (maybe_platforms) + *maybe_platforms = 0; + return URL_START; +} +# undef PLUGINS_REV_START +# undef URL_START +#else /* SUBVERSION */ +static char * +pluginsRevisionAsString() { return "?"; } + +static char * +pluginsRepositoryURL() { return "unknown"; } +#endif /* SUBVERSION */
Property changes on: trunk/platforms/Cross/plugins/sqPluginsSCCSVersion.h ___________________________________________________________________ Added: checkindate + Thu Apr 5 11:44:25 PDT 2012 Added: svn:keywords + URL Rev
vm-dev@lists.squeakfoundation.org