mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-27 05:29:28 +02:00
+ 274
This commit is contained in:
parent
f959158854
commit
fc18497f19
13
bugs/bug0274.pp
Normal file
13
bugs/bug0274.pp
Normal file
@ -0,0 +1,13 @@
|
|||||||
|
type
|
||||||
|
proc=procedure(a:longint);
|
||||||
|
|
||||||
|
procedure prc(a:longint);
|
||||||
|
begin
|
||||||
|
end;
|
||||||
|
|
||||||
|
var
|
||||||
|
p : proc;
|
||||||
|
begin
|
||||||
|
p:=@prc;
|
||||||
|
p:=@(prc); { should this be allowed ? }
|
||||||
|
end.
|
@ -362,3 +362,4 @@ bug0270.pp unexpected eof in tp mode with (* and directives
|
|||||||
bug0271.pp abstract methods can't be assigned to methodpointers
|
bug0271.pp abstract methods can't be assigned to methodpointers
|
||||||
bug0272.pp No error issued if wrong parameter in function inside a second function
|
bug0272.pp No error issued if wrong parameter in function inside a second function
|
||||||
bug0273.pp small array pushing to array of char procedure is wrong
|
bug0273.pp small array pushing to array of char procedure is wrong
|
||||||
|
bug0274.pp @(proc) is not allowed
|
||||||
|
Loading…
Reference in New Issue
Block a user