diff options
| author | Björn Gustavsson <bjorn@erlang.org> | 2014-01-20 14:49:56 +0100 |
|---|---|---|
| committer | Björn Gustavsson <bjorn@erlang.org> | 2014-01-24 16:24:55 +0100 |
| commit | bd9e8cf011ee6c1391c134287f0fe877e51c54b8 (patch) | |
| tree | 52b952143cc0b854de371bdc2116a05a9a90e53e /lib/asn1/src/asn1ct_gen.erl | |
| parent | 1658a7fdd1dfa08a4fa2b9c94fb2d07799e15b20 (diff) | |
| download | erlang-bd9e8cf011ee6c1391c134287f0fe877e51c54b8.tar.gz | |
Add legacy_erlang_types
Diffstat (limited to 'lib/asn1/src/asn1ct_gen.erl')
| -rw-r--r-- | lib/asn1/src/asn1ct_gen.erl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/asn1/src/asn1ct_gen.erl b/lib/asn1/src/asn1ct_gen.erl index 37b33194d0..71d870b4ce 100644 --- a/lib/asn1/src/asn1ct_gen.erl +++ b/lib/asn1/src/asn1ct_gen.erl @@ -790,7 +790,8 @@ gen_decode_constructed(Erules,Typename,InnerType,D) when is_record(D,typedef) -> pgen_exports(Erules,_Module,{Types,Values,_,_,Objects,ObjectSets}) -> - emit(["-export([encoding_rule/0,bit_string_format/0]).",nl]), + emit(["-export([encoding_rule/0,bit_string_format/0," + " legacy_erlang_types/0]).",nl]), case Types of [] -> ok; _ -> @@ -1022,7 +1023,9 @@ gen_info_functions(Erules) -> emit(["encoding_rule() -> ", {asis,Erules},".",nl,nl, "bit_string_format() -> ", - {asis,asn1ct:get_bit_string_format()},".",nl,nl]). + {asis,asn1ct:get_bit_string_format()},".",nl,nl, + "legacy_erlang_types() -> ", + {asis,asn1ct:use_legacy_types()},".",nl,nl]). gen_decode_partial_incomplete(ber) -> case {asn1ct:read_config_data(partial_incomplete_decode), |