fpc/tests/webtbs/tw9076a.pp
Jonas Maebe 62b3b307e0 * also process all subnodes of try-except and try-finally in
foreachnode(static) (fixes first example of mantis #9076)

git-svn-id: trunk@7671 -
2007-06-15 17:36:09 +00:00

11 lines
88 B
ObjectPascal

{ %norun }
program chatserver;
uses tw9076;
begin
__Select(0, nil, nil, nil)
end.