Mercurial > dwindows
view os2/svnrev.cmd @ 2873:0bbfb19022e7
C++: GCC prior to 4.7 does not support the override keyword.
So if using earlier versions of GCC, just remove override.
This allows compilation on ancient GCC and GCC based Xcode.
Also remove virtual from the application, I don't think it
is needed and old GCC pukes on it when it is there.
author | bsmith@81767d24-ef19-dc11-ae90-00e081727c95 |
---|---|
date | Mon, 19 Dec 2022 07:42:12 +0000 |
parents | 31a78c16c306 |
children |
line wrap: on
line source
/* REXX script to get the svn revision and display it. */ Trace o fn = 'SVN.REV' 'svnversion . | rxqueue > nul:' /* default version to 0, if svnversion doesn't exist or no .svn here */ ver = 0 If Queued() \= 0 Then Do /* Using PARSE PULL preserves case */ /* If it is a double value get the first value only */ Parse Pull sval ver ':' . If Strip( ver ) = '' Then ver = sval If ver = 'exported' Then ver = 0 If Datatype( Right( ver, 1 ) ) \= 'NUM' Then ver = Substr( ver, 1, Length( ver) - 1 ) End Call Stream fn, 'C', 'OPEN' Call Lineout fn,'VERREV='ver Call Stream fn, 'C', 'CLOSE' Exit 0