瀏覽代碼

* commented a few left over "alias" debug msg

git-svn-id: trunk@19049 -
marco 14 年之前
父節點
當前提交
2aebae2846
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      utils/fpdoc/dglobals.pp

+ 2 - 2
utils/fpdoc/dglobals.pp

@@ -813,11 +813,11 @@ begin
         result:=ResolveAliasType(clname);
         if assigned(result) then
           begin
-            writeln('found alias ',clname,' (',s,') ',result.classname);  
+//            writeln('found alias ',clname,' (',s,') ',result.classname);  
           end
         else
           begin
-            writeln('new alias ',clname,' (',s,') ');
+//            writeln('new alias ',clname,' (',s,') ');
             cl2.addref;
             Result := TPasAliasType(CreateElement(TPasAliasType,s,module.interfacesection,vispublic,'',0));
             module.interfacesection.Declarations.Add(Result);