From c9e3e967671e6a9cea4cea93d99bdd383f4df2f2 Mon Sep 17 00:00:00 2001
From: "J. Gareth \"Curious Kit\" Moreton" <gareth@moreton-family.com>
Date: Sat, 28 May 2022 23:32:45 +0100
Subject: [PATCH]   * do_optcse and do_consttovar now return rootnode rather
 than nil

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

diff --git a/compiler/optcse.pas b/compiler/optcse.pas
index 527ca19652..1182028a00 100644
--- a/compiler/optcse.pas
+++ b/compiler/optcse.pas
@@ -592,7 +592,7 @@ unit optcse;
         writeln('====================================================================================');
         writeln;
 {$endif csedebug}
-        result:=nil;
+        result:=rootnode;
       end;
 
     type
@@ -850,7 +850,7 @@ unit optcse;
         writeln('====================================================================================');
         writeln;
   {$endif csedebug}
-        result:=nil;
+        result:=rootnode;
       end;
 
 end.