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

*** empty log message ***

Browse Source
This commit is contained in:
florian 1998-04-12 20:41:40 +00:00
parent facb2866e3
commit c876b474c6
3 changed files with 21 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
bugs/bug0128.pp Normal file
View File

@ -0,0 +1,6 @@
const
ArrowKeysOrFirstLetter='arrow keys '^]^r^z' or First letter. ';
begin
writeln(ord(^)));
end.

12
bugs/bug0129.pp Normal file
View File

@ -0,0 +1,12 @@
var
e:boolean;
a:integer;
begin
e:=true;
a:=3;
while (a<5) and e do begin
e:=false;
write('*');
continue;
end;
end.

3
bugs/readme.txt
View File

@ -173,3 +173,6 @@ bug0123.pp problem with intel assembler (shrd)
bug0124.pp problem with -Rintel switch and indexing (whatever the order)
bug0125.pp wrong colors with DOS CRT unit
bug0127.pp problem with cdecl in implementation part
bug0128.pp problem with ^[
bug0129.pp endless loop with while/continue