Browse Source

* Remove debug writelns

Michaël Van Canneyt 1 year ago
parent
commit
afd7d9965a
1 changed files with 0 additions and 7 deletions
  1. 0 7
      packages/wasm-oi/src/wasm.debuginspector.rtti.pas

+ 0 - 7
packages/wasm-oi/src/wasm.debuginspector.rtti.pas

@@ -151,20 +151,14 @@ var
 
 
 begin
 begin
   lFLags:=[];
   lFLags:=[];
-  Writeln('Converting vis 0 ',VisibilitiesToString(lFlags));
   if (aFlags and WASM_SENDPROPERTYFLAG_PRIVATE) <> 0 then
   if (aFlags and WASM_SENDPROPERTYFLAG_PRIVATE) <> 0 then
     include(lFlags,mvPrivate);
     include(lFlags,mvPrivate);
-  Writeln('Converting vis 1 ',VisibilitiesToString(lFlags));
   if (aFlags and WASM_SENDPROPERTYFLAG_PROTECTED) <> 0 then
   if (aFlags and WASM_SENDPROPERTYFLAG_PROTECTED) <> 0 then
     include(lFlags,mvProtected);
     include(lFlags,mvProtected);
-  Writeln('Converting vis 2 ',VisibilitiesToString(lFlags));
   if (aFlags and WASM_SENDPROPERTYFLAG_PUBLIC) <> 0 then
   if (aFlags and WASM_SENDPROPERTYFLAG_PUBLIC) <> 0 then
     include(lFlags,mvPublic);
     include(lFlags,mvPublic);
-  Writeln('Converting vis 3 ',VisibilitiesToString(lFlags));
   if (aFlags and WASM_SENDPROPERTYFLAG_PUBLISHED) <> 0 then
   if (aFlags and WASM_SENDPROPERTYFLAG_PUBLISHED) <> 0 then
     include(lFlags,mvPublished);
     include(lFlags,mvPublished);
-  Writeln('Converting vis 4 ',VisibilitiesToString(lFlags));
-  Writeln('Converting vis a: ',Integer(lFlags));
   Result:=lFlags;
   Result:=lFlags;
 end;
 end;
 
 
@@ -176,7 +170,6 @@ var
 
 
 begin
 begin
   Vis:=PropertyFlagsToVisibilities(aFlags);
   Vis:=PropertyFlagsToVisibilities(aFlags);
-  Writeln('Converted vis: ',Integer(vis));
   Obj:=FindObject(aObjectID);
   Obj:=FindObject(aObjectID);
   if Obj=Nil then
   if Obj=Nil then
     Result:=WASMOI_INVALIDOBJECT
     Result:=WASMOI_INVALIDOBJECT