fix for delphi7

remobjects · Apr 22, 2016 · c56385e · c56385e
1 parent 4d5adcd
commit c56385e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Source/x86.inc b/Source/x86.inc
@@ -594,7 +594,7 @@ begin
                   tbtu32(res.dta^) := RealCall_Register(Address, EDX, EAX, ECX,
                   @Stack[Length(Stack) - 3], Length(Stack) div 4, 4, nil)
                 else
-             {$ENDIF}
+             {$IFEND}
                   tbtu32(res.dta^) := RealCall_Register(Address, EAX, EDX, ECX,
                   @Stack[Length(Stack) - 3], Length(Stack) div 4, 4, nil);
               end;