index
:
fpc
master
pristine-tar
upstream
[no description]
Dyson
summary
refs
log
tree
commit
diff
log msg
author
committer
range
path:
root
/
fpcsrc
/
tests
/
webtbf
/
tw9918b.pp
blob: c3f0c1cf9974a78f8e6fc017fac5769cf840948f (
plain
)
1
2
3
4
5
6
7
8
9
{ %
fail
}
{
$x
+}
var s
:
shortstring
;
begin
length
(
s
);
end
.