From: simonmar <unknown>
Date: Tue, 21 Nov 2000 09:55:47 +0000 (+0000)
Subject: [project @ 2000-11-21 09:55:47 by simonmar]
X-Git-Tag: Approximately_9120_patches~3294
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=c0c121309b1888bd4570e005c17ec78aea172ed4;p=ghc-hetmet.git

[project @ 2000-11-21 09:55:47 by simonmar]
add missing case
---

diff --git a/ghc/compiler/ghci/StgInterp.lhs b/ghc/compiler/ghci/StgInterp.lhs
index bcb89ce..f0f74ba 100644
--- a/ghc/compiler/ghci/StgInterp.lhs
+++ b/ghc/compiler/ghci/StgInterp.lhs
@@ -922,6 +922,8 @@ repOf (LitI _)         = RepI
 repOf (LitF _)         = RepF
 repOf (LitD _)         = RepD
 
+repOf (Native _)       = RepP
+
 repOf (VarP _)         = RepI
 repOf (VarI _)         = RepI
 repOf (VarF _)         = RepF