2002-03-06 19:42:56 +01:00
|
|
|
static char junk[] = "\n@(#) LIBU77 VERSION 19980709\n";
|
1998-02-01 02:37:08 +01:00
|
|
|
|
2002-06-25 09:17:55 +02:00
|
|
|
char __G77_LIBU77_VERSION__[] = "3.2 20020625 (experimental)";
|
1998-02-01 02:37:08 +01:00
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
void
|
|
|
|
g77__uvers__ ()
|
|
|
|
{
|
|
|
|
fprintf (stderr, "__G77_LIBU77_VERSION__: %s", __G77_LIBU77_VERSION__);
|
|
|
|
fputs (junk, stderr);
|
|
|
|
}
|