From 2c5041661277ee4fbd2729f3fa03e754c60cc238 Mon Sep 17 00:00:00 2001 From: johnvg Date: Wed, 9 Nov 2011 11:12:31 +0000 Subject: move types Group and Component to module checksupport git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@2019 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- frontend/checksupport.dcl | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'frontend/checksupport.dcl') diff --git a/frontend/checksupport.dcl b/frontend/checksupport.dcl index 520cc8b..7ca923f 100644 --- a/frontend/checksupport.dcl +++ b/frontend/checksupport.dcl @@ -29,6 +29,15 @@ cNeedStdStrictLists :== 16 :: CheckStateX = {x_needed_modules :: !BITVECT,x_main_dcl_module_n :: !Int, x_check_dynamic_types :: !Bool } +:: Group = { group_members :: ![Int] } + +:: Component = { component_members :: !ComponentMembers } + +:: ComponentMembers + = ComponentMember !Int !ComponentMembers + | GeneratedComponentMember !Int !FunctionInfoPtr !ComponentMembers + | NoComponentMembers + instance == STE_Kind cTypeDefs :== 0 -- cgit v1.2.3