mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-06 23:10:31 +02:00
parent
63ddfd1f77
commit
61cbb32225
1
.gitattributes
vendored
1
.gitattributes
vendored
@ -6098,6 +6098,7 @@ tests/webtbs/tw3796.pp svneol=native#text/plain
|
||||
tests/webtbs/tw3805.pp svneol=native#text/plain
|
||||
tests/webtbs/tw3812.pp svneol=native#text/plain
|
||||
tests/webtbs/tw3814.pp svneol=native#text/plain
|
||||
tests/webtbs/tw3827.pp svneol=native#text/plain
|
||||
tests/webtbs/tw3833.pp svneol=native#text/plain
|
||||
tests/webtbs/tw3840.pp svneol=native#text/plain
|
||||
tests/webtbs/tw3863.pp svneol=native#text/plain
|
||||
|
14
tests/webtbs/tw3827.pp
Normal file
14
tests/webtbs/tw3827.pp
Normal file
@ -0,0 +1,14 @@
|
||||
{ Source provided for Free Pascal Bug Report 3827 }
|
||||
{ Submitted by "Thomas Schatzl" on 2005-03-25 }
|
||||
{ e-mail: }
|
||||
{$MODE DELPHI}
|
||||
|
||||
uses
|
||||
sysutils;
|
||||
|
||||
var
|
||||
guid : tguid;
|
||||
|
||||
begin
|
||||
CreateGUID(guid);
|
||||
end.
|
Loading…
Reference in New Issue
Block a user