date and time created 83/04/20 23:19:50 by dlw

SCCS-vsn: usr.bin/f77/libU77/f77lid_.c 1.1

diff --git a/usr/src/usr.bin/f77/libU77/f77lid_.c b/usr/src/usr.bin/f77/libU77/f77lid_.c
new file mode 100644 (file)
index 0000000..1ef12a3
--- /dev/null
+++ b/usr/src/usr.bin/f77/libU77/f77lid_.c
@@ -0,0 +1,9 @@
+/*
+ * f77lid_ - the ID strings for f77 libraries.
+ *     @(#)f77lid_.c   1.1
+ * Usage:
+ *     include 'external f77lid' in the declarations in any f77 module.
+ */
+
+extern char    libU77_id[], libI77_id[], libF77_id[];
+char   *f77lid_[] = { libU77_id, libI77_id, libF77_id };