Skip to content
GitLab
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
9c5c3e2a
Commit
9c5c3e2a
authored
Oct 26, 2005
by
John van Groningen
Browse files
remove output for debugging
parent
6f7c1e69
Changes
1
Hide whitespace changes
Inline
Side-by-side
frontend/trans.icl
View file @
9c5c3e2a
...
...
@@ -3034,10 +3034,10 @@ determineProducers is_applied_to_macro_fun consumer_is_curried ok_non_rec_consum
&&
isStrictVar
arg
)
False
#
producers
=
{
producers
&
[
prod_index
]
=
PR_Unused
}
=
(
producers
,
args
,
[],
ti
)
--->
(
"UnusedMixed"
,
arg
,
fun_type
)
=
(
producers
,
args
,
[],
ti
)
//
---> ("UnusedMixed",arg,fun_type)
|
SwitchUnusedFusion
(
ro
.
ro_transform_fusion
&&
cons_arg
==
CUnusedLazy
)
False
#
producers
=
{
producers
&
[
prod_index
]
=
PR_Unused
}
=
(
producers
,
args
,
[],
ti
)
--->
(
"UnusedLazy"
,
arg
,
fun_type
)
=
(
producers
,
args
,
[],
ti
)
//
---> ("UnusedLazy",arg,fun_type)
#!
(
producers
,
new_args
,
lb
,
ti
)
=
determineProducers
is_applied_to_macro_fun
consumer_is_curried
ok_non_rec_consumer
fun_type
linear_bits
cons_args
args
(
inc
prod_index
)
producers
ro
ti
=
(
producers
,
[
arg
:
new_args
],
lb
,
ti
)
where
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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