File 0636-tftp-Fix-erlang-get_stacktrace-warning.patch of Package erlang

From d76a5b99f6a10814722adf0e46a38fdceeda9010 Mon Sep 17 00:00:00 2001
From: Hans Nilsson <hans@erlang.org>
Date: Tue, 26 Nov 2019 15:39:51 +0100
Subject: [PATCH 1/2] tftp: Fix erlang:get_stacktrace warning

---
 lib/tftp/src/tftp_engine.erl | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/lib/tftp/src/tftp_engine.erl b/lib/tftp/src/tftp_engine.erl
index 78a105bcc8..aeb0b27084 100644
--- a/lib/tftp/src/tftp_engine.erl
+++ b/lib/tftp/src/tftp_engine.erl
@@ -883,15 +883,14 @@ do_send_msg(#config{udp_socket = Socket, udp_host = RemoteHost, udp_port = Remot
     %%  DumpPath  ->
     %%      trace_udp_send(Req, Msg, IoList, DumpPath)
     %% end,
-    Res = gen_udp:send(Socket, RemoteHost, RemotePort, IoList),
-    case Res of
-        ok ->
-            ok;
-        {error, einval = Reason} ->
+    try
+        ok = gen_udp:send(Socket, RemoteHost, RemotePort, IoList)
+    catch
+        error:{badmatch,{error,einval=Reason}}:StackTrace ->
             error_msg(Config,
                       "Stacktrace; ~p\n gen_udp:send(~p, ~p, ~p, ~p) -> ~p\n", 
-                      [erlang:get_stacktrace(), Socket, RemoteHost, RemotePort, IoList, {error, Reason}]);
-        {error, Reason} ->
+                      [StackTrace, Socket, RemoteHost, RemotePort, IoList, {error, Reason}]);
+        error:{badmatch,{error,Reason}} ->
             {error, Reason} 
     end.
 
-- 
2.16.4