Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Alex D
GHC
Commits
c2224a0a
Commit
c2224a0a
authored
Jul 04, 2006
by
Simon Marlow
Browse files
add default cases
parent
0f9c1806
Changes
1
Show whitespace changes
Inline
Side-by-side
compiler/main/HscTypes.lhs
View file @
c2224a0a
...
@@ -1077,8 +1077,10 @@ isInterpretable = not . isObject
...
@@ -1077,8 +1077,10 @@ isInterpretable = not . isObject
nameOfObject (DotO fn) = fn
nameOfObject (DotO fn) = fn
nameOfObject (DotA fn) = fn
nameOfObject (DotA fn) = fn
nameOfObject (DotDLL fn) = fn
nameOfObject (DotDLL fn) = fn
nameOfObject other = pprPanic "nameOfObject" (ppr other)
byteCodeOfObject (BCOs bc) = bc
byteCodeOfObject (BCOs bc) = bc
byteCodeOfObject other = pprPanic "byteCodeOfObject" (ppr other)
\end{code}
\end{code}
...
...
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