[project @ 1997-07-31 01:46:24 by sof]

[ghc-hetmet.git] / ghc / compiler / tests / ccall / cc006.hs

diff --git a/ghc/compiler/tests/ccall/cc006.hs b/ghc/compiler/tests/ccall/cc006.hs
deleted file mode 100644 (file)
index 27579e9..0000000
--- a/ghc/compiler/tests/ccall/cc006.hs
+++ /dev/null
@@ -1,22 +0,0 @@
---!!! cc006 -- ccall with non-standard boxed arguments and results
-
-module Test where
-
-import GlaExts
-import Foreign
-
--- Test returning results
-
-a :: PrimIO Int
-a = _ccall_ a
-
-b :: PrimIO (StablePtr Int)
-b = _ccall_ b
-
--- Test taking arguments
-
-c :: ForeignObj -> PrimIO Int
-c x = _ccall_ c x
-
-d :: StablePtr Int -> PrimIO Int
-d x = _ccall_ d x