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
8ef8fe7b
Commit
8ef8fe7b
authored
Nov 04, 2011
by
John van Groningen
Browse files
remove differences in layout between the compiler and the iTask compiler,
modified case_explicit of generated cases
parent
7955c5b6
Changes
1
Hide whitespace changes
Inline
Side-by-side
frontend/convertDynamics.icl
View file @
8ef8fe7b
...
...
@@ -333,7 +333,7 @@ instance convertDynamics Case where
->
convertDynamicCase
cinp
kees
ci
_
#
(
case_guards
,
ci
)
=
convertDynamics
cinp
case_guards
ci
#
kees
=
{
kees
&
case_guards
=
case_guards
}
#
kees
=
{
kees
&
case_explicit
=
False
,
case_guards
=
case_guards
}
->
(
kees
,
ci
)
instance
convertDynamics
CasePatterns
where
...
...
@@ -374,7 +374,8 @@ convertDynamicCase cinp=:{cinp_dynamic_representation={dr_dynamic_symbol, dr_dyn
,
ap_position
=
position
alts
}
#
(
case_info_ptr
,
ci
)
=
dummy_case_ptr
result_type
ci
#
kees
=
{
kees
&
case_guards
=
AlgebraicPatterns
dr_dynamic_type
[
match
],
case_default
=
No
,
case_info_ptr
=
case_info_ptr
}
#
kees
=
{
kees
&
case_explicit
=
False
,
case_guards
=
AlgebraicPatterns
dr_dynamic_type
[
match
],
case_default
=
No
,
case_info_ptr
=
case_info_ptr
}
=
(
kees
,
ci
)
convertDynamicAlts
_
_
_
_
_
defoult
[]
ci
...
...
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