From: ross <unknown>
Date: Tue, 16 Sep 2003 17:09:53 +0000 (+0000)
Subject: [project @ 2003-09-16 17:09:53 by ross]
X-Git-Tag: Approx_11550_changesets_converted~448
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=ce08a14f3d1f2bc05d76cfcfb9215bd9d5fc7e68;hp=c87d3accb58f521a2420c1bfa26871c56074dc17;p=ghc-hetmet.git

[project @ 2003-09-16 17:09:53 by ross]
CasmTarget is gone
---

diff --git a/ghc/compiler/ghci/ByteCodeGen.lhs b/ghc/compiler/ghci/ByteCodeGen.lhs
index 784ac8b..7d94541 100644
--- a/ghc/compiler/ghci/ByteCodeGen.lhs
+++ b/ghc/compiler/ghci/ByteCodeGen.lhs
@@ -887,8 +887,6 @@ generateCCall d0 s p ccall_spec@(CCallSpec target cconv safety) fn args_r_to_l
                  StaticTarget target
                     -> ioToBc (lookupStaticPtr target) `thenBc` \res ->
                        returnBc (True, res)
-                 CasmTarget _
-                    -> pprPanic "ByteCodeGen.generateCCall: casm" (ppr ccall_spec)
      in
          get_target_info	`thenBc` \ (is_static, static_target_addr) ->
      let