rempve some unused files

[ghc-hetmet.git] / ghc / misc / examples / net006 / Main.hs

diff --git a/ghc/misc/examples/net006/Main.hs b/ghc/misc/examples/net006/Main.hs
deleted file mode 100644 (file)
index 57be04e..0000000
--- a/ghc/misc/examples/net006/Main.hs
+++ /dev/null
@@ -1,27 +0,0 @@
-{- client
-
-Client side of net005
-
-TESTS:
-    socket
-    connect
-    writeSocket
-    shutdown
-    sClose
--}
-
-
-module Main where
-
-import SocketPrim
-
-message            = "Hello World"
-
-
-main =
-    socket AF_UNIX Datagram 0                          >>= \ s ->
-    connect s (SockAddrUnix "sock")                    >>
-    
-    writeSocket s message                              >>
-    shutdown s 2                                       >>
-    sClose s