소스 검색

* removed a debug writeln, unfortunately commited by r15077

git-svn-id: trunk@15079 -
ivost 15 년 전
부모
커밋
6560ed87e9
1개의 변경된 파일0개의 추가작업 그리고 1개의 파일을 삭제
  1. 0 1
      rtl/inc/objpas.inc

+ 0 - 1
rtl/inc/objpas.inc

@@ -632,7 +632,6 @@
           Getter.Data := Instance;
           if Assigned(IEntry) and Assigned(Instance) then
           begin
-            writeln(IEntry^.IType);
             case IEntry^.IType of
               etStandard:
                   Pointer(Obj) := PByte(instance)+IEntry^.IOffset;