Browse Source

* Do not dereference null pointer, 'real' (not script-provided) common symbols don't have objsection assigned at this point.

git-svn-id: trunk@21748 -
sergei 13 years ago
parent
commit
1c5fa5448e
1 changed files with 2 additions and 1 deletions
  1. 2 1
      compiler/ogbase.pas

+ 2 - 1
compiler/ogbase.pas

@@ -2169,7 +2169,8 @@ implementation
                         exesym.ObjSymbol:=objsym;
                         exesym.State:=symstate_common;
                       end;
-                    if objsym.objsection.objdata=internalObjData then
+                    if assigned(objsym.objsection) and
+                      (objsym.objsection.objdata=internalObjData) then
                       FProvidedObjSymbols.add(objsym)
                     else
                       CommonObjSymbols.add(objsym);