From: simonmar <unknown>
Date: Wed, 28 Mar 2001 16:38:39 +0000 (+0000)
Subject: [project @ 2001-03-28 16:38:39 by simonmar]
X-Git-Tag: Approximately_9120_patches~2268
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=1bd667cde0c706713b92296c1bbabf0d6c76bf4f;p=ghc-hetmet.git

[project @ 2001-03-28 16:38:39 by simonmar]
use newStablePtr instead of deprecated makeStablePtr.
---

diff --git a/ghc/tests/lib/should_run/stableptr004.hs b/ghc/tests/lib/should_run/stableptr004.hs
index 523bdb2..86e9732 100644
--- a/ghc/tests/lib/should_run/stableptr004.hs
+++ b/ghc/tests/lib/should_run/stableptr004.hs
@@ -6,7 +6,7 @@ import StablePtr
 main = do
   let xs = [ 1 .. 50000 ]
   let ys = [ 1 .. 60000 ]
-  s1 <- makeStablePtr xs
+  s1 <- newStablePtr xs
   print (sum xs)
   freeStablePtr s1
   print (sum ys)