index
:
fpc
master
pristine-tar
upstream
[no description]
Dyson
summary
refs
log
tree
commit
diff
log msg
author
committer
range
path:
root
/
fpcsrc
/
tests
/
tbs
/
tb0329.pp
blob: 93a8a9971eb0ef621216843759ac68e70a3047a4 (
plain
)
1
2
3
4
5
6
7
8
{
$mode
objfpc
}
var o
:
tobject
;
begin
if
assigned
(
o
)
then
halt
(
1
);
end
.
