aboutsummaryrefslogtreecommitdiff
path: root/src/interp/category.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/category.boot')
-rw-r--r--src/interp/category.boot1
1 files changed, 0 insertions, 1 deletions
diff --git a/src/interp/category.boot b/src/interp/category.boot
index cd4a070c..4d9fc3ae 100644
--- a/src/interp/category.boot
+++ b/src/interp/category.boot
@@ -122,7 +122,6 @@ mkCategory(domainOrPackage,sigList,attList,domList,PrincipalAncestor) ==
v is ["Union",:w] =>
"union"/[Prepare2 x for x in stripUnionTags w]
v is ["Mapping",:w] => "union"/[Prepare2 x for x in w]
- v is ["List",w] => Prepare2 w
v is ["Record",.,:w] => "union"/[Prepare2 third x for x in w]
[v]
OldLocals:= nil