From a96dbac109e95cab66934e98c27e0d148a9b98fd Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Thu, 29 May 2008 05:45:10 +0000
Subject: 	* interp/i-analy.boot (conceptualType): Only Mode, Domain, and
 	Category are conceptually abstract. 	*
 testsuite/interpreter/category.input: Add a testcase.

---
 src/testsuite/interpreter/category.input | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 src/testsuite/interpreter/category.input

(limited to 'src/testsuite/interpreter/category.input')

diff --git a/src/testsuite/interpreter/category.input b/src/testsuite/interpreter/category.input
new file mode 100644
index 00000000..53cfc328
--- /dev/null
+++ b/src/testsuite/interpreter/category.input
@@ -0,0 +1,10 @@
+Domain has Category
+Category has Category    -- 'true', but it probably should be 'no'.
+Category has Type
+
+ST(x: Integer): Category ==
+  x=0 => SetCategory
+  Type
+
+ST 0
+ST 1
-- 
cgit v1.2.3