From 8a76ad9eccbaf02dd8ada2961a495d2754aeb9b1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= Date: Tue, 14 Mar 2017 09:19:20 +0100 Subject: Remove unused clauses in asn1ct_gen:emit/1 --- lib/asn1/src/asn1ct_gen.erl | 13 ------------- 1 file changed, 13 deletions(-) diff --git a/lib/asn1/src/asn1ct_gen.erl b/lib/asn1/src/asn1ct_gen.erl index 8b101bbd70..56ea28d5cf 100644 --- a/lib/asn1/src/asn1ct_gen.erl +++ b/lib/asn1/src/asn1ct_gen.erl @@ -956,9 +956,6 @@ hrl_protector(OutFile) -> emit(Term) -> ok = file:write(get(gen_file_out), do_emit(Term)). -do_emit({external,_M,T}) -> - do_emit(T); - do_emit({prev,Variable}) when is_atom(Variable) -> do_emit({var,asn1ct_name:prev(Variable)}); @@ -972,10 +969,6 @@ do_emit({var,Variable}) when is_atom(Variable) -> [Head|V] = atom_to_list(Variable), [Head-32|V]; -do_emit({var,Variable}) -> - [Head|V] = Variable, - [Head-32|V]; - do_emit({asis,What}) -> io_lib:format("~w", [What]); @@ -990,9 +983,6 @@ do_emit(nl) -> do_emit(com) -> ","; -do_emit(tab) -> - " "; - do_emit(What) when is_integer(What) -> integer_to_list(What); @@ -1002,9 +992,6 @@ do_emit(What) when is_list(What), is_integer(hd(What)) -> do_emit(What) when is_atom(What) -> atom_to_list(What); -do_emit(What) when is_tuple(What) -> - [do_emit(E) || E <- tuple_to_list(What)]; - do_emit(What) when is_list(What) -> [do_emit(E) || E <- What]. -- cgit v1.2.3