Explorar el Código

* removed a debug writeln, unfortunately commited by r15077

git-svn-id: trunk@15079 -
ivost hace 15 años
padre
commit
6560ed87e9
Se han modificado 1 ficheros con 0 adiciones y 1 borrados
  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;