File 2921-compile-Restrict-types-of-outfile-3.patch of Package erlang

From a6b66d89119e3ae9e4b34f17b97138776b750f0d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= <bjorn@erlang.org>
Date: Thu, 11 Feb 2021 12:57:40 +0100
Subject: [PATCH 11/18] compile: Restrict types of outfile/3

The Ext argument in outfile(Base, Ext, Opts) must now be a list
(the clause allowing an atom was not covered).
---
 lib/compiler/src/compile.erl | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/lib/compiler/src/compile.erl b/lib/compiler/src/compile.erl
index 8cb0b4381b..356d5eb014 100644
--- a/lib/compiler/src/compile.erl
+++ b/lib/compiler/src/compile.erl
@@ -1727,9 +1727,7 @@ erlfile(".", Base, Suffix) ->
 erlfile(Dir, Base, Suffix) ->
     filename:join(Dir, Base ++ Suffix).
 
-outfile(Base, Ext, Opts) when is_atom(Ext) ->
-    outfile(Base, atom_to_list(Ext), Opts);
-outfile(Base, Ext, Opts) ->
+outfile(Base, Ext, Opts) when is_list(Ext) ->
     Obase = case keyfind(outdir, 1, Opts) of
 		{outdir, Odir} -> filename:join(Odir, Base);
 		_Other -> Base			% Not found or bad format
-- 
2.26.2

openSUSE Build Service is sponsored by