mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-14 19:49:09 +02:00
tbug744 must fail => moved to webtbf dir
This commit is contained in:
parent
39b5363d10
commit
201af712e4
@ -1,9 +0,0 @@
|
|||||||
Unit tbug744;
|
|
||||||
|
|
||||||
Interface
|
|
||||||
|
|
||||||
Uses tbug744a;
|
|
||||||
|
|
||||||
Implementation
|
|
||||||
|
|
||||||
end.
|
|
@ -1,10 +0,0 @@
|
|||||||
Unit tbug744a;
|
|
||||||
|
|
||||||
Interface
|
|
||||||
|
|
||||||
Uses tbug744;
|
|
||||||
|
|
||||||
Implementation
|
|
||||||
|
|
||||||
end.
|
|
||||||
|
|
@ -1,7 +1,11 @@
|
|||||||
{$MODE objfpc}
|
{$MODE objfpc}
|
||||||
{$H+}
|
{$H+}
|
||||||
program stackcrash;
|
program stackcrash;
|
||||||
uses sysutils;
|
uses
|
||||||
|
{$ifdef go32v2}
|
||||||
|
dpmiexcp,
|
||||||
|
{$endif go32v2}
|
||||||
|
sysutils;
|
||||||
type
|
type
|
||||||
TMyClass = class
|
TMyClass = class
|
||||||
public
|
public
|
||||||
|
Loading…
Reference in New Issue
Block a user