From ec6eae67b33162902b53bef66d9067326aeba2a9 Mon Sep 17 00:00:00 2001
From: Antonio Linares <alinares@fivetechsoft.com>
Date: Sat, 7 Aug 1999 06:45:40 +0000
Subject: [PATCH] Harbour Class TBrowse sample

---
 harbour/tests/working/testbrw.prg | 7 +++++++
 1 file changed, 7 insertions(+)
 create mode 100644 harbour/tests/working/testbrw.prg

diff --git a/harbour/tests/working/testbrw.prg b/harbour/tests/working/testbrw.prg
new file mode 100644
index 0000000000..df9fd17a2c
--- /dev/null
+++ b/harbour/tests/working/testbrw.prg
@@ -0,0 +1,7 @@
+function Main()
+
+   local oBrowse := TBrowse():New()
+
+   Alert( oBrowse:ClassName )
+
+return nil
\ No newline at end of file