diff options
| author | Björn Gustavsson <[email protected]> | 2013-02-13 15:46:27 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2013-02-14 16:04:57 +0100 |
| commit | f894be67127261270739039ac291ecc3353c470b (patch) | |
| tree | 706e91d5bc4588ea844b43f0886c704702ce10b6 /lib/asn1/src/asn1ct_gen_per.erl | |
| parent | 353f78b6e1f786e3f0f4b335c79146e1cfd38210 (diff) | |
| download | otp-f894be67127261270739039ac291ecc3353c470b.tar.gz otp-f894be67127261270739039ac291ecc3353c470b.tar.bz2 otp-f894be67127261270739039ac291ecc3353c470b.zip | |
per,uper: Fix breakage of compilation of InformationFramework
Commit f16f43446a04c459486356c0b4ad517cc9201895 broke compilation
of InformationFramework for per and uper.
Diffstat (limited to 'lib/asn1/src/asn1ct_gen_per.erl')
| -rw-r--r-- | lib/asn1/src/asn1ct_gen_per.erl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/asn1/src/asn1ct_gen_per.erl b/lib/asn1/src/asn1ct_gen_per.erl index 0d6620667f..fac233532b 100644 --- a/lib/asn1/src/asn1ct_gen_per.erl +++ b/lib/asn1/src/asn1ct_gen_per.erl @@ -1174,12 +1174,12 @@ gen_dec_imm_1('UTF8String', _Constraint, Aligned) -> asn1ct_imm:per_dec_restricted_string(Aligned); gen_dec_imm_1('REAL', _Constraint, Aligned) -> asn1ct_imm:per_dec_real(Aligned); -gen_dec_imm_1(#'ObjectClassFieldType'{}=TypeName, Constraint, Aligned) -> +gen_dec_imm_1(#'ObjectClassFieldType'{}=TypeName, _Constraint, Aligned) -> case asn1ct_gen:get_inner(TypeName) of - {fixedtypevaluefield,_,InnerType} -> - gen_dec_imm_1(InnerType, Constraint, Aligned); - T -> - gen_dec_imm_1(T, Constraint, Aligned) + {fixedtypevaluefield,_,#type{def=InnerType,constraint=C}} -> + gen_dec_imm_1(InnerType, C, Aligned); + #type{def=T,constraint=C} -> + gen_dec_imm_1(T, C, Aligned) end. gen_dec_bit_string(F, Imm) -> |