This file is indexed.

/usr/lib/fortc/linux.m4 is in libxgks-dev 2.6.1+dfsg.2-5.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
divert(-1)

# Name of system platform (for use in comments)
define(`M4__SYSTEM', Linux)

# 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(`REALX',`')
define(`INTEGERX',`')
define(`FUNCTIONX',`')
define(`DOUBLEX',`')

# transformation from string name to corresponding argument name
define(`STRINGF',`$1')

# extra arguments, if any, for string length
define(`STRINGX',`, $1_len')  # one extra stringlen parameter

# declaration to be used for argument name descriptor
define(`STRINGD',`
    char	*$1;	`$2'
    int		$1`'`_len';') # declare argument string with extra stringlen parameter

define(`STRINGP',`
    char      *$1')
define(`STRINGPX',`,
    int        $1_len')

# declarations and initializations of canonical local variables
define(`STRINGL',`')

# FORTRAN declaration for a long integer (e.g. integer*4 for Microsoft)
define(`LONG_INT',`integer')

# FORTRAN declaration for a short integer (e.g. integer*2)
define(`SHORT_INT',`integer*2')

# FORTRAN declaration for an integer byte (e.g. integer*1 or byte)
define(`BYTE_INT',`byte')

# FORTRAN declaration for single precision
define(`SINGLE_PRECISION',`real')

# FORTRAN declaration for double precision (e.g. real for a Cray)
define(`DOUBLE_PRECISION',`double precision')

divert(0)dnl