moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-24 18:22:25 -05:00
Code Issues Releases Wiki Activity

MML: Increase function limit from 400 to 500.

Browse Source
This commit is contained in:
John P (Dgby714) 2010-12-18 14:35:27 -05:00
parent 8be94c404a
commit 932e4950d3
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Units/MMLAddon/mmlpsthread.pas
View File

@ -539,7 +539,7 @@ end;
procedure AddFunction( Ptr : Pointer; DeclStr : String); procedure AddFunction( Ptr : Pointer; DeclStr : String);
begin; begin;
if c >= 400 then if c >= 500 then
raise exception.create('PSThread.LoadMethods: Exported more than 400 functions'); raise exception.create('PSThread.LoadMethods: Exported more than 400 functions');
Result[c].FuncDecl:= DeclStr; Result[c].FuncDecl:= DeclStr;
Result[c].FuncPtr:= Ptr; Result[c].FuncPtr:= Ptr;
@ -550,7 +550,7 @@ end;
begin begin
c := 0; c := 0;
CurrSection := 'Other'; CurrSection := 'Other';
SetLength(Result,400); SetLength(Result, 500);
{$i PSInc/psexportedmethods.inc} {$i PSInc/psexportedmethods.inc}