File: erl_interface.dynspec

package info (click to toggle)
erlang 1%3A14.a-dfsg-3squeeze1
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 179,776 kB
  • ctags: 245,237
  • sloc: erlang: 1,066,281; ansic: 260,961; xml: 240,068; cpp: 45,949; makefile: 22,700; sh: 10,897; java: 8,720; lisp: 7,826; python: 5,297; pascal: 3,264; asm: 2,679; perl: 2,514; tcl: 245; sed: 9
file content (18 lines) | stat: -rw-r--r-- 636 bytes parent folder | download | duplicates (15)
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("erl_interface.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 = [all_SUITE],
	lists:map(fun (Suite) -> {skip,{Suite, Comment}} end, StaticLibSuites);
    {{CC1, _}, {CC2, _}} ->
	[]
end.