From 52147baa0495218ea06c588d1f849106f480c4f3 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Wed, 31 May 2023 20:26:27 +0200
Subject: [PATCH]   * correct tripletcpustr, resolves #40301

---
 compiler/riscv64/tripletcpu.pas | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/compiler/riscv64/tripletcpu.pas b/compiler/riscv64/tripletcpu.pas
index 3067e65ae5..5f5fee09b8 100644
--- a/compiler/riscv64/tripletcpu.pas
+++ b/compiler/riscv64/tripletcpu.pas
@@ -37,10 +37,7 @@ uses
 
 function tripletcpustr(tripletstyle: ttripletstyle): ansistring;
   begin
-    if tripletstyle=triplet_llvm then
-      result:='sparcv9'
-    else
-      result:='sparc64'
+    result:='riscv64'
   end;