moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-28 03:52:23 -05:00
Code Issues Releases Wiki Activity

Simba: Removed a few debug WriteLns.

Browse Source
This commit is contained in:
John P (Dgby714) 2010-12-25 04:30:42 -05:00
parent 4f861ffb5d
commit a33f059944
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Units/MMLAddon/plugins.pas
View File

@ -123,17 +123,14 @@ begin
begin begin
if (GetTypeInfo(I, Plugins[NumPlugins].Types[I].TypeName, Plugins[NumPlugins].Types[I].TypeDef) < 0) then if (GetTypeInfo(I, Plugins[NumPlugins].Types[I].TypeName, Plugins[NumPlugins].Types[I].TypeDef) < 0) then
begin begin
WriteLn('Failed...');
Plugins[NumPlugins].Types[I].TypeName := ''; Plugins[NumPlugins].Types[I].TypeName := '';
Plugins[NumPlugins].Types[I].TypeDef := ''; Plugins[NumPlugins].Types[I].TypeDef := '';
end; end;
WriteLn(Plugins[NumPlugins].Types[I].TypeName + ' = ' + Plugins[NumPlugins].Types[I].TypeDef);
end; end;
end; end;
end; end;
ArrC := GetFuncCount(); ArrC := GetFuncCount();
WriteLn(ArrC);
Plugins[NumPlugins].MethodLen := ArrC; Plugins[NumPlugins].MethodLen := ArrC;
SetLength(Plugins[NumPlugins].Methods, ArrC); SetLength(Plugins[NumPlugins].Methods, ArrC);
@ -142,7 +139,6 @@ begin
begin; begin;
if (GetFuncInfo(I, pntr, PD) < 0) then if (GetFuncInfo(I, pntr, PD) < 0) then
Continue; Continue;
WriteLn(PD);
Plugins[NumPlugins].Methods[I].FuncPtr := pntr; Plugins[NumPlugins].Methods[I].FuncPtr := pntr;
Plugins[NumPlugins].Methods[I].FuncStr := PD; Plugins[NumPlugins].Methods[I].FuncStr := PD;