blob: 9ac001564c70ef64086b122656353ea88f3eb85f (
plain)
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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
# SPDX-License-Identifier: Apache-2.0
# Copyright 2019 The Meson development team
from __future__ import annotations
from mesonbuild.templates.sampleimpl import FileImpl
lib_fortran_template = '''
! This procedure will not be exported and is not
! directly callable by users of this library.
module modfoo
implicit none
private
public :: {function_name}
contains
integer function internal_function()
internal_function = 0
end function internal_function
integer function {function_name}()
{function_name} = internal_function()
end function {function_name}
end module modfoo
'''
lib_fortran_test_template = '''
use modfoo
print *,{function_name}()
end program
'''
lib_fortran_meson_template = '''project('{project_name}', 'fortran',
version : '{version}',
default_options : ['warning_level=3'])
# These arguments are only used to build the shared library
# not the executables that use the library.
lib_args = ['-DBUILDING_{utoken}']
shlib = shared_library('{lib_name}', '{source_file}',
|
