diff options
| author | johnvg | 2012-10-24 12:55:27 +0000 | 
|---|---|---|
| committer | johnvg | 2012-10-24 12:55:27 +0000 | 
| commit | 7626b3295651046b1d0f61ea37be27db6c046ab2 (patch) | |
| tree | 41be1d082afdcf1444681927528270965fdd9882 /frontend/checkgenerics.icl | |
| parent | report a parse error if a strictness annotation or uniqueness attribute is us... (diff) | |
in the generic representation use RECORD instead of OBJECT and CONS for records,
change GenericInfo
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@2191 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/checkgenerics.icl')
| -rw-r--r-- | frontend/checkgenerics.icl | 2 | 
1 files changed, 1 insertions, 1 deletions
| diff --git a/frontend/checkgenerics.icl b/frontend/checkgenerics.icl index c4a05da..ddc2305 100644 --- a/frontend/checkgenerics.icl +++ b/frontend/checkgenerics.icl @@ -44,7 +44,7 @@ where  		# initial_info =   			{ gen_classes = createArray 32 []  			, gen_var_kinds = [] -			, gen_OBJECT_CONS_FIELD_indices = createArray 3 {ocf_module = -1,ocf_index = -1,ocf_ident={id_name="",id_info=nilPtr}} +			, gen_rep_conses = createArray 4 {gcf_module = -1,gcf_index = -1,gcf_ident={id_name="",id_info=nilPtr}}  			}  		# (gen_info_ptr, hp_generic_heap) = newPtr initial_info hp_generic_heap   		= (	{gen_def & gen_info_ptr = gen_info_ptr},  | 
