From 1bd667cde0c706713b92296c1bbabf0d6c76bf4f Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 28 Mar 2001 16:38:39 +0000
Subject: [PATCH] [project @ 2001-03-28 16:38:39 by simonmar] use newStablePtr
 instead of deprecated makeStablePtr.

---
 ghc/tests/lib/should_run/stableptr004.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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)
-- 
1.7.10.4