From e3dae8488b577e57d9f6fbb1d8b26512ca0d1abd Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn-Egil=20Dahlberg?= Date: Fri, 20 May 2016 20:15:43 +0200 Subject: Eliminate use of doc and suite clauses Those clause are obsolete and never used by common_test. --- lib/xmerl/test/xmerl_xsd_SUITE.erl | 83 -------------------------------------- 1 file changed, 83 deletions(-) (limited to 'lib/xmerl/test/xmerl_xsd_SUITE.erl') diff --git a/lib/xmerl/test/xmerl_xsd_SUITE.erl b/lib/xmerl/test/xmerl_xsd_SUITE.erl index 638bf89fd2..3060f27e6c 100644 --- a/lib/xmerl/test/xmerl_xsd_SUITE.erl +++ b/lib/xmerl/test/xmerl_xsd_SUITE.erl @@ -86,13 +86,11 @@ end_per_testcase(_Func,_Config) -> ok. -string(suite) -> []; string(_Config) -> %% #x9 | #xA | #xD | [#x20-#xD7FF] | [#xE000-#xFFFD] | [#x10000-#x10FFFF] Str = [16#9,16#A,16#D,16#20,16#D7FF,16#E000,16#FFFD,16#10000, 16#10FFFF], {ok,_} = check_simpleType(string,Str,dummy). -boolean(suite) -> []; boolean(_Config) -> {ok,_} = check_simpleType(boolean,"1",dummy), {ok,_} = check_simpleType(boolean,"0",dummy), @@ -100,14 +98,12 @@ boolean(_Config) -> {ok,_} = check_simpleType(boolean,"false",dummy), {error,_Reason} = check_simpleType(boolean,"gurka",dummy). -decimal(suite) -> []; decimal(_Config) -> {ok,_} = check_simpleType(decimal,"-1.23",dummy), {ok,_} = check_simpleType(decimal,"12678967.543233",dummy), {ok,_} = check_simpleType(decimal,"+100000.00",dummy), {ok,_} = check_simpleType(decimal,"210",dummy). -float(suite) -> []; float(_Config) -> %% -1E4, 1267.43233E12, 12.78e-2, 12 , -0, 0 , INF, -INF, NaN {ok,_} = check_simpleType(float,"-1E4",dummy), @@ -121,7 +117,6 @@ float(_Config) -> {ok,_} = check_simpleType(float,"NaN",dummy). -double(suite) -> []; double(_Config) -> %% -1E4, 1267.43233E12, 12.78e-2, 12 , -0, 0 , INF, -INF, NaN {ok,_} = check_simpleType(double,"-1E4",dummy), @@ -135,7 +130,6 @@ double(_Config) -> {ok,_} = check_simpleType(double,"NaN",dummy). -duration(suite) -> []; duration(_Config) -> %% allowed: P1Y2M3DT10H30M -P120D P1347Y P1347M P1Y2MT2H %% P0Y1347M P0Y1347M0D -P1347M @@ -153,7 +147,6 @@ duration(_Config) -> {error,_} = check_simpleType(duration,"P1Y2MT",dummy). %% '-'? yyyy '-' mm '-' dd 'T' hh ':' mm ':' ss ('.' s+)? (zzzzzz)? -dateTime(suite) -> []; dateTime(_Config) -> %% 2002-10-10T12:00:00-05:00 DT1 = "2002-10-10T12:00:00-05:00", @@ -169,7 +162,6 @@ dateTime(_Config) -> DT5 = "1953-12-31T12:10:10.10+12:00", {ok,_} = check_simpleType(dateTime,DT5,dummy). -time(suite) -> []; time(_Config) -> %% hh:mm:ss.sss with optional following time zone indicator. T1 = "13:20:00-05:00", @@ -184,7 +176,6 @@ time(_Config) -> T5 = "12:34:56.552Z", {ok,_} = check_simpleType(time,T5,dummy). -date(suite) -> []; date(_Config) -> %% '-'? yyyy '-' mm '-' dd zzzzzz? %% is @@ -200,7 +191,6 @@ date(_Config) -> D14 = "2002-12-39-11:00", {error,_Reason14} = check_simpleType(date,D14,dummy). -gYearMonth(suite) -> []; gYearMonth(_Config) -> %% '-'? yyyy '-' mm zzzzzz? GYM1 = "1955-10", @@ -220,7 +210,6 @@ gYearMonth(_Config) -> {error,_} = check_simpleType(gYearMonth,"2000-00",dummy), {error,_} = check_simpleType(gYearMonth,"2000-10+10:70",dummy). -gYear(suite) -> []; gYear(_Config) -> %% '-'? yyyy zzzzzz? {ok,_} = check_simpleType(gYear,"2000",dummy), @@ -228,7 +217,6 @@ gYear(_Config) -> {ok,_} = check_simpleType(gYear,"-2000",dummy), {error,_} = check_simpleType(gYear,"0000",dummy). -gMonthDay(suite) -> []; gMonthDay(_Config) -> %% mm '-' dd zzzzzz? {ok,_} = check_simpleType(gMonthDay,"--05-03",dummy), @@ -237,7 +225,6 @@ gMonthDay(_Config) -> {error,_} = check_simpleType(gMonthDay,"00-03",dummy), {error,_} = check_simpleType(gMonthDay,"-05-03",dummy). -gDay(suite) -> []; gDay(_Config) -> %% dd zzzzzz? {ok,_} = check_simpleType(gDay,"---05",dummy), @@ -247,7 +234,6 @@ gDay(_Config) -> {error,_} = check_simpleType(gDay,"---40+03:00",dummy), {error,_} = check_simpleType(gDay,"05",dummy). -gMonth(suite) -> []; gMonth(_Config) -> %% mm zzzzzz? {ok,_} = check_simpleType(gMonth,"--05",dummy), @@ -258,7 +244,6 @@ gMonth(_Config) -> {error,_} = check_simpleType(gMonth,"05",dummy). -hexBinary(suite) -> []; hexBinary(_Config) -> %% an even number of hexadecimal digits ([0-9a-fA-F]). {ok,_} = check_simpleType(hexBinary,"05",dummy), @@ -270,7 +255,6 @@ hexBinary(_Config) -> {error,_} = check_simpleType(hexBinary,"aF5",dummy), {error,_} = check_simpleType(hexBinary,"aFG",dummy). -base64Binary(suite) -> []; base64Binary(_Config) -> %% a-z, A-Z, 0-9, the plus sign (+), the forward slash (/) and the %% equal sign (=), together with the characters defined in [XML @@ -288,7 +272,6 @@ base64Binary(_Config) -> ErrB641 = "AbCd GZ9 0z8 =", {error,_} = check_simpleType(base64Binary,ErrB641,dummy). -anyURI(suite) -> []; anyURI(_Config) -> URI1 = "ftp://ftp.is.co.za/rfc/rfc1808.txt", URI2 = "gopher://spinaltap.micro.umn.edu/00/Weather/California/Los%20Angeles", @@ -299,7 +282,6 @@ anyURI(_Config) -> ok=ok_loop(anyURI,[URI1,URI2,URI3,URI4,URI5,URI6]). -'QName'(suite) -> []; 'QName'(_Config) -> %% QName ::= (Prefix ':')? LocalPart %% Prefix ::= NCName @@ -308,13 +290,11 @@ anyURI(_Config) -> {ok,_} = check_simpleType('QName',"abc",dummy), {ok,_} = check_simpleType('QName',"abc:def:ijk",dummy). -'NOTATION'(suite) -> []; 'NOTATION'(_Config) -> {ok,_} = check_simpleType('NOTATION',"abc:def",dummy), {ok,_} = check_simpleType('NOTATION',"abc",dummy), {ok,_} = check_simpleType('NOTATION',"abc:def:ijk",dummy). -normalizedString(suite) -> []; normalizedString(_Config) -> %% not contain the carriage return (#xD), line feed (#xA) nor tab %% (#x9) characters. @@ -325,7 +305,6 @@ normalizedString(_Config) -> {ok,_} = check_simpleType(normalizedString,NStr1,dummy), ok=error_loop(normalizedString,[NotNStr1,NotNStr2,NotNStr3]). -token(suite) -> []; token(_Config) -> %% not contain the carriage return (#xD), line feed (#xA) nor tab %% (#x9) characters, that have no leading or trailing spaces @@ -341,7 +320,6 @@ token(_Config) -> {ok,_} = check_simpleType(token,T1,dummy), ok=error_loop(token,[NotT1,NotT2,NotT3,NotT4,NotT5,NotT6]). -language(suite) -> []; language(_Config) -> %% strings that conform to the pattern %% [a-zA-Z]{1,8}(-[a-zA-Z0-9]{1,8})* @@ -353,7 +331,6 @@ language(_Config) -> {ok,_} = check_simpleType(language,L,dummy), ok=error_loop(language,[NotL1,NotL2,NotL3,NotL4]). -'NMTOKEN'(suite) -> []; 'NMTOKEN'(_Config) -> N = "name:withoutspace", NotN1 = "name with space", @@ -362,61 +339,49 @@ language(_Config) -> {error,_} = check_simpleType('NMTOKEN',NotN1,dummy), {error,_} = check_simpleType('NMTOKEN',NotN2,dummy). -'NMTOKENS'(suite) -> []; 'NMTOKENS'(_Config) -> N1 = "name1 name:2 name:three", NotN1 = "name na%me", {ok,_} = check_simpleType('NMTOKENS',N1,dummy), {error,_} = check_simpleType('NMTOKENS',NotN1,dummy). -'Name'(suite) -> []; 'Name'(_Config) -> {ok,_} = check_simpleType('Name',"_valid_Name",dummy). -'NCName'(suite) -> []; 'NCName'(_Config) -> {ok,_} = check_simpleType('NCName',"_valid_Name",dummy). -'ID'(suite) -> []; 'ID'(_Config) -> {ok,_} = check_simpleType('ID',"_valid_Name",dummy). -'IDREF'(suite) -> []; 'IDREF'(_Config) -> {ok,_} = check_simpleType('IDREF',"_valid_Name",dummy). -'IDREFS'(suite) -> []; 'IDREFS'(_Config) -> {ok,_} = check_simpleType('IDREFS',"_valid_Name Name2",dummy). -'ENTITY'(suite) -> []; 'ENTITY'(_Config) -> {ok,_} = check_simpleType('ENTITY',"_valid_Name",dummy). -'ENTITIES'(suite) -> []; 'ENTITIES'(_Config) -> {ok,_} = check_simpleType('ENTITIES',"name name3",dummy). -integer(suite) -> []; integer(_Config) -> IntList = ["-1", "0", "12678967543233", "+100000"], ok = ok_loop(integer,IntList), {error,_} = check_simpleType(integer,"1.3",dummy). -nonPositiveInteger(suite) -> []; nonPositiveInteger(_Config) -> NPIList = ["0", "-12678967543233", "-100000"], ok = ok_loop(nonPositiveInteger,NPIList), {error,_} = check_simpleType(nonPositiveInteger,"1",dummy). -negativeInteger(suite) -> []; negativeInteger(_Config) -> NIList = ["-1", "-12678967543233", "-100000"], ok = ok_loop(negativeInteger,NIList), {error,_} = check_simpleType(negativeInteger,"1",dummy), {error,_} = check_simpleType(negativeInteger,"0",dummy). -long(suite) -> []; long(_Config) -> L = ["9223372036854775807","-9223372036854775808","-1", "0", "12678967543233", "+100000"], @@ -424,62 +389,53 @@ long(_Config) -> Err = ["9223372036854775808","-9223372036854775809"], ok = error_loop(long,Err). -int(suite) -> []; int(_Config) -> L = ["2147483647", "-2147483648", "-1", "0", "126789675", "+100000"], ok = ok_loop(int,L), Err = ["2147483648", "-2147483649"], ok = error_loop(int,Err). -short(suite) -> []; short(_Config) -> L = ["32767", "-32768", "-1", "0", "12678", "+10000"], ok = ok_loop(short,L), Err = ["32768", "-32769"], ok = error_loop(short,Err). -byte(suite) -> []; byte(_Config) -> L = ["-1", "0", "126", "+100", "127", "-128"], ok = ok_loop(byte,L), Err = ["128", "-129"], ok = error_loop(byte,Err). -nonNegativeInteger(suite) -> []; nonNegativeInteger(_Config) -> L = ["1", "0", "12678967543233", "+100000"], ok = ok_loop(nonNegativeInteger,L), {error,_} = check_simpleType(nonNegativeInteger,"-1",dummy). -unsignedLong(suite) -> []; unsignedLong(_Config) -> L = ["0", "12678967543233", "100000", "18446744073709551615"], ok = ok_loop(unsignedLong,L), Err = ["-1","18446744073709551616"], ok = error_loop(unsignedLong,Err). -unsignedInt(suite) -> []; unsignedInt(_Config) -> L = ["4294967295", "0", "1267896754", "100000"], ok = ok_loop(unsignedInt,L), Err = ["-1","4294967296"], ok = error_loop(unsignedInt,Err). -unsignedShort(suite) -> []; unsignedShort(_Config) -> L = ["65535", "0", "12678", "10000"], ok = ok_loop(unsignedShort,L), Err = ["-1","65536"], ok = error_loop(unsignedShort,Err). -unsignedByte(suite) -> []; unsignedByte(_Config) -> L = ["255", "0", "126", "100"], ok = ok_loop(unsignedByte,L), Err = ["-1","256"], ok = error_loop(unsignedByte,Err). -positiveInteger(suite) -> []; positiveInteger(_Config) -> L = ["1", "12678967543233", "+100000"], ok = ok_loop(positiveInteger,L), @@ -504,28 +460,24 @@ error_loop(Type,[H|T]) -> -length(suite) -> []; length(_Config) -> {ok,"string"} = (xmerl_xsd_type:facet_fun(string,{length,"6"}))("string"), {error,{length,12,should_be,6}} = (xmerl_xsd_type:facet_fun(string,{length,"6"}))("stringstring"), ok. -minLength(suite) -> []; minLength(_Config) -> {ok,"string"} = (xmerl_xsd_type:facet_fun(string,{minLength,"6"}))("string"), {error,{minLength,3,should_at_least_be,6}} = (xmerl_xsd_type:facet_fun(string,{minLength,"6"}))("str"), ok. -maxLength(suite) -> []; maxLength(_Config) -> {ok,"string"} = (xmerl_xsd_type:facet_fun(string,{maxLength,"6"}))("string"), {error,{maxLength,12,should_not_be_more_than,6}} = (xmerl_xsd_type:facet_fun(string,{maxLength,"6"}))("stringstring"), ok. -pattern(suite) -> []; pattern(_Config) -> RE1 = "[a-z]{5}", {ok,"calle"} = @@ -542,7 +494,6 @@ pattern(_Config) -> (xmerl_xsd_type:facet_fun(string,{pattern,RE2})) ("AY23BC"). -enumeration(suite) -> []; enumeration(_Config) -> {ok,"tomat"} = (xmerl_xsd_type:facet_fun(string,{enumeration,["gurka","tomat","sallad"]}))("tomat"), @@ -550,14 +501,12 @@ enumeration(_Config) -> (xmerl_xsd_type:facet_fun(string,{enumeration,["gurka","tomat","sallad"]}))("morot"), ok. -whiteSpace(suite) -> []; whiteSpace(_Config) -> {ok,"gur ka"} = (xmerl_xsd_type:facet_fun(string,{whiteSpace,"collapse"}))(" gur\tka "), {ok," gur ka "} = (xmerl_xsd_type:facet_fun(string,{whiteSpace,"replace"}))(" gur\nka\t"), {ok," gurk\na\t"} = (xmerl_xsd_type:facet_fun(string,{whiteSpace,"preserve"}))(" gurk\na\t"), ok. -maxInclusive(suite) -> []; maxInclusive(_Config) -> {error,{maxInclusive,"3",should_be_less_than_or_equal_with,"2"}} = (xmerl_xsd_type:facet_fun(integer,{maxInclusive,"2"}))("3"), @@ -609,7 +558,6 @@ maxInclusive(_Config) -> (xmerl_xsd_type:facet_fun(duration,{maxInclusive,"P1Y2M3DT10H"}))("P1Y2M3DT10H30M"), ok. -maxExclusive(suite) -> []; maxExclusive(_Config) -> {error,{maxExclusive,"2",not_less_than,"2"}} = (xmerl_xsd_type:facet_fun(integer,{maxExclusive,"2"}))("2"), @@ -658,7 +606,6 @@ maxExclusive(_Config) -> {ok,"2006-09-06T19:17:45Z"} = (xmerl_xsd_type:facet_fun(dateTime,{maxExclusive,"2006-09-06T19:17:46Z"}))("2006-09-06T19:17:45Z"), ok. -minExclusive(suite) -> []; minExclusive(_Config) -> {error,{minExclusive,"2",not_greater_than,"2"}} = (xmerl_xsd_type:facet_fun(integer,{minExclusive,"2"}))("2"), @@ -707,7 +654,6 @@ minExclusive(_Config) -> {ok,"2006-09-06T19:17:45Z"} = (xmerl_xsd_type:facet_fun(dateTime,{minExclusive,"2006-09-06T19:17:44Z"}))("2006-09-06T19:17:45Z"), ok. -minInclusive(suite) -> []; minInclusive(_Config) -> {error,{minInclusive,"1",not_greater_than_or_equal_with,"2"}} = (xmerl_xsd_type:facet_fun(integer,{minInclusive,"2"}))("1"), @@ -756,7 +702,6 @@ minInclusive(_Config) -> {ok,"2006-09-06T19:17:45Z"} = (xmerl_xsd_type:facet_fun(dateTime,{minInclusive,"2006-09-06T19:17:45Z"}))("2006-09-06T19:17:45Z"), ok. -totalDigits(suite) -> []; totalDigits(_Config) -> {error,{totalDigits,4,to_many_digits}} = (xmerl_xsd_type:facet_fun(integer,{totalDigits,"3"}))("3456"), @@ -769,7 +714,6 @@ totalDigits(_Config) -> {ok,"555.555000000"} = (xmerl_xsd_type:facet_fun(decimal,{totalDigits,"7"}))("555.555000000"), ok. -fractionDigits(suite) -> []; fractionDigits(_Config) -> {error,{fractionDigits,3,to_many_digits_in,"555.555000000"}} = (xmerl_xsd_type:facet_fun(decimal,{fractionDigits,"2"}))("555.555000000"), @@ -784,7 +728,6 @@ fractionDigits(_Config) -> ok. %% some block testing of dateTime and duration comparisons -compare_dateTime(suite) -> []; compare_dateTime(_Config) -> %% comparison results according to table in section 3.2.7.4 of XML %% Schema part 2 @@ -822,7 +765,6 @@ compare_dateTime(_Config) -> xmerl_xsd_type:add_duration2dateTime("2000-01-12T12:13:14Z", "P1Y3M5DT7H10M3.3S"). -compare_duration(suite) -> []; compare_duration(_Config) -> %% order relations according to section 3.2.6.2 in XML Schema %% part2. @@ -845,13 +787,11 @@ compare_duration(_Config) -> indefinite = xmerl_xsd_type:compare_durations("P5M","P153D"), lt = xmerl_xsd_type:compare_durations("P5M","P154D"). -xml_xsd(suite) -> []; xml_xsd(Config) -> DataDir = datadir( Config), Options = [{fetch_path, [DataDir]}], {ok, _} = xmerl_xsd:process_schema("xml.xsd", Options). -xml_lang_attr(suite) -> []; xml_lang_attr(Config) -> DataDir = datadir( Config), {Element, _} = xmerl_scan:file(filename:join([DataDir,"book.xml"])), @@ -859,36 +799,30 @@ xml_lang_attr(Config) -> {ok, Schema} = xmerl_xsd:process_schema("book.xsd", Options), {Element, _} = xmerl_xsd:validate(Element, Schema). -po(suite) -> []; po(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["po.xml"]),[]), {E,_} = xmerl_xsd:process_validate(datadir_join(Config,["po.xsd"]),E,[]). -po1(suite) -> []; po1(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["po1.xml"]),[]), {E2,_} = xmerl_xsd:process_validate(datadir_join(Config,["po1.xsd"]),E,[]), ok = xmerl_test_lib:cmp_element(E,E2). -po2(suite) -> []; po2(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["po2.xml"]),[]), {E2,_} = xmerl_xsd:process_validate(datadir_join(Config,["po1.xsd"]),E,[]), ok = xmerl_test_lib:cmp_element(E,E2). -ipo(suite) -> []; ipo(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["ipo.xml"]),[]), {VE,_} = xmerl_xsd:process_validate(datadir_join(Config,["ipo.xsd"]),E,[]), ok = xmerl_test_lib:cmp_element(E,VE). -ipo_redefine(suite) -> []; ipo_redefine(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["ipo_redefine.xml"]),[]), {VE,_} = xmerl_xsd:process_validate(datadir_join(Config,["ipo_redefine.xsd"]),E,[]), ok = xmerl_test_lib:cmp_element(E,VE). -'4Q99'(suite) -> []; '4Q99'(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["4Q99.xml"]),[]), %% the import in report.xsd lacks schemaLocation, so the imported @@ -900,7 +834,6 @@ ipo_redefine(Config) -> %% report2.xsd has an import element with a schemaLocation attribute {VE,_} = xmerl_xsd:process_validate(datadir_join(Config,["report2.xsd"]),E,[]). -small(suite) -> []; small(Config) -> {E=#xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["small.xml"]),[]), {VE=#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["small.xsd"]),E,[]), @@ -916,7 +849,6 @@ small(Config) -> [{validation,schema}]), true = lists:keymember(orderStatus,#xmlAttribute.name,Atts). -complexType1(suite) -> []; complexType1(Config) -> {E1=#xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["complexTypes1.xml"]),[]), {VE1=#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,[ "complexTypes.xsd"]),E1,[]), @@ -926,7 +858,6 @@ complexType1(Config) -> {VE2=#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["complexTypes.xsd"]),E2,[]), ok = xmerl_test_lib:cmp_element(E2,VE2). -model_group_all(suite) -> []; model_group_all(Config) -> {E=#xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["po1.xml"]),[]), {E,_} = xmerl_xsd:process_validate(datadir_join(Config,["po1_all.xsd"]),E,[]), @@ -944,17 +875,14 @@ model_group_all(Config) -> {E4=#xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["po1_all_err2.xml"]),[]), {error,_Reason2} = xmerl_xsd:process_validate(datadir_join(Config,["po1_all.xsd"]),E4,[]). -substitutionGroup(suite) -> []; substitutionGroup(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["ipo_substGroup.xml"]),[]), {E,_} = xmerl_xsd:process_validate(datadir_join(Config,["ipo_substGroup.xsd"]),E,[]). -attributeGroup(suite) -> []; attributeGroup(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["po_attrGroup.xml"]),[]), {E,_} = xmerl_xsd:process_validate(datadir_join(Config,["po_attrGroup.xsd"]),E,[]). -test_key1(suite) -> []; test_key1(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["vehicle2.xml"]),[]), {E,_} = xmerl_xsd:process_validate(datadir_join(Config,["vehicle.xsd"]),E,[]), @@ -966,12 +894,10 @@ test_key1(Config) -> {E3 = #xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["vehicle3.xml"]),[]), {E3 = #xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["vehicle.xsd"]),E3,[]). -sis1(suite) -> []; sis1(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,[sis,"instance.xml"]),[]), {#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,[sis,"IntegratedSite.xsd"]),E,[]). -sis2(suite) -> []; sis2(Config) -> {BS_E,_} = xmerl_scan:file(datadir_join(Config,[sis,"bs_mim.xml"]),[]), {SW_E,_} = xmerl_scan:file(datadir_join(Config,[sis,"swm_mim.xml"]),[]), @@ -981,7 +907,6 @@ sis2(Config) -> {#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,[sis,"mim.xsd"]),SW_E,[]), {#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,[sis,"mim.xsd"]),HW_E,[]). -state2file_file2state(suite) -> []; state2file_file2state(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,[ "po.xml"]),[]), {ok,S} = xmerl_xsd:process_schema(datadir_join(Config,["po.xsd"])), @@ -996,18 +921,15 @@ state2file_file2state(Config) -> {E,_} = xmerl_xsd:validate(E,S). -union(suite) -> []; union(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["instance.xml"])), {_E2 = #xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["measCollec.xsd"]),E). -ticket_6910(suite) -> []; ticket_6910(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,[sis,"dummy_action_mim.xml"])), {_E2 = #xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,[sis,"mim2.xsd"]),E). -ticket_7165(suite) -> []; ticket_7165(Config) -> %% The validation option seems not to work {_E,_} = xmerl_scan:file(datadir_join(Config,["ticket_7288.xml"]), @@ -1017,12 +939,10 @@ ticket_7165(Config) -> -ticket_7190(suite) -> []; ticket_7190(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["int.xml"])), {_E2 = #xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["simple_int.xsd"]),E). -ticket_7288(suite) -> []; ticket_7288(Config) -> %% The schema table in the state where deleted by xmerl_xsd:validate if there was an error. {E,_} = xmerl_scan:file(datadir_join(Config,["ticket_7288.xml"])), @@ -1030,7 +950,6 @@ ticket_7288(Config) -> {error, EL} = xmerl_xsd:validate(E, S), {error, EL} = xmerl_xsd:validate(E, S). -ticket_7736(suite) -> []; ticket_7736(Config) -> DataDir = datadir(Config), {ok, State } = xmerl_xsd:process_schema(filename:join([DataDir,"enum_bug.xsd"])), @@ -1039,7 +958,6 @@ ticket_7736(Config) -> {#xmlElement{},_} = xmerl_xsd:validate(Entity, State). -ticket_8599(suite) -> []; ticket_8599(Config) -> {E,_} = xmerl_scan:file(datadir_join(Config,["ticket_8599.xml"])), @@ -1048,7 +966,6 @@ ticket_8599(Config) -> {{xmlElement,persons,persons,_,_,_,_,_,_,_,_,_},_GlobalState} = xmerl_xsd:validate(E, S). -ticket_9410(suite) -> []; ticket_9410(Config) -> file:set_cwd(datadir_join(Config,[".."])), {ok, _S} = xmerl_xsd:process_schema("xmerl_xsd_SUITE_data/small.xsd"). -- cgit v1.2.3