1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
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',`')
|
