diff --git a/wst/trunk/ws_helper/wsdl_generator.pas b/wst/trunk/ws_helper/wsdl_generator.pas
index 1598ff05a..4b4a33144 100644
--- a/wst/trunk/ws_helper/wsdl_generator.pas
+++ b/wst/trunk/ws_helper/wsdl_generator.pas
@@ -168,8 +168,8 @@ begin
       end;
       g := TWsdlTypechemaGenerator.Create(Document) as IGenerator;
       for i := 0 to Pred(mdlLs.Count) do begin
+        mdl := TPasModule(mdlLs[i]);
         if (mdl <> AModule) then begin
-          mdl := TPasModule(mdlLs[i]);
           if mdl.InheritsFrom(TPasNativeModule) then
             Continue;
           s := ASymTable.GetExternalName(mdl);