1999-09-18 10:51:31 +00:00
|
|
|
static char junk[] = "\n@(#) LIBU77 VERSION 19980709\n";
|
|
|
|
|
|
2002-10-10 04:41:00 +00:00
|
|
|
char __G77_LIBU77_VERSION__[] = "3.2.1 20021009 (prerelease)";
|
1999-09-18 10:51:31 +00:00
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
|
|
void
|
|
|
|
|
g77__uvers__ ()
|
|
|
|
|
{
|
|
|
|
|
fprintf (stderr, "__G77_LIBU77_VERSION__: %s", __G77_LIBU77_VERSION__);
|
|
|
|
|
fputs (junk, stderr);
|
|
|
|
|
}
|
