efe52a8241
From-SVN: r51638
13 lines
265 B
C
13 lines
265 B
C
static char junk[] = "\n@(#) LIBU77 VERSION 19980709\n";
|
|
|
|
char __G77_LIBU77_VERSION__[] = "3.2 20020331 (experimental)";
|
|
|
|
#include <stdio.h>
|
|
|
|
void
|
|
g77__uvers__ ()
|
|
{
|
|
fprintf (stderr, "__G77_LIBU77_VERSION__: %s", __G77_LIBU77_VERSION__);
|
|
fputs (junk, stderr);
|
|
}
|