resolved wrong type reference to pointer type where a record type exists

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6666 8c9fc860-2736-0410-a75d-ab315db34111

source/FoxIntermediateBackend.Mod

@@ -12827,7 +12827,7 @@ TYPE
 						td := type(SyntaxTree.PointerType).typeDeclaration;
 						type := type(SyntaxTree.PointerType).pointerBase.resolved;
 					END;
-					IF (td = NIL) & (type IS SyntaxTree.RecordType) THEN 
+					IF  (type IS SyntaxTree.RecordType) & (type(SyntaxTree.RecordType).typeDeclaration # NIL) THEN 
 						td := type(SyntaxTree.RecordType).typeDeclaration;
 					END;
 					IF (td # NIL) & (type IS SyntaxTree.RecordType) THEN