paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 21:11:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

no message

Browse Source
This commit is contained in:
florian 2000-11-09 18:32:29 +00:00
parent b3c53b4f55
commit 446fcc0162
2 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
tests/test/readme.txt
View File

@ -36,3 +36,6 @@ Inline ................ inline01.pp tests recursive inlining, inlining
a procedure multiple times and a procedure multiple times and
inlining procedures in other inlining procedures in other
inline procedures. inline procedures.
Finalize .............. testfi1.pp tests the procedure system.finalize
TypeInfo .............. testti1.pp test the function system.typeinfo
Resourcestrings ....... testrstr.pp tests a simple resource string

8
tests/test/testrstr.pp Normal file
View File

@ -0,0 +1,8 @@
{$mode objfpc}
resourcestring
s = 'Hello world';
begin
if s<>'Hello world' then
halt(1);
end.