From 64e87c87bcda295da38e615b64068e1f9eaba1fd Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 28 Dec 2024 23:37:58 +0100
Subject: [PATCH]   * apply OptPass1OP to SLT/SLTU as well

---
 compiler/riscv/aoptcpurv.pas | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/compiler/riscv/aoptcpurv.pas b/compiler/riscv/aoptcpurv.pas
index 380933bf29..f06d913edd 100644
--- a/compiler/riscv/aoptcpurv.pas
+++ b/compiler/riscv/aoptcpurv.pas
@@ -607,7 +607,9 @@ implementation
                       RemoveInstr(p);
 
                       result:=true;
-                    end;
+                    end
+                  else
+                    result:=OptPass1OP(p);
                 end;
               A_SLTIU:
                 begin
@@ -673,8 +675,8 @@ implementation
               A_MULH,
               A_MULHSU,
               A_MULHU,
-              A_XORI,
               A_ORI,
+              A_XORI,
               A_AND,
               A_OR,
               A_XOR,