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
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
|
class Compiler < Struct.new(:name, :priority)
# The full version of the compiler for comparison purposes.
def version
if name.is_a? String
MacOS.non_apple_gcc_version(name)
else
MacOS.send("#{name}_build_version")
end
end
# This is exposed under the `build` name for compatibility, since
# `fails_with` continues to use `build` in the public API.
# `build` indicates the build number of an Apple compiler.
# This is preferred over version numbers since there are often
# significant differences within the same version,
# e.g. GCC 4.2 build 5553 vs 5666.
# Non-Apple compilers don't have build numbers.
alias_method :build, :version
# The major version for non-Apple compilers. Used to indicate a compiler
# series; for instance, if the version is 4.8.2, it would return "4.8".
def major_version
version.match(/(\d\.\d)/)[0] if name.is_a? String
end
end
class CompilerFailure
attr_reader :compiler, :major_version
attr_rw :cause, :version
MESSAGES = {
:cxx11 => 'This compiler does not support C++11'
}
COLLECTIONS = {
:cxx11 => [
[:gcc_4_0, proc { cause MESSAGES[:cxx11] }],
[:gcc, proc { cause MESSAGES[:cxx11] }],
[:clang, proc { build 425; cause MESSAGES[:cxx11] }],
[{:gcc => '4.3'}, proc { cause MESSAGES[:cxx11] }],
[{:gcc => '4.4'}, proc { cause MESSAGES[:cxx11] }],
[{:gcc => '4.5'}, proc { cause MESSAGES[:cxx11] }],
[{:gcc => '4.6'}, proc { cause MESSAGES[:cxx11] }]
],
:openmp => [
[:clang, proc { cause 'clang does not support OpenMP' }]
]
}
def self.for_standard standard
failures = COLLECTIONS.fetch(standard) do
raise ArgumentError, "\"#{standard}\" is not a recognized standard"
end
failures.map do |compiler, block|
CompilerFailure.new(compiler, &block)
end
end
def initialize compiler, &block
# Non-Apple compilers are in the format fails_with compiler => version
if compiler.is_a? Hash
# currently the only compiler for this case is GCC
_, @major_version = compiler.shift
@compiler = 'gcc-' + @major_version
else
@compiler = compiler
end
instance_eval(&block) if block_given?
if compiler.is_a? Hash
# so fails_with :gcc => '4.8' simply marks all 4.8 releases incompatible
@version ||= @major_version + '.999'
else
@version = (@version || 9999).to_i
end
end
# Allows Apple compiler `fails_with` statements to keep using `build`
# even though `build` and `value` are the same internally
alias_method :build, :version
end
class CompilerQueue
def initialize
@array = []
end
def <<(o)
@array << o
self
end
def pop
@array.delete(@array.max { |a, b| a.priority <=> b.priority })
end
def empty?
@array.empty?
end
end
class CompilerSelector
def initialize(f)
@f = f
@compilers = CompilerQueue.new
%w{clang llvm gcc gcc_4_0}.map(&:to_sym).each do |cc|
unless MacOS.send("#{cc}_build_version").nil?
@compilers << Compiler.new(cc, priority_for(cc))
end
end
# non-Apple GCC 4.x
SharedEnvExtension::GNU_GCC_VERSIONS.each do |v|
unless MacOS.non_apple_gcc_version("gcc-4.#{v}").nil?
# priority is based on version, with newest preferred first
@compilers << Compiler.new("gcc-4.#{v}", 1.0 + v/10.0)
end
end
end
# Attempts to select an appropriate alternate compiler, but
# if none can be found raises CompilerError instead
def compiler
begin
cc = @compilers.pop
end while @f.fails_with?(cc)
if cc.nil?
raise CompilerSelectionError.new(@f)
else
cc.name
end
end
private
def priority_for(cc)
case cc
when :clang then MacOS.clang_build_version >= 318 ? 3 : 0.5
when :gcc then 2.5
when :llvm then 2
when :gcc_4_0 then 0.25
# non-Apple gcc compilers
else 1.5
end
end
end
|
