File 5403-features-Tweak-tests-for-atoms-being-feature-keyword.patch of Package erlang

From 42129052e39fd62ad7ce65fe2b0284caf317afa3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Cons=20T=20=C3=85hs?= <cons@erlang.org>
Date: Tue, 24 May 2022 16:09:08 +0200
Subject: [PATCH 3/3] [features] Tweak tests for atoms being feature keywords

---
 erts/test/lux/feature_erlc.lux   | 3 +++
 erts/test/lux/input/foo.erl      | 2 +-
 erts/test/lux/input/ignorant.erl | 6 +++++-
 3 files changed, 9 insertions(+), 2 deletions(-)

diff --git a/erts/test/lux/feature_erlc.lux b/erts/test/lux/feature_erlc.lux
index 11bc8eb3e4..e28a264904 100644
--- a/erts/test/lux/feature_erlc.lux
+++ b/erts/test/lux/feature_erlc.lux
@@ -354,8 +354,10 @@
     ?$ERLPROMPT
 
 [shell cmds]
+    -atom 'ifnot'
     [invoke compile ignorant.erl "+warn_keywords"]
     # Note: not all messges are checked
+    ?atom 'until' is reserved in the experimental feature 'while_expr'
     ?atom 'while' is reserved in the experimental feature 'while_expr'
     ?atom 'until' is reserved in the experimental feature 'while_expr'
     ?atom 'ifn' is reserved in the experimental feature 'ifn_expr'
@@ -363,6 +365,7 @@
 
     [invoke compile ignorant.erl "+warn_keywords -Werror"]
     # Note: not all messges are checked
+    ?atom 'until' is reserved in the experimental feature 'while_expr'
     ?atom 'while' is reserved in the experimental feature 'while_expr'
     ?atom 'until' is reserved in the experimental feature 'while_expr'
     ?atom 'ifn' is reserved in the experimental feature 'ifn_expr'
diff --git a/erts/test/lux/input/foo.erl b/erts/test/lux/input/foo.erl
index 60f2aca8f6..565d9f74a2 100644
--- a/erts/test/lux/input/foo.erl
+++ b/erts/test/lux/input/foo.erl
@@ -3,4 +3,4 @@
 -export [foo/0].
 
 foo() ->
-    foo.
+    ['maybe', 'else'].
diff --git a/erts/test/lux/input/ignorant.erl b/erts/test/lux/input/ignorant.erl
index d010b5cf72..7db99760a5 100644
--- a/erts/test/lux/input/ignorant.erl
+++ b/erts/test/lux/input/ignorant.erl
@@ -26,8 +26,12 @@
 -export([foo/0,
          frob/1,
          bar/0,
+         until/1,
          baz/1]).
 
+until(X) ->
+    until(X).
+
 foo() ->
     [ifn, while, until].
 
@@ -37,4 +41,4 @@ bar() ->
     [until, while].
 
 baz(ifn) ->
-    true.
+    {true, 'ifnot'}.
-- 
2.35.3

openSUSE Build Service is sponsored by