Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-compiler-and-rts
compiler
Commits
58550e81
Commit
58550e81
authored
Mar 08, 2002
by
John van Groningen
Browse files
make result of function build_inequalities strict to reduce
memory allocation by the compiler
parent
86e9e4da
Changes
1
Hide whitespace changes
Inline
Side-by-side
frontend/typesupport.icl
View file @
58550e81
...
...
@@ -467,6 +467,7 @@ where
TA_None
->
build_attribute_environment
appears_in_lifted_part
(
inc
attr_group_index
)
max_attr_nr
coercions
attr_env
attr_vars
inequalities
error
build_inequalities
::
{#
Int
}
Bool
AttributeVar
!
CoercionTree
{!
CoercionTree
}
*{!
TypeAttribute
}
[
AttrInequality
]
->
(!
Bool
,!*{!
TypeAttribute
},![
AttrInequality
])
build_inequalities
appears_in_lifted_part
off_appears_in_lifted_part
off_var
(
CT_Node
dem_attr
left
right
)
coercions
attr_env
inequalities
#
(
ok1
,
attr_env
,
inequalities
)
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment