1
0
mirror of https://github.com/moparisthebest/Simba synced 2024-08-13 16:53:59 -04:00

MML: Increase function limit from 400 to 500.

This commit is contained in:
John P (Dgby714) 2010-12-18 14:35:27 -05:00
parent 8be94c404a
commit 932e4950d3

View File

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