diff options
author | Björn-Egil Dahlberg <[email protected]> | 2016-05-17 15:45:41 +0200 |
---|---|---|
committer | Björn-Egil Dahlberg <[email protected]> | 2016-05-17 15:49:21 +0200 |
commit | 7153dd1f8baa77a6b2c2b29df56a2d0c41fa770b (patch) | |
tree | 1b91cdc0c95924f3223dc938e25ed42c1ac6b58c /lib/xmerl/src/xmerl_xsd_type.erl | |
parent | 0545c22c9c07c55569e067c57ec184f018a54947 (diff) | |
download | otp-7153dd1f8baa77a6b2c2b29df56a2d0c41fa770b.tar.gz otp-7153dd1f8baa77a6b2c2b29df56a2d0c41fa770b.tar.bz2 otp-7153dd1f8baa77a6b2c2b29df56a2d0c41fa770b.zip |
xmerl: Fix unmatched return warnings
Diffstat (limited to 'lib/xmerl/src/xmerl_xsd_type.erl')
-rw-r--r-- | lib/xmerl/src/xmerl_xsd_type.erl | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/lib/xmerl/src/xmerl_xsd_type.erl b/lib/xmerl/src/xmerl_xsd_type.erl index 14a673b0c0..3ee5961522 100644 --- a/lib/xmerl/src/xmerl_xsd_type.erl +++ b/lib/xmerl/src/xmerl_xsd_type.erl @@ -229,11 +229,13 @@ check_float(Value) -> %% {Mantissa,Exponent}=lists:splitwith(Pred,Value), %% SkipEe = fun([]) -> [];(L) -> tl(L) end, case string:tokens(Value,"eE") of - [Mantissa,Exponent] -> - {ok,_} = check_decimal(Mantissa), - {ok,_} = check_integer(Exponent); - [Mantissa] -> - check_decimal(Mantissa) + [Mantissa,Exponent] -> + {ok,_} = check_decimal(Mantissa), + {ok,_} = check_integer(Exponent), + ok; + [Mantissa] -> + {ok,_} = check_decimal(Mantissa), + ok end, {ok,Value}. %% case {check_decimal(Mantissa), @@ -367,7 +369,7 @@ check_dateTime("+"++_DateTime) -> check_dateTime(DateTime) -> [Date,Time] = string:tokens(DateTime,"T"), [Y,M,D] = string:tokens(Date,"-"), - check_year(Y), + {ok,_} = check_year(Y), {ok,_} = check_positive_integer(M), {ok,_} = check_positive_integer(D), check_time(Time). |