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
619e94ba
Commit
619e94ba
authored
Apr 11, 2007
by
John van Groningen
Browse files
remove <<< instance for removed type
parent
e39e9580
Changes
1
Hide whitespace changes
Inline
Side-by-side
frontend/syntax.icl
View file @
619e94ba
...
...
@@ -387,7 +387,6 @@ where
(<<<)
file
(
NoBind
_)
=
file
<<<
"** NB **"
(<<<)
file
(
DynamicExpr
{
dyn_expr
,
dyn_type_code
})
=
file
<<<
"dynamic "
<<<
dyn_expr
<<<
" :: "
<<<
dyn_type_code
// (<<<) file (DynamicExpr {dyn_expr,dyn_uni_vars,dyn_type_code}) = writeVarPtrs (file <<< "dynamic " <<< dyn_expr <<< " :: dyn_uni_vars") dyn_uni_vars <<< "dyn_type_code=" <<< dyn_type_code
// (<<<) file (TypeCase type_case) = file <<< type_case
(<<<)
file
(
TypeCodeExpression
type_code
)
=
file
<<<
type_code
(<<<)
file
(
Constant
symb
_
_
_)
=
file
<<<
"** Constant **"
<<<
symb
...
...
@@ -405,12 +404,6 @@ where
(<<<)
file
{
lb_dst
,
lb_src
}
=
file
<<<
lb_dst
<<<
" = "
<<<
lb_src
<<<
"
\n
"
instance
<<<
TypeCase
where
(<<<)
file
{
type_case_dynamic
,
type_case_patterns
,
type_case_default
}
=
file
<<<
"typecase "
<<<
type_case_dynamic
<<<
"of
\n
"
<<<
type_case_patterns
<<<
type_case_default
instance
<<<
DynamicPattern
where
(<<<)
file
{
dp_var
,
dp_rhs
,
dp_type_code
}
...
...
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