diff options
author | Björn Gustavsson <[email protected]> | 2013-09-13 14:36:22 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2013-09-18 11:45:01 +0200 |
commit | a6c2074bb0b7d54f3a5db41867d203f847598a3a (patch) | |
tree | 023f59f9bef4f39b4bd8986aa0f32d821202f5a1 /lib/asn1/test/testSetIndefinite.erl | |
parent | 0b35b587814d9524d46473571778990ce3fdf17f (diff) | |
download | otp-a6c2074bb0b7d54f3a5db41867d203f847598a3a.tar.gz otp-a6c2074bb0b7d54f3a5db41867d203f847598a3a.tar.bz2 otp-a6c2074bb0b7d54f3a5db41867d203f847598a3a.zip |
Combine the testSeqIndefinite/1 and testSetIndefinite/1 test cases
They use the same ASN.1 spec.
Diffstat (limited to 'lib/asn1/test/testSetIndefinite.erl')
-rw-r--r-- | lib/asn1/test/testSetIndefinite.erl | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/lib/asn1/test/testSetIndefinite.erl b/lib/asn1/test/testSetIndefinite.erl deleted file mode 100644 index cbcebd333d..0000000000 --- a/lib/asn1/test/testSetIndefinite.erl +++ /dev/null @@ -1,40 +0,0 @@ -%% -%% %CopyrightBegin% -%% -%% Copyright Ericsson AB 1999-2012. All Rights Reserved. -%% -%% The contents of this file are subject to the Erlang Public License, -%% Version 1.1, (the "License"); you may not use this file except in -%% compliance with the License. You should have received a copy of the -%% Erlang Public License along with this software. If not, it can be -%% retrieved online at http://www.erlang.org/. -%% -%% Software distributed under the License is distributed on an "AS IS" -%% basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See -%% the License for the specific language governing rights and limitations -%% under the License. -%% -%% %CopyrightEnd% -%% -%% --module(testSetIndefinite). - --export([main/1]). - --include_lib("test_server/include/test_server.hrl"). - - -main(per) -> ok; -main(ber) -> - - %% normal encoding - B = <<49,20,1,1,255,49,9,1,1,255,2,4,251,35,238,194,2,4,251,55,236,161>>, - %% indefinite length encoding - Bi = <<49,22,1,1,255,49,128,1,1,255,2,4,251,35,238,194,0,0,2,4,251,55,236,161>>, - - %% the value which is encoded - V = {'SetS3',true,{'SetS3_setS3',true,-81531198},-80221023}, - {ok,V} = 'SeqSetIndefinite':decode('SetS3', B), - {ok,V} = 'SeqSetIndefinite':decode('SetS3', Bi), - - ok. |