File 0609-stdlib-Fix-gen_statem-callback-name.patch of Package erlang

From 9d05f75d76fc2e0f8ed84ad8ed5ee7c1da0df491 Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erlang.org>
Date: Fri, 13 Oct 2023 12:43:24 +0200
Subject: [PATCH 09/13] stdlib: Fix gen_statem callback name

---
 lib/stdlib/src/gen_statem.erl          | 4 ++--
 lib/stdlib/test/erl_internal_SUITE.erl | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/lib/stdlib/src/gen_statem.erl b/lib/stdlib/src/gen_statem.erl
index 8da88d3f9d..66fd7e8995 100644
--- a/lib/stdlib/src/gen_statem.erl
+++ b/lib/stdlib/src/gen_statem.erl
@@ -324,7 +324,7 @@
 %% Note that the only callbacks that have arity 3 are these
 %% StateName/3 callbacks and terminate/3, so the state name
 %% 'terminate' is unusable in this mode.
--callback state_name(
+-callback 'StateName'(
 	    'enter',
 	    OldStateName :: state_name(),
 	    data()) ->
@@ -418,7 +418,7 @@
     terminate/3, % Has got a default implementation
     code_change/4, % Only needed by advanced soft upgrade
     %%
-    state_name/3, % Just an example callback;
+    'StateName'/3, % Just an example callback;
     %% for callback_mode() =:= state_functions
     %% there has to be a StateName/3 callback function
     %% for every StateName in your state machine,
diff --git a/lib/stdlib/test/erl_internal_SUITE.erl b/lib/stdlib/test/erl_internal_SUITE.erl
index e626d85884..3f257a2baf 100644
--- a/lib/stdlib/test/erl_internal_SUITE.erl
+++ b/lib/stdlib/test/erl_internal_SUITE.erl
@@ -90,7 +90,7 @@ callbacks(gen_event) ->
      {handle_info,2}, {terminate,2}, {code_change,3},
      {format_status,1}, {format_status,2}];
 callbacks(gen_statem) ->
-    [{init, 1}, {callback_mode, 0}, {state_name, 3},
+    [{init, 1}, {callback_mode, 0}, {'StateName', 3},
      {handle_event, 4}, {terminate, 3}, {code_change, 4},
      {format_status, 1}, {format_status, 2}];
 callbacks(supervisor_bridge) ->
@@ -107,7 +107,7 @@ optional_callbacks(gen_fsm) ->
 optional_callbacks(gen_event) ->
     [{handle_info, 2}, {terminate, 2}, {code_change, 3}, {format_status, 1}, {format_status, 2}];
 optional_callbacks(gen_statem) ->
-    [{state_name, 3}, {handle_event, 4},
+    [{'StateName', 3}, {handle_event, 4},
      {terminate, 3}, {code_change, 4}, {format_status, 1}, {format_status, 2}];
 optional_callbacks(supervisor_bridge) ->
     [];
-- 
2.35.3