aboutsummaryrefslogtreecommitdiff
path: root/src/interp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-05-29 05:45:10 +0000
committerdos-reis <gdr@axiomatics.org>2008-05-29 05:45:10 +0000
commita96dbac109e95cab66934e98c27e0d148a9b98fd (patch)
tree64d59bf968d21befe0011eff44971f50f7c86e69 /src/interp
parentc196b86cfc4c3f9728f7c1448df2e9d6d6d6ebb7 (diff)
downloadopen-axiom-a96dbac109e95cab66934e98c27e0d148a9b98fd.tar.gz
* interp/i-analy.boot (conceptualType): Only Mode, Domain, and
Category are conceptually abstract. * testsuite/interpreter/category.input: Add a testcase.
Diffstat (limited to 'src/interp')
-rw-r--r--src/interp/i-analy.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/i-analy.boot b/src/interp/i-analy.boot
index cfd483e5..8bf457d8 100644
--- a/src/interp/i-analy.boot
+++ b/src/interp/i-analy.boot
@@ -623,13 +623,13 @@ sayIntelligentMessageAboutOpAvailability(opName, nArgs) ==
nil
-++ Returns the `conceptual' type of `type', e.g., the type type in
+++ Returns the `conceptual' type of `type', e.g., the type of type in
++ the abstract semantics, not necessarily the one from implementation
++ point of view.
conceptualType: %Thing -> %List
conceptualType type ==
isPartialMode type => $Mode
- member(type,$LangSupportTypes) => $Type
+ member(type,[$Mode,$Domain,$Category]) => $Type
categoryForm?(type) => $Category
$Domain