$NetBSD: patch-al,v 1.2 1999/11/23 16:05:31 dmcmahill Exp $

--- ./conf/NETBSDSPARC.m4.orig	Mon Sep 23 16:18:02 1996
+++ ./conf/NETBSDSPARC.m4	Mon Nov  1 08:58:05 1999
@@ -2,10 +2,9 @@
 undefine(`len')
 #
-# FORTRAN function names are in upper case
+# append an underscore to FORTRAN function names
 #
-define(`FUNCTION',`translit($1,abcdefghijklmnopqrstuvwxyz,ABCDEFGHIJKLMNOPQRSTUVWXYZ)')
+define(`FUNCTION',`$1_')
 #
 # FORTRAN character strings are passed as follows:
-#   XXX is this right?
 # a pointer to the base of the string is passed in the normal
 # argument list, and the length is passed by value as an extra