paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-15 08:39:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* small updates to test also with kylix

Browse Source
This commit is contained in:
peter 2002-01-29 21:32:34 +00:00
parent cdf0df1808
commit 5ee88d48c9
3 changed files with 3 additions and 2 deletions

2
tests/tbs/tb0335.pp
View File

@ -4,7 +4,7 @@
var
a : array[0..5] of byte;
function f : longint;assembler;
function f : byte;assembler;
asm
mov ebx,offset a

1
tests/tbs/tb0373.pp
View File

@ -1,4 +1,5 @@
{ %VERSION=1.1 }
{$ifdef fpc}{$mode delphi}{$endif}
type
tmyinterface = interface
procedure p(p : longint); // Delphi allows this

2
tests/tbs/tb0375.pp
View File

@ -1,5 +1,5 @@
{ %VERSION=1.1 }
{$mode objfpc}
{$ifdef fpc}{$mode objfpc}{$endif}
type
i1 = interface