diff options
author | Björn Gustavsson <[email protected]> | 2013-02-28 08:41:22 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2013-05-31 14:52:16 +0200 |
commit | 1a891ebb4644ed7db9729b1659a21553d3431bfd (patch) | |
tree | d5e682f80c3281b69c824f2230baabde395071d9 /lib/asn1/test/testConstraints.erl | |
parent | 08f656658b460eb2a1acf7a57ef0f5a9a3f4bc68 (diff) | |
download | otp-1a891ebb4644ed7db9729b1659a21553d3431bfd.tar.gz otp-1a891ebb4644ed7db9729b1659a21553d3431bfd.tar.bz2 otp-1a891ebb4644ed7db9729b1659a21553d3431bfd.zip |
testConstraints: Add more tests of SIZE constraints
Diffstat (limited to 'lib/asn1/test/testConstraints.erl')
-rw-r--r-- | lib/asn1/test/testConstraints.erl | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/lib/asn1/test/testConstraints.erl b/lib/asn1/test/testConstraints.erl index c8d9008641..ef6c1b3486 100644 --- a/lib/asn1/test/testConstraints.erl +++ b/lib/asn1/test/testConstraints.erl @@ -128,7 +128,20 @@ int_constraints(Rules) -> %%========================================================== roundtrip('T', "IA"), - roundtrip('T2', "IA"). + roundtrip('T2', "IA"), + + %%========================================================== + %% More SIZE Constraints + %%========================================================== + + roundtrip('FixedSize', "0123456789"), + roundtrip('FixedSize2', "0123456789"), + roundtrip('FixedSize2', "0123456789abcdefghij"), + + [roundtrip('VariableSize', lists:seq($A, $A+L-1)) || + L <- lists:seq(1, 10)], + + ok. refed_NNL_name(_Erule) -> ?line {ok,_} = asn1_wrapper:encode('Constraints','AnotherThing',fred), |