diff options
| author | Björn Gustavsson <[email protected]> | 2013-07-02 07:41:03 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2013-08-30 10:13:17 +0200 |
| commit | 280c6a1d35f39eb285d4d9e41ffa3e7ae298e41a (patch) | |
| tree | c70a8af965e0f3ea344c0240d813379bc8665e79 /lib/asn1/src/asn1ct_gen_per.erl | |
| parent | 9033435e5b8051608c7e867051c1a8e6b946d2a9 (diff) | |
| download | otp-280c6a1d35f39eb285d4d9e41ffa3e7ae298e41a.tar.gz otp-280c6a1d35f39eb285d4d9e41ffa3e7ae298e41a.tar.bz2 otp-280c6a1d35f39eb285d4d9e41ffa3e7ae298e41a.zip | |
PER/UPER: Fix encoding of an object set with multiple inlined constructs
Also extend the test suite with more tests of inlined constructs
in object sets.
Diffstat (limited to 'lib/asn1/src/asn1ct_gen_per.erl')
| -rw-r--r-- | lib/asn1/src/asn1ct_gen_per.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/asn1/src/asn1ct_gen_per.erl b/lib/asn1/src/asn1ct_gen_per.erl index 17ecdeefbf..aefcdfecc8 100644 --- a/lib/asn1/src/asn1ct_gen_per.erl +++ b/lib/asn1/src/asn1ct_gen_per.erl @@ -650,13 +650,13 @@ gen_objset_enc(Erule, ObjSetName, UniqueName, [{ObjName,Val,Fields}|T], ObjSetName, NthObj); {CurrMod,Name} -> emit({" fun 'enc_",Name,"'/3"}), - {[],0}; + {[],NthObj}; {ModName,Name} -> emit_ext_encfun(ModName,Name), - {[],0}; + {[],NthObj}; _Other -> emit({" fun 'enc_",ObjName,"'/3"}), - {[],0} + {[],NthObj} end, emit({";",nl}), gen_objset_enc(Erule, ObjSetName, UniqueName, T, ClName, ClFields, |