From c971b7059109d8f74a9853b49b43f9e7acd509e7 Mon Sep 17 00:00:00 2001
From: welch <welch>
Date: Fri, 4 Dec 1998 06:28:11 +0000
Subject: Added test file

---
 tests/pkg/pkga.tcl | 15 +++++++++++++++
 1 file changed, 15 insertions(+)
 create mode 100644 tests/pkg/pkga.tcl

diff --git a/tests/pkg/pkga.tcl b/tests/pkg/pkga.tcl
new file mode 100644
index 0000000..e964f51
--- /dev/null
+++ b/tests/pkg/pkga.tcl
@@ -0,0 +1,15 @@
+# pkga.tcl --
+#
+#  Test package for pkg_mkIndex. This package provides Pkga,
+#  which is also provided by a DLL.
+#
+# Copyright (c) 1998 by Scriptics Corporation.
+# All rights reserved.
+# 
+# RCS: @(#) $Id: pkga.tcl,v 1.1 1998/12/04 06:28:11 welch Exp $
+
+package provide Pkga 1.0
+
+proc pkga_neq { x } {
+    return [expr {! [pkgq_eq $x]}]
+}
-- 
cgit v0.12