Browse Source

* also check for Nil symtables in tsymtable.includeoption

git-svn-id: trunk@43567 -
svenbarth 5 years ago
parent
commit
6edf6cad2c
1 changed files with 4 additions and 0 deletions
  1. 4 0
      compiler/symbase.pas

+ 4 - 0
compiler/symbase.pas

@@ -284,6 +284,10 @@ implementation
         while assigned(st.defowner) do
           begin
             st:=st.defowner.owner;
+            { this can happen for specializations of routines that are not yet
+              owned cause they might be thrown away again }
+            if not assigned(st) then
+              break;
             { the flag is already set, so by definition it is set in the
               owning symtables as well }
             if option in st.tableoptions then