From f4de74d6be261db1064e91f156ebb54b4dad391d Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Sat, 19 Jan 2002 15:20:11 +0000
Subject: [PATCH] check also implementation

---
 tests/webtbf/tw1599b.pp | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 tests/webtbf/tw1599b.pp

diff --git a/tests/webtbf/tw1599b.pp b/tests/webtbf/tw1599b.pp
new file mode 100644
index 0000000000..b33ccbcb7d
--- /dev/null
+++ b/tests/webtbf/tw1599b.pp
@@ -0,0 +1,13 @@
+{ %fail }
+
+{$ifdef fpc}{$MODE objfpc}{$endif}
+
+unit tw1599b;
+interface
+
+implementation
+
+type
+  TMyClass = class;
+
+end.