1998-07-08 23:59:25 -04:00
|
|
|
static char junk[] = "\n@(#) LIBU77 VERSION 19980709\n";
|
1998-01-31 20:37:08 -05:00
|
|
|
|
1999-05-26 08:48:41 -04:00
|
|
|
char __G77_LIBU77_VERSION__[] = "0.5.25 19990507 (prerelease)";
|
1998-01-31 20:37:08 -05:00
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
|
|
void
|
|
|
|
|
g77__uvers__ ()
|
|
|
|
|
{
|
|
|
|
|
fprintf (stderr, "__G77_LIBU77_VERSION__: %s", __G77_LIBU77_VERSION__);
|
|
|
|
|
fputs (junk, stderr);
|
|
|
|
|
}
|
