mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-10 14:46:02 +02:00
*** empty log message ***
This commit is contained in:
parent
81349e4e6d
commit
d6e74e2082
13
bugs/bug0125.pp
Normal file
13
bugs/bug0125.pp
Normal file
@ -0,0 +1,13 @@
|
|||||||
|
uses
|
||||||
|
crt;
|
||||||
|
var
|
||||||
|
i:integer;
|
||||||
|
begin
|
||||||
|
clrscr;
|
||||||
|
textcolor(blue);
|
||||||
|
writeln('ole');
|
||||||
|
textcolor(red);
|
||||||
|
readln(i);
|
||||||
|
writeln('rasmussen');
|
||||||
|
writeln(i);
|
||||||
|
end.
|
@ -170,3 +170,4 @@ bug0121.pp cardinal -> byte conversion not work (and crashes)
|
|||||||
bug0122.pp exit() gives a warning that the result is not set
|
bug0122.pp exit() gives a warning that the result is not set
|
||||||
bug0123.pp problem with intel assembler (shrd)
|
bug0123.pp problem with intel assembler (shrd)
|
||||||
bug0124.pp problem with -Rintel switch and indexing (whatever the order)
|
bug0124.pp problem with -Rintel switch and indexing (whatever the order)
|
||||||
|
bug0125.pp wrong colors with DOS CRT unit
|
||||||
|
Loading…
Reference in New Issue
Block a user