aboutsummaryrefslogtreecommitdiffstats
path: root/lib/inets/test
diff options
context:
space:
mode:
authorMicael Karlberg <bmk@erlang.org>2013-01-28 12:59:46 +0100
committerMicael Karlberg <bmk@erlang.org>2013-01-28 12:59:46 +0100
commita0d96e34a9e55e4d928f814fba25c746a13de3e5 (patch)
tree7526407b4b4913f834e206d119812e3347307506 /lib/inets/test
parente9bd9d3cec027bf6147af8355f3faff330602a45 (diff)
parenteb709715f44e09d1c25c2ed47f11f44137166e00 (diff)
downloadotp-a0d96e34a9e55e4d928f814fba25c746a13de3e5.tar.gz
otp-a0d96e34a9e55e4d928f814fba25c746a13de3e5.tar.bz2
otp-a0d96e34a9e55e4d928f814fba25c746a13de3e5.zip
Merge branch 'bmk/inets/prepare-for-release'
Diffstat (limited to 'lib/inets/test')
-rw-r--r--lib/inets/test/inets_appup_test.erl15
1 files changed, 15 insertions, 0 deletions
diff --git a/lib/inets/test/inets_appup_test.erl b/lib/inets/test/inets_appup_test.erl
index 7ed237243e..648e373312 100644
--- a/lib/inets/test/inets_appup_test.erl
+++ b/lib/inets/test/inets_appup_test.erl
@@ -257,6 +257,21 @@ check_instruction(_, Instr, _AllInstr, _Modules) ->
check_version(V) when is_list(V) ->
ok;
+check_version(REBin) when is_binary(REBin) ->
+ try
+ begin
+ RE = binary_to_list(REBin),
+ case re:compile(RE) of
+ {ok, _} ->
+ ok;
+ {error, _} ->
+ error({bad_version, REBin})
+ end
+ end
+ catch
+ _T:_E ->
+ error({bad_version, REBin})
+ end;
check_version(V) ->
error({bad_version, V}).