mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-23 22:49:35 +02:00
* const to var not detected
This commit is contained in:
parent
add30a428e
commit
d388f3ea46
13
tests/tbf/tb0106.pp
Normal file
13
tests/tbf/tb0106.pp
Normal file
@ -0,0 +1,13 @@
|
||||
{ %fail }
|
||||
|
||||
procedure ld_var(var a);
|
||||
begin
|
||||
end;
|
||||
|
||||
procedure ld_const(const b);
|
||||
begin
|
||||
ld_var(b);
|
||||
end;
|
||||
|
||||
begin
|
||||
end.
|
Loading…
Reference in New Issue
Block a user