File 2982-dialyzer-Fix-a-silly-issue-in-testcase-printout-diff.patch of Package erlang
From 515d1fd1a6ac90e085fa37bb0c724c6c514c2c37 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20H=C3=B6gberg?= <john@erlang.org>
Date: Fri, 15 Nov 2024 19:15:17 +0100
Subject: [PATCH 1/2] dialyzer: Fix a silly issue in testcase printout diffing
---
lib/dialyzer/test/dialyzer_common.erl | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lib/dialyzer/test/dialyzer_common.erl b/lib/dialyzer/test/dialyzer_common.erl
index 735e22e020..764d2c06e0 100644
--- a/lib/dialyzer/test/dialyzer_common.erl
+++ b/lib/dialyzer/test/dialyzer_common.erl
@@ -209,8 +209,8 @@ create_all_suites() ->
lists:foreach(fun create_suite/1, Suites).
escape_strings({differ, TestCase, List}) ->
- Map = fun({T,L,S}) -> {T,L,xmerl_lib:export_text(S)} end,
- {differ, TestCase, lists:keysort(3, lists:map(Map, List))}.
+ Escaped = [{T, L, xmerl_lib:export_text(S)} || {T, L, S} <- List],
+ {differ, TestCase, lists:keysort(2, Escaped)}.
-spec get_suites(file:filename()) -> [string()].
--
2.43.0