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