From e6d7d0e6a6a710b4a6ebcb0431dc19bbd666ced0 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Wed, 9 Feb 2011 21:12:35 +0000 Subject: Add MappingCategory as a (builtin) category. * interp/sys-constants.boot ($CategoryNames): Include MappingCategory. * interp/g-cndata.boot (unabbrevSpecialForms): Handle MappingCategory, RecordCategory, and UnionCategory. * interp/buildom.boot (MappingCategory): New. * interp/compiler.boot: Elaboration MappingCategory forms. * interp/g-error.boot (needsToSplitMessage): Fix thinko from type-based dispatch done by the Boot translator. * interp/nrunfast.boot (builtinConstructor?): New. (generalizedBuiltinConstructor?): Likewise. (lazyMatch): Use them. (newHasTest): Properly recognize all flavours of category forms. --- src/interp/compiler.boot | 1 + 1 file changed, 1 insertion(+) (limited to 'src/interp/compiler.boot') diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot index b231b3db..3c928a81 100644 --- a/src/interp/compiler.boot +++ b/src/interp/compiler.boot @@ -2683,6 +2683,7 @@ for x in [["|", :"compSuchthat"],_ ["SubsetCategory", :"compSubsetCategory"],_ ["Union", :"compCat"],_ ["Mapping", :"compCat"],_ + ["MappingCategory", :"compConstructorCategory"],_ ["UnionCategory", :"compConstructorCategory"],_ ["where", :"compWhere"],_ ["per",:"compPer"],_ -- cgit v1.2.3