File 2438-Remove-unused-clauses-in-asn1ct_gen-emit-1... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 2438-Remove-unused-clauses-in-asn1ct_gen-emit-1.patch of Package erlang

From 8a76ad9eccbaf02dd8ada2961a495d2754aeb9b1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= <bjorn@erlang.org>
Date: Tue, 14 Mar 2017 09:19:20 +0100
Subject: [PATCH 07/10] 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 8b101bbd7..56ea28d5c 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].
 
-- 
2.12.0

Places

File 2438-Remove-unused-clauses-in-asn1ct_gen-emit-1.patch of Package erlang

Places