-- B o d y --
-- (Version for x86) --
-- --
--- $Revision$
--- --
-- Copyright (C) 1999-2002 Ada Core Technologies, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- covered by the GNU Public License. --
-- --
-- GNAT was originally developed by the GNAT team at New York University. --
--- It is now maintained by Ada Core Technologies Inc (http://www.gnat.com). --
+-- Extensive contributions were provided by Ada Core Technologies Inc. --
-- --
------------------------------------------------------------------------------
return To_Address (MS.eip);
else
-- When doing a call the return address is pushed to the stack.
- -- We want to return the call point address, so we subtract
+ -- We want to return the call point address, so we substract
-- Asm_Call_Size from the return address. This value is set
-- to 5 as an asm call takes 5 bytes on x86 architectures.