From e6f71b6accd4949b8dec86fdd93d27e0c109732b Mon Sep 17 00:00:00 2001
From: Michael VAN CANNEYT <mvancanneyt@tixeo.com>
Date: Mon, 6 Mar 2023 18:45:27 +0100
Subject: [PATCH] * Do not crash when module pointer is nil

---
 compiler/symtable.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/compiler/symtable.pas b/compiler/symtable.pas
index 35ab583eff..bb15248c15 100644
--- a/compiler/symtable.pas
+++ b/compiler/symtable.pas
@@ -3623,8 +3623,9 @@ implementation
       var
         pmod : tmodule;
       begin
-        pmod:=tmodule(pm);
         result:=false;
+        if not assigned(pm) then exit;
+        pmod:=tmodule(pm);
         if assigned(pmod.globalsymtable) then
           begin
             srsym:=tsym(pmod.globalsymtable.Find(s));