diff options
| author | Björn Gustavsson <[email protected]> | 2013-02-25 15:19:13 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2013-05-31 14:52:15 +0200 |
| commit | ab7f7f53dc75cdf6ff05abd5663b1c2add39963c (patch) | |
| tree | 9d629245cb7b8ad33bc31947e7e7418c568454ad /lib/asn1/src/asn1ct_gen_ber_bin_v2.erl | |
| parent | 509ccd85ef448f5843716d4b51a8b07f875cdfda (diff) | |
| download | otp-ab7f7f53dc75cdf6ff05abd5663b1c2add39963c.tar.gz otp-ab7f7f53dc75cdf6ff05abd5663b1c2add39963c.tar.bz2 otp-ab7f7f53dc75cdf6ff05abd5663b1c2add39963c.zip | |
Eliminate general use of #typereference{}
The record #typereference{} is only used internally within
the asn1ct_parser2 module (the parser translates it to
an #'Externaltypereference{} record).
Diffstat (limited to 'lib/asn1/src/asn1ct_gen_ber_bin_v2.erl')
| -rw-r--r-- | lib/asn1/src/asn1ct_gen_ber_bin_v2.erl | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/lib/asn1/src/asn1ct_gen_ber_bin_v2.erl b/lib/asn1/src/asn1ct_gen_ber_bin_v2.erl index 19f387bf2c..3a98cbb452 100644 --- a/lib/asn1/src/asn1ct_gen_ber_bin_v2.erl +++ b/lib/asn1/src/asn1ct_gen_ber_bin_v2.erl @@ -141,8 +141,6 @@ gen_encode_user(Erules,D) when is_record(D,typedef) -> {primitive,bif} -> gen_encode_prim(ber,Type,"TagIn","Val"), emit([".",nl]); - #typereference{val=Ename} -> - emit([" 'enc_",Ename,"'(Val, TagIn).",nl]); #'Externaltypereference'{module=CurrentMod,type=Etype} -> emit([" 'enc_",Etype,"'(Val, TagIn).",nl]); #'Externaltypereference'{module=Emod,type=Etype} -> @@ -1241,10 +1239,6 @@ emit_inner_of_fun(Type,_) when is_record(Type,type) -> X#tag.form,X#tag.number)||X <- OTag], emit([indent(9),Def," ->",nl,indent(12)]), gen_encode_prim(ber,Type,{asis,lists:reverse(Tag)},"Val"); - TRef when is_record(TRef,typereference) -> - T = TRef#typereference.val, - emit([indent(9),T," ->",nl,indent(12),"'enc_",T, - "'(Val)"]); #'Externaltypereference'{module=CurrMod,type=T} -> emit([indent(9),T," ->",nl,indent(12),"'enc_",T, "'(Val)"]); @@ -1481,8 +1475,6 @@ mkfuncname(WhatKind,DecOrEnc) -> % io:format("CurrMod: ~p, Mod: ~p~n",[CurrMod,Mod]), lists:concat(["'",Mod,"':'",DecOrEnc,"_",EType,"'"]) end; - #'typereference'{val=EType} -> - lists:concat(["'",DecOrEnc,"_",EType,"'"]); 'ASN1_OPEN_TYPE' -> lists:concat(["'",DecOrEnc,"_",WhatKind,"'"]) |