From 71569a06212c807b53de5ac910cdaa93ddacc456 Mon Sep 17 00:00:00 2001
From: Ivan Bondarev <ibond84@googlemail.com>
Date: Wed, 3 May 2023 20:06:46 +0200
Subject: [PATCH] working changes

---
 SyntaxVisitors/LightSymInfoVisitors/SymInfoCollect1.cs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/SyntaxVisitors/LightSymInfoVisitors/SymInfoCollect1.cs b/SyntaxVisitors/LightSymInfoVisitors/SymInfoCollect1.cs
index c8789e599..ce89718e2 100644
--- a/SyntaxVisitors/LightSymInfoVisitors/SymInfoCollect1.cs
+++ b/SyntaxVisitors/LightSymInfoVisitors/SymInfoCollect1.cs
@@ -126,7 +126,8 @@ namespace PascalABCCompiler.SyntaxTree
                 //case repeat_node rep:
                 case case_node cas:
                     PreExitScope(st);
-                    Current = Current.Parent;
+                    if (Current != null)
+                        Current = Current.Parent;
                     break;
             }
         }