From f368071146393bafe22fad2d18ead197849af291 Mon Sep 17 00:00:00 2001
From: Stephen Heumann <stephenheumann@gmail.com>
Date: Sat, 6 Mar 2021 15:02:51 -0600
Subject: [PATCH] Do some more checks for invalid sym files.

---
 Header.pas | 21 +++++++++++++++++++--
 1 file changed, 19 insertions(+), 2 deletions(-)

diff --git a/Header.pas b/Header.pas
index e47bddc..ebf33ce 100644
--- a/Header.pas
+++ b/Header.pas
@@ -1550,6 +1550,11 @@ var
          
          p_fenv_access: fenvAccess := boolean(ReadByte);
 
+         otherwise: begin
+            PurgeSymbols;
+            DestroySymbolFile;
+            TermError(12);
+            end;
          end; {case}
       end; {while}
    symPtr := pePtr;
@@ -1677,8 +1682,14 @@ var
         		end; {while}
         	     end;
 
-		  otherwise: ;
-         
+        	  enumType: ;
+
+        	  otherwise: begin
+        	     PurgeSymbols;
+        	     DestroySymbolFile;
+        	     TermError(12);
+        	     end;
+
         	  end; {case}
                end; {case 0}
 
@@ -1716,6 +1727,12 @@ var
             15: tp := uCharPtr;
             16: tp := shortPtr;
             17: tp := uShortPtr;
+
+            otherwise: begin
+               PurgeSymbols;
+               DestroySymbolFile;
+               TermError(12);
+               end;
             end; {case}
 	 end; {ReadType}