mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-23 08:34:34 +02:00
* two test sources for ide bugs
This commit is contained in:
parent
2f60fd3818
commit
7dbe30ac55
54
tests/webtbs/tw2004.pp
Normal file
54
tests/webtbs/tw2004.pp
Normal file
@ -0,0 +1,54 @@
|
||||
{%interactive }
|
||||
|
||||
{
|
||||
ide 0.9.2 dos/win32 2002/05/31
|
||||
press F7 or F8 more times:
|
||||
the green row is in first position when work with the macro
|
||||
This problem is more complex with more macros
|
||||
Category: IDE(Text)
|
||||
Type: Error
|
||||
Date entered: 2002-06-12
|
||||
Submitter:salvatore licciardi
|
||||
Date Fixed: 2002-09-05
|
||||
Fix version: 1.0.7
|
||||
|
||||
Fixer: Pierre Comment:
|
||||
Was a general problem with the file position
|
||||
within a macro. Merged to 1.1 branch. }
|
||||
|
||||
{$macro on}
|
||||
//you need 30..40 enter
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
{$include tw2004i.inc}
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
begin
|
||||
{$define x:= write('ooooo');
|
||||
write('ooooo');}
|
||||
x;
|
||||
write('ppppp');
|
||||
y;
|
||||
x;
|
||||
end.
|
26
tests/webtbs/tw2145.pp
Normal file
26
tests/webtbs/tw2145.pp
Normal file
@ -0,0 +1,26 @@
|
||||
{ %interactive }
|
||||
{
|
||||
1) move cursor in ' writeln(2); ' and press ctrl+F8: red line
|
||||
2) press ctrl+F9
|
||||
now the cursor is under 'w' of winreln(2);
|
||||
3) press Enter here
|
||||
4) press ctrl+F9
|
||||
5) move cursor under ';' of 'writeln(1);' and press Canc
|
||||
now red line is absent
|
||||
6) press ctrl+F9
|
||||
there is a breackpoint in 'writeln(2)' , but line isn't red :-(
|
||||
---
|
||||
then, close the IDE and re-run it, the red line is now present
|
||||
Category: IDE(Text)
|
||||
Type: Error
|
||||
Date entered: 2002-09-25
|
||||
Submitter:Salvatore Licciardi
|
||||
}
|
||||
begin // ide DOS/Win 0.9.2 at 2002/08/25 writeln(1);
|
||||
writeln(2);
|
||||
writeln(3);
|
||||
writeln(4);
|
||||
writeln(5);
|
||||
writeln(6);
|
||||
writeln(7);
|
||||
end.
|
Loading…
Reference in New Issue
Block a user