Explorar o código

* don't crash in case a symbol is not found in type/var/const section

git-svn-id: trunk@23264 -
florian %!s(int64=12) %!d(string=hai) anos
pai
achega
288820715d
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/pexpr.pas

+ 1 - 1
compiler/pexpr.pas

@@ -2210,7 +2210,7 @@ implementation
                  begin
                    { if a generic is parsed and when we are inside an with block,
                      a symbol might not be defined }
-                   if (df_generic in current_procinfo.procdef.defoptions) and
+                   if assigned(current_procinfo) and (df_generic in current_procinfo.procdef.defoptions) and
                       findwithsymtable then
                      begin
                        { create dummy symbol, it will be freed later on }