paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-07 19:27:12 +01:00
Code Issues Packages Projects Releases Wiki Activity

* renamed to .pp extension

Browse Source
This commit is contained in:
peter 2001-04-07 15:13:32 +00:00
parent 99fbea55b7
commit 6fd93ee078
2 changed files with 2 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

0
tests/test/tfexpand.pas → tests/test/tfexpand.pp
View File

8
tests/test/tpara1.pp
View File

@ -1,7 +1,8 @@
{ %VERSION=1.1 }
uses
erroru;
{$ifdef HASOUT}
type
tr1 = record
l1,l2 : longint;
@ -88,8 +89,3 @@ begin
if a<>'Now it''s another ansistring' then
do_error(1105);
end.
{$else}
begin
Writeln('No out parameter support');
end.
{$endif HASOUT}