mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-09 02:28:14 +02:00
* moved to success
This commit is contained in:
parent
73867aa44c
commit
e0c4a0ed01
10
tests/webtbs/tw2946.pp
Normal file
10
tests/webtbs/tw2946.pp
Normal file
@ -0,0 +1,10 @@
|
||||
{ Source provided for Free Pascal Bug Report 2946 }
|
||||
{ Submitted by "Marco (Gory Bugs Department)" on 2004-02-06 }
|
||||
{ e-mail: }
|
||||
|
||||
{$ifdef fpc}{$mode Delphi}{$endif}
|
||||
var p:array of pchar;
|
||||
t: ^pchar;
|
||||
begin
|
||||
p:=pointer(t);
|
||||
end.
|
Loading…
Reference in New Issue
Block a user