mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-29 09:47:13 +01:00
* some cpu specific tests not run under other CPU's
This commit is contained in:
parent
eb2c1e2061
commit
41f23fbc55
@ -1,3 +1,4 @@
|
|||||||
|
{ %FAIL }
|
||||||
{ Source provided for Free Pascal Bug Report 2053 }
|
{ Source provided for Free Pascal Bug Report 2053 }
|
||||||
{ Submitted by "Luis Castedo" on 2002-07-24 }
|
{ Submitted by "Luis Castedo" on 2002-07-24 }
|
||||||
{ e-mail: castedo@elai.upm.es }
|
{ e-mail: castedo@elai.upm.es }
|
||||||
@ -38,7 +39,10 @@ end.
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.1 2002-09-27 21:09:56 carl
|
Revision 1.2 2002-10-09 16:56:46 carl
|
||||||
|
* some cpu specific tests not run under other CPU's
|
||||||
|
|
||||||
|
Revision 1.1 2002/09/27 21:09:56 carl
|
||||||
+ new bug report
|
+ new bug report
|
||||||
|
|
||||||
}
|
}
|
||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{ FPC behaves interestingly once encountered virtual method
|
{ FPC behaves interestingly once encountered virtual method
|
||||||
declared as
|
declared as
|
||||||
procedure TWhateverObject.Method1; assembler; asm ... end;
|
procedure TWhateverObject.Method1; assembler; asm ... end;
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$asmmode intel}
|
{$asmmode intel}
|
||||||
{$inline on}
|
{$inline on}
|
||||||
|
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$ifdef FPC}
|
{$ifdef FPC}
|
||||||
{$ASMMODE INTEL}
|
{$ASMMODE INTEL}
|
||||||
{$INLINE ON}
|
{$INLINE ON}
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$asmmode intel}
|
{$asmmode intel}
|
||||||
Type TFather = Object A : Integer; end;
|
Type TFather = Object A : Integer; end;
|
||||||
TSon = Object (TFather) B : Integer; end;
|
TSon = Object (TFather) B : Integer; end;
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
program test;
|
program test;
|
||||||
{$INLINE ON}
|
{$INLINE ON}
|
||||||
{$ASMMODE ATT}
|
{$ASMMODE ATT}
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$ASMMODE INTEL}
|
{$ASMMODE INTEL}
|
||||||
|
|
||||||
PROCEDURE a;
|
PROCEDURE a;
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
|
|
||||||
|
|
||||||
{$asmmode intel}
|
{$asmmode intel}
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$asmmode intel}
|
{$asmmode intel}
|
||||||
type
|
type
|
||||||
BugObject = object
|
BugObject = object
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$asmmode intel}
|
{$asmmode intel}
|
||||||
|
|
||||||
{$ifdef go32v2}
|
{$ifdef go32v2}
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
program test;
|
program test;
|
||||||
|
|
||||||
{$ASMMODE Intel }
|
{$ASMMODE Intel }
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$ifdef TP}
|
{$ifdef TP}
|
||||||
{$N+}
|
{$N+}
|
||||||
{$endif TP}
|
{$endif TP}
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{ Source provided for Free Pascal Bug Report 1023 }
|
{ Source provided for Free Pascal Bug Report 1023 }
|
||||||
{ Submitted by "Denis Yarkovoy" on 2000-07-03 }
|
{ Submitted by "Denis Yarkovoy" on 2000-07-03 }
|
||||||
{ e-mail: gunky9@geocities.com }
|
{ e-mail: gunky9@geocities.com }
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{ Source provided for Free Pascal Bug Report 1066 }
|
{ Source provided for Free Pascal Bug Report 1066 }
|
||||||
{ Submitted by "Fernando Oscar Schmitt" on 2000-07-24 }
|
{ Submitted by "Fernando Oscar Schmitt" on 2000-07-24 }
|
||||||
{ e-mail: pulp@cpovo.net }
|
{ e-mail: pulp@cpovo.net }
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{----------------cut here----------------}
|
{----------------cut here----------------}
|
||||||
|
|
||||||
{$asmmode intel}
|
{$asmmode intel}
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$asmmode intel}
|
{$asmmode intel}
|
||||||
const
|
const
|
||||||
Number = $7FFFFFF;
|
Number = $7FFFFFF;
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$asmmode intel}
|
{$asmmode intel}
|
||||||
var
|
var
|
||||||
l1,l2 : longint;
|
l1,l2 : longint;
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{$mode objfpc}
|
{$mode objfpc}
|
||||||
uses sysutils;
|
uses sysutils;
|
||||||
{$asmmode intel}
|
{$asmmode intel}
|
||||||
|
|||||||
@ -1,3 +1,4 @@
|
|||||||
|
{ %CPU=i386 }
|
||||||
{ Source provided for Free Pascal Bug Report 1157 }
|
{ Source provided for Free Pascal Bug Report 1157 }
|
||||||
{ Submitted by "Colin Goldie" on 2000-10-06 }
|
{ Submitted by "Colin Goldie" on 2000-10-06 }
|
||||||
{ e-mail: Colin_G@Positek.com.au }
|
{ e-mail: Colin_G@Positek.com.au }
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user