1999-09-18 10:51:31 +00:00
|
|
|
static char junk[] = "\n@(#) LIBU77 VERSION 19980709\n";
|
|
|
|
|
|
2001-12-18 04:13:58 +00:00
|
|
|
char __G77_LIBU77_VERSION__[] = "0.5.26 20011023 (release)";
|
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);
|
|
|
|
|
}
|
