File: erl_interface.dynspec

package info (click to toggle)
erlang 1%3A15.b.1-dfsg-4%2Bdeb7u1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 210,320 kB
  • sloc: erlang: 1,325,533; xml: 338,134; ansic: 283,913; cpp: 48,667; makefile: 23,010; sh: 12,077; java: 10,102; lisp: 7,918; python: 5,298; pascal: 3,263; asm: 2,774; perl: 2,718; tcl: 245; sed: 48
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.