mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-05 00:45:14 -05:00
Looks like object creation now actually works.. :-)
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@142 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
parent
ffb90926b6
commit
303851af92
@ -566,7 +566,7 @@ begin
|
||||
btchar,btU8, btS8: tbtu8(res.dta^) := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 1, nil);
|
||||
{$IFNDEF PS_NOWIDESTRING}btWideChar, {$ENDIF}btu16, bts16: tbtu16(res.dta^) := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 2, nil);
|
||||
btClass :
|
||||
{$IFDEF FPC_OLD_FIX}
|
||||
{$IFDEF FPC}
|
||||
tbtu32(res.dta^) := RealCall_Register(Address, EDX, EAX, ECX,
|
||||
@Stack[Length(Stack) - 3], Length(Stack) div 4, 4, nil);
|
||||
{$ELSE}
|
||||
|
Loading…
Reference in New Issue
Block a user