Browse Source

pastojs: fixed skipping class interface

git-svn-id: trunk@38025 -
Mattias Gaertner 7 years ago
parent
commit
b028dcdce1
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/pastojs/src/fppas2js.pp

+ 1 - 1
packages/pastojs/src/fppas2js.pp

@@ -1902,7 +1902,7 @@ begin
       ClassEl:=TPasClassType(El);
       ClassEl:=TPasClassType(El);
       if ClassEl.IsForward then continue;
       if ClassEl.IsForward then continue;
       if ClassEl.ObjKind=okInterface then
       if ClassEl.ObjKind=okInterface then
-        exit;
+        continue;
       ClassScope:=El.CustomData as TPas2JSClassScope;
       ClassScope:=El.CustomData as TPas2JSClassScope;
       OldScopeCount:=FOverloadScopes.Count;
       OldScopeCount:=FOverloadScopes.Count;