Mercurial > dwindows
view os2/svnrev.cmd @ 2539:822f814a54f4
Android: Fix memory corruption issue due to incorrectly allocating HPIXMAP.
Also call DWRender.invalidate() from the main thread incase it wants to
cause an immediate onDraw() ... but we don't need to wait for it.
author | bsmith@81767d24-ef19-dc11-ae90-00e081727c95 |
---|---|
date | Wed, 12 May 2021 06:17:22 +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