paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-13 22:22:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

fix compilation for win32

Browse Source 
git-svn-id: trunk@5683 -
This commit is contained in:
vincents 2004-07-15 17:29:59 +00:00
parent cd9a3b8c9f
commit c75e39c844
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
components/codetools/memcheck.pas
View File

@ -764,10 +764,10 @@ procedure CheckPointer(p : pointer);[saveregisters,public, alias : 'FPC_CHECKPOI
var
i : ptrint;
pp : pheap_mem_info;
{$IF go32v2 or win32}
{$if defined(go32v2) or defined(win32)}
get_ebp,stack_top : longword;
data_end : longword;
{$ENDIF}
{$endif}
label
_exit;
begin
@ -2318,6 +2318,9 @@ end.
{
$Log$
Revision 1.33 2004/07/15 17:29:59 vincents
fix compilation for win32
Revision 1.32 2004/07/13 21:57:53 vincents
fix typos in defines