source: vendor/emx/current/src/libos2/revision.c

Last change on this file was 18, checked in by bird, 22 years ago

Initial revision

  • Property cvs2svn:cvs-rev set to 1.1
  • Property svn:eol-style set to native
  • Property svn:executable set to *
File size: 428 bytes
Line 
1/* revision.c (emx+gcc) -- Copyright (c) 1993-1999 by Eberhard Mattes */
2
3#define INCL_REXXSAA
4#include <os2emx.h>
5
6static char const revision[] = "60";
7
8ULONG emx_revision (PCSZ name, LONG argc, const RXSTRING *argv,
9 PCSZ queuename, PRXSTRING retstr)
10{
11 int i;
12
13 if (argc != 0)
14 return 1;
15 for (i = 0; revision[i] != 0; ++i)
16 retstr->strptr[i] = revision[i];
17 retstr->strlength = i;
18 return 0;
19}
Note: See TracBrowser for help on using the repository browser.