mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-11 11:28:07 +02:00
* corrections for debug mode
This commit is contained in:
parent
2131196402
commit
457bd753c2
@ -85,7 +85,7 @@ var
|
|||||||
l : plongint;
|
l : plongint;
|
||||||
begin
|
begin
|
||||||
{ Force a SIGSEGV }
|
{ Force a SIGSEGV }
|
||||||
l:=$ffffffff;
|
l:=pointer (ptrint ($ffffffff));
|
||||||
l^:=1;
|
l^:=1;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -230,7 +230,10 @@ end.
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.9 2003-09-29 14:36:59 peter
|
Revision 1.10 2004-09-15 19:23:26 hajny
|
||||||
|
* corrections for debug mode
|
||||||
|
|
||||||
|
Revision 1.9 2003/09/29 14:36:59 peter
|
||||||
* win32 fixed
|
* win32 fixed
|
||||||
|
|
||||||
Revision 1.8 2003/09/27 14:03:45 peter
|
Revision 1.8 2003/09/27 14:03:45 peter
|
||||||
|
Loading…
Reference in New Issue
Block a user