* External objc class forward definition

packages/fcl-passrc/tests/tcclasstype.pas

@@ -74,6 +74,7 @@ type
     Procedure TestForward;
     Procedure TestForwardAndDeclaration;
     Procedure TestForwardAndDeclarationKeepForward;
+    Procedure TestForwardExternalObjCClass;
     Procedure TestOneInterface;
     Procedure TestTwoInterfaces;
     procedure TestOneSpecializedClass;
@@ -590,6 +591,14 @@ begin
   ParseClass;
 end;
 
+Procedure TTestClassType.TestForwardExternalObjCClass;
+begin
+  FStarted:=True;
+  FEnded:=True;
+  FDecl.Add('TMyClass = ObjcClass external');
+  ParseClass;
+end;
+
 procedure TTestClassType.TestForwardAndDeclaration;
 begin
   FStarted:=True;