1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
%% -*- erlang -*-
%% You can test this file using this command.
%% file:script("system.dynspec", [{'TestCCompiler',{msc | gnuc, undefined}}]).
case {TestCCompiler, erlang:system_info(c_compiler_used)} of
{{CC, _}, {CC, _}} ->
[];
{{CC1, _}, {CC2, _}} when CC1 == msc; CC2 == msc ->
Comment =
"OTP's static C libraries (compiled with "
++ atom_to_list(CC2) ++ ") aren't compatible "
"with the C compiler (" ++ atom_to_list(CC1)
++ ") used for testing.",
StaticLibSuites = [ethread_SUITE, erl_print_SUITE],
lists:map(fun (Suite) -> {skip,{Suite, Comment}} end, StaticLibSuites);
{{CC1, _}, {CC2, _}} ->
[]
end.
|
