diff options
author | johnvg | 2002-11-14 12:22:44 +0000 |
---|---|---|
committer | johnvg | 2002-11-14 12:22:44 +0000 |
commit | dd3418a4c571dd62551cac86f4eb98e8d7eec377 (patch) | |
tree | a91796c61fb5b520430c717bccc2363fdf6be694 /backend | |
parent | remove record update to record node transformation (for records (diff) |
use _SystemStrictLists with _cons..,_decons.. and _nil..
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1280 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'backend')
-rw-r--r-- | backend/backendconvert.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backend/backendconvert.icl b/backend/backendconvert.icl index e95566f..af5ca46 100644 --- a/backend/backendconvert.icl +++ b/backend/backendconvert.icl @@ -1075,7 +1075,7 @@ where | i<size members # member=members.[i] # member_name=member.ds_ident.id_name - | size member_name>0 && member_name.[0]=='c' // && trace_tn ("member: "+++member_name) + | size member_name>1 && member_name.[1]=='c' // && trace_tn ("member: "+++member_name) # (ft_type,backEnd) = read_from_var_heap std_strict_lists.dcl_functions.[member.ds_index].ft_type_ptr backEnd = case ft_type of VI_ExpandedType _ |