aboutsummaryrefslogtreecommitdiff
path: root/src/interp/define.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-10-07 20:19:37 +0000
committerdos-reis <gdr@axiomatics.org>2008-10-07 20:19:37 +0000
commitd2af373ae99abdf494780c872340086cd588b990 (patch)
tree29da74227d0bb1f8c53c90d47cc05c0453881594 /src/interp/define.boot
parente7edec07aedf0c1fd83171db1235120bd0f6da4f (diff)
downloadopen-axiom-d2af373ae99abdf494780c872340086cd588b990.tar.gz
* interp/define.boot (compCategoryItem): Don't check signatures yet.
* interp/c-util.boot (isKnownCategory): New. (diagnoseUknownType): Use it. Expand. * interp/compiler.boot (compCat): Use it.
Diffstat (limited to 'src/interp/define.boot')
-rw-r--r--src/interp/define.boot2
1 files changed, 0 insertions, 2 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot
index a2af1e8a..ae460b75 100644
--- a/src/interp/define.boot
+++ b/src/interp/define.boot
@@ -1691,8 +1691,6 @@ compCategoryItem(x,predl,env) ==
nil
--4. branch on a single type or a signature %with source and target
- for t in first sig repeat
- diagnoseUknownType(t,env)
noteExport(rest x,pred)
PUSH(MKQ [rest x,pred],$sigList)