File 1181-set-proper-triplets-for-all-Windows.patch of Package erlang

From f562828b0bab3b689dff6933b7732338b6678db2 Mon Sep 17 00:00:00 2001
From: Cocoa <i@uwucocoa.moe>
Date: Sun, 27 Oct 2024 16:06:27 +0000
Subject: [PATCH] set proper triplets for all Windows
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Cocoa <i@uwucocoa.moe>
Co-authored-by: Lukas Backström (FKA Larsson) <garazdawi@gmail.com>
---
 erts/emulator/utils/make_version | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/erts/emulator/utils/make_version b/erts/emulator/utils/make_version
index 294520e135..f3172d184b 100755
--- a/erts/emulator/utils/make_version
+++ b/erts/emulator/utils/make_version
@@ -52,6 +52,16 @@ my $architecture = shift;
 defined $architecture or die "No architecture specified";
 $architecture =~ s&^.*[/\\]&&;	# Remove directory part if any
 
+if ($architecture eq "win32") {
+  if ($ENV{"CONFIG_SUBTYPE"} eq "arm64" || $ENV{"CONFIG_SUBTYPE"} eq "x64_arm64") {
+    $architecture = "aarch64-pc-windows";
+  } elsif ($ENV{"CONFIG_SUBTYPE"} eq "win64") {
+    $architecture = "x86_64-pc-windows";
+  } elsif ($ENV{"CONFIG_SUBTYPE"} eq "win32") {
+    $architecture = "i686-pc-windows";
+  }
+}
+
 open(FILE, ">$outputfile") or die "Can't create $outputfile: $!";
 
 print FILE <<EOF;
-- 
2.43.0