Author: Alastair McKinstry <mckminstry@debian.org>
Description: For Fortran symbols, add one, not two, underscores.
Last-Updated: 2010-07-02
Forwarded: no

Index: xgks-2.6/src/port/fortc/linux.m4
===================================================================
--- xgks-2.6.orig/src/port/fortc/linux.m4	2010-07-02 22:17:06.000000000 +0100
+++ xgks-2.6/src/port/fortc/linux.m4	2010-07-02 22:17:15.000000000 +0100
@@ -5,7 +5,7 @@
 
 # transformation from fortran name to name of C module.  Append an extra
 # underscore if the name contains an underscore.
-define(`NAMEF',`ifelse(index($1,_),-1,$1_,$1__)')
+define(`NAMEF',`ifelse(index($1,_),-1,$1_,$1_)')
 
 define(`REALX',`')
 define(`INTEGERX',`')
