Build description = STABLE on i386-unknown-linux
(cam-02-unx.europe.corp.microsoft.com)
Build location = /playpen/ghc/nightly/STABLE-cam-02-unx
Build config file = /home/simonmar/nightly/site/msrc/conf-STABLE-cam-02-unx
Nightly build started on cam-02-unx at Sat Sep 16 19:30:00 BST 2006.
**** checking out new source tree ... tar: Cowardly refusing to
create an empty archive
Try `tar --help' for more information.
cvs checkout: warning: cannot open /cvs/CVSROOT/val-tags read/write: Read-only
file system
cvs checkout: warning: cannot open /cvs/CVSROOT/val-tags read/write: Read-only
file system
cvs checkout: warning: unrecognized response ` <- runWriterT m' from cvs server
cvs checkout: warning: unrecognized response ` return (a, f w)' from
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `instance (Monoid w) => MonadTrans
(WriterT w) where' from cvs server
cvs checkout: warning: unrecognized response ` lift m = WriterT $ do' from cvs
server
cvs checkout: warning: unrecognized response ` a <- m' from cvs server
cvs checkout: warning: unrecognized response ` return (a, mempty)'
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `instance (Monoid w, MonadIO m) =>
MonadIO (WriterT w m) where' from cvs server
cvs checkout: warning: unrecognized response ` liftIO = lift . liftIO' from
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `instance (Monoid w, MonadReader r
m) => MonadReader r (WriterT w m) where' from cvs server
cvs checkout: warning: unrecognized response ` ask = lift ask' from cvs
server
cvs checkout: warning: unrecognized response ` local f m = WriterT $ local f
(runWriterT m)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `execWriterT :: Monad m => WriterT
w m a -> m w' from cvs server
cvs checkout: warning: unrecognized response `execWriterT m = do' from cvs
server
cvs checkout: warning: unrecognized response ` (_, w) <- runWriterT m' from
cvs server
cvs checkout: warning: unrecognized response ` return w' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `mapWriterT :: (m (a, w) -> n (b,
w')) -> WriterT w m a -> WriterT w' n b' from cvs server
cvs checkout: warning: unrecognized response `mapWriterT f m = WriterT $ f
(runWriterT m)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `--
---------------------------------------------------------------------------'
from cvs server
cvs checkout: warning: unrecognized response `-- MonadWriter instances for
other monad transformers' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `instance (MonadWriter w m) =>
MonadWriter w (ReaderT r m) where' from cvs server
cvs checkout: warning: unrecognized response ` tell = lift . tell' from
cvs server
cvs checkout: warning: unrecognized response ` listen m = ReaderT $ \w ->
listen (runReaderT m w)' from cvs server
cvs checkout: warning: unrecognized response ` pass m = ReaderT $ \w -> pass
(runReaderT m w)' from cvs server
cvs checkout: warning: unrecognized response `he socket' from cvs server
cvs checkout: warning: unrecognized response `-- and PortNumber to -1.' from
cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `accept :: Socket -- ^
Listening Socket' from cvs server
cvs checkout: warning: unrecognized response ` -> IO (Handle,' from cvs
server
cvs checkout: warning: unrecognized response ` HostName,' from cvs server
cvs checkout: warning: unrecognized response ` PortNumber) -- ^
Triple of: read\/write 'Handle' for ' from cvs server
cvs checkout: warning: unrecognized response ` --
communicating with the client,' from cvs server
cvs checkout: warning: unrecognized response ` -- the
'HostName' of the peer socket, and' from cvs server
cvs checkout: warning: unrecognized response ` -- the
'PortNumber' of the remote connection.' from cvs server
cvs checkout: warning: unrecognized response `accept sock@(MkSocket _ AF_INET _
_ _) = do' from cvs server
cvs checkout: warning: unrecognized response ` ~(sock', (SockAddrInet port
haddr)) <- Socket.accept sock' from cvs server
cvs checkout: warning: unrecognized response ` peer <- Exception.catchJust
ioErrors' from cvs server
cvs checkout: warning: unrecognized response ` (do ' from cvs server
cvs checkout: warning: unrecognized response ` (HostEntry peer _ _ _) <-
getHostByAddr AF_INET haddr' from cvs server
cvs checkout: warning: unrecognized response ` return peer' from cvs
server
cvs checkout: warning: unrecognized response ` )' from cvs server
cvs checkout: warning: unrecognized response ` (\e -> inet_ntoa haddr)' from
cvs server
cvs checkout: warning: unrecognized response ` -- if getHostByName
fails, we fall back to the IP address' from cvs server
cvs checkout: warning: unrecognized response ` handle <- socketToHandle sock'
ReadWriteMode' from cvs server
cvs checkout: warning: unrecognized response ` return (handle, peer, port)'
from cvs server
cvs checkout: warning: unrecognized response `#if !defined(mingw32_HOST_OS) &&
!defined(cygwin32_HOST_OS) && !defined(_WIN32)' from cvs server
cvs checkout: warning: unrecognized response `accept sock@(MkSocket _ AF_UNIX _
_ _) = do' from cvs server
cvs checkout: warning: unrecognized response ` ~(sock', (SockAddrUnix path)) <-
Socket.accept sock' from cvs server
cvs checkout: warning: unrecognized response ` handle <- socketToHandle sock'
ReadWriteMode' from cvs server
cvs checkout: warning: unrecognized response ` return (handle, path, -1)' from
cvs server
cvs checkout: warning: unrecognized response `#endif' from cvs server
cvs checkout: warning: unrecognized response `accept sock@(MkSocket _ family _
_ _) =' from cvs server
cvs checkout: warning: unrecognized response ` error $ "Sorry, address family
" ++ (show family) ++ " is not supported!"' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `--
-----------------------------------------------------------------------------'
from cvs server
cvs checkout: warning: unrecognized response `-- sendTo/recvFrom' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `{-$sendrecv' from cvs server
cvs checkout: warning: unrecognized response `Send and receive data from\/to
the given host and port number. These' from cvs server
cvs checkout: warning: unrecognized response `should normally only be used
where the socket will not be required for' from cvs server
cvs checkout: warning: unrecognized response `further calls. Also, note that
due to the use of 'hGetContents' in 'recvFrom'' from cvs server
cvs checkout: warning: unrecognized response `the socket will remain open (i.e.
not available) even if the function already' from cvs server
cvs checkout: warning: unrecognized response `returned. Their use is strongly
discouraged except for small test-applications' from cvs server
cvs checkout: warning: unrecognized response `or invocations from the command
line.' from cvs server
cvs checkout: warning: unrecognized response `-}' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `sendTo :: HostName --
Hostname' from cvs server
cvs checkout: warning: unrecognized response ` -> PortID -- Port Number'
from cvs server
cvs checkout: warning: unrecognized response ` -> String -- Message to
send' from cvs server
cvs checkout: warning: unrecognized response ` -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `sendTo h p msg = do' from cvs
server
cvs checkout: warning: unrecognized response ` s <- connectTo h p' from cvs
server
cvs checkout: warning: unrecognized response ` hPutStr s msg' from cvs server
cvs checkout: warning: unrecognized response ` hClose s' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `recvFrom :: HostName --
Hostname' from cvs server
cvs checkout: warning: unrecognized response ` -> PortID -- Port Number'
from cvs server
cvs checkout: warning: unrecognized response ` -> IO String -- Received
Data' from cvs server
cvs checkout: warning: unrecognized response `recvFrom host port = do' from cvs
server
cvs checkout: warning: unrecognized response ` ip <- getHostByName host' from
cvs server
cvs checkout: warning: unrecognized response ` let ipHs = hostAddresses ip'
from cvs server
cvs checkout: warning: unrecognized response ` s <- listenOn port' from cvs
server
cvs checkout: warning: unrecognized response ` let ' from cvs server
cvs checkout: warning: unrecognized response ` waiting = do' from cvs server
cvs checkout: warning: unrecognized response ` ~(s', SockAddrInet _ haddr)
<- Socket.accept s' from cvs server
cvs checkout: warning: unrecognized response ` he <- getHostByAddr AF_INET
haddr' from cvs server
cvs checkout: warning: unrecognized response ` if not (any (`elem` ipHs)
(hostAddresses he))' from cvs server
cvs checkout: warning: unrecognized response ` then do' from cvs server
cvs checkout: warning: unrecognized response ` sClose s'' from cvs
server
cvs checkout: warning: unrecognized response ` waiting' from cvs server
cvs checkout: warning: unrecognized response ` else do' from cvs server
cvs checkout: warning: unrecognized response ` h <- socketToHandle s'
ReadMode' from cvs server
cvs checkout: warning: unrecognized response ` msg <- hGetContents h'
from cvs server
cvs checkout: warning: unrecognized response ` return msg' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response ` message <- waiting' from cvs
server
cvs checkout: warning: unrecognized response ` return message' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `--
---------------------------------------------------------------------------'
from cvs server
cvs checkout: warning: unrecognized response `-- Access function returning the
port type/id of socket.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Returns the 'PortID'
associated with a given socket.' from cvs server
cvs checkout: warning: unrecognized response `socketPort :: Socket -> IO
PortID' from cvs server
cvs checkout: warning: unrecognized response `socketPort s = do' from cvs server
cvs checkout: warning: unrecognized response ` sockaddr <- getSocketName s'
from cvs server
cvs checkout: warning: unrecognized response ` return (portID sockaddr)'
from cvs server
cvs checkout: warning: unrecognized response ` where' from cvs server
cvs checkout: warning: unrecognized response ` portID sa =' from cvs server
cvs checkout: warning: unrecognized response ` case sa of' from cvs server
cvs checkout: warning: unrecognized response ` SockAddrInet port _ ->
PortNumbe :: IO ()' from cvs server
cvs checkout: warning: unrecognized response `#endif' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response ` -- * Protocol names' from cvs
server
cvs checkout: warning: unrecognized response ` ProtocolName,' from cvs server
cvs checkout: warning: unrecognized response ` ProtocolNumber,' from cvs
server
cvs checkout: warning: unrecognized response ` ProtocolEntry(..),' from cvs
server
cvs checkout: warning: unrecognized response ` getProtocolByName, --
:: ProtocolName -> IO ProtocolEntry' from cvs server
cvs checkout: warning: unrecognized response ` getProtocolByNumber, -- ::
ProtocolNumber -> IO ProtcolEntry' from cvs server
cvs checkout: warning: unrecognized response ` getProtocolNumber, --
:: ProtocolName -> ProtocolNumber' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `#if !defined(cygwin32_HOST_OS) &&
!defined(mingw32_HOST_OS) && !defined(_WIN32)' from cvs server
cvs checkout: warning: unrecognized response ` getProtocolEntries, --
:: Bool -> IO [ProtocolEntry]' from cvs server
cvs checkout: warning: unrecognized response ` -- ** Low level
functionality' from cvs server
cvs checkout: warning: unrecognized response ` setProtocolEntry, --
:: Bool -> IO ()' from cvs server
cvs checkout: warning: unrecognized response ` getProtocolEntry, --
:: IO ProtocolEntry' from cvs server
cvs checkout: warning: unrecognized response ` endProtocolEntry, --
:: IO ()' from cvs server
cvs checkout: warning: unrecognized response `#endif' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response ` -- * Port numbers' from cvs
server
cvs checkout: warning: unrecognized response ` PortNumber,' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response ` -- * Network names' from cvs
server
cvs checkout: warning: unrecognized response ` NetworkName,' from cvs server
cvs checkout: warning: unrecognized response ` NetworkAddr,' from cvs server
cvs checkout: warning: unrecognized response ` NetworkEntry(..)' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `#if !defined(cygwin32_HOST_OS) &&
!defined(mingw32_HOST_OS) && !defined(_WIN32)' from cvs server
cvs checkout: warning: unrecognized response ` , getNetworkByName --
:: NetworkName -> IO NetworkEntry' from cvs server
cvs checkout: warning: unrecognized response ` , getNetworkByAddr -- ::
NetworkAddr -> Family -> IO NetworkEntry' from cvs server
cvs checkout: warning: unrecognized response ` , getNetworkEntries -- ::
Bool -> IO [NetworkEntry]' from cvs server
cvs checkout: warning: unrecognized response ` -- ** Low level
functionality' from cvs server
cvs checkout: warning: unrecognized response ` , setNetworkEntry --
:: Bool -> IO ()' from cvs server
cvs checkout: warning: unrecognized response ` , getNetworkEntry --
:: IO NetworkEntry' from cvs server
cvs checkout: warning: unrecognized response ` , endNetworkEntry --
:: IO ()' from cvs server
cvs checkout: warning: unrecognized response `#endif' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `#ifdef HAVE_SYMLINK' from cvs
server
cvs checkout: warning: unrecognized response ` -- * Symbolic links' from cvs
server
cvs checkout: warning: unrecognized response ` , symlink --
:: String -> String -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `#endif' from cvs server
cvs checkout: warning: unrecognized response `#ifdef HAVE_READLINK' from cvs
server
cvs checkout: warning: unrecognized response ` , readlink --
:: String -> IO String' from cvs server
cvs checkout: warning: unrecognized response `#endif' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response ` ) where' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `#ifdef __HUGS__' from cvs server
cvs checkout: warning: unrecognized response `import Hugs.Prelude' from cvs
server
cvs checkout: warning: unrecognized response `#endif' from cvs server
cvs checkout: warning: unrecognized response `import Network.Socket' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `import Control.Concurrent
( MVar, newMVar, withMVar )' from cvs server
cvs checkout: warning: unrecognized response `import Foreign.C.Error (
throwErrnoIfMinus1, throwErrnoIfMinus1_ )' from cvs server
cvs checkout: warning: unrecognized response `import Foreign.C.String (
CString, peekCString, peekCStringLen, withCString )' from cvs server
cvs checkout: warning: unrecognized response `import Foreign.C.Types ( CInt,
CULong, CChar, CSize, CShort )' from cvs server
cvs checkout: warning: unrecognized response `import Foreign.Ptr ( Ptr, nullPtr
)' from cvs server
cvs checkout: warning: unrecognized response `import Foreign.Storable (
Storable(..) )' from cvs server
cvs checkout: warning: unrecognized response `import Foreign.Marshal.Array (
allocaArray0, peekArray0 )' from cvs server
cvs checkout: warning: unrecognized response `import Foreign.Marshal.Utils (
with, fromBool )' from cvs server
cvs checkout: warning: unrecognized response `import Data.Typeable' from cvs
server
cvs checkout: warning: unrecognized response `import System.IO.Unsafe (
unsafePerformIO )' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `#ifdef __GLASGOW_HASKELL__' from
cvs server
cvs checkout: warning: unrecognized response `import GHC.IOBase' from cvs server
cvs checkout: warning: unrecognized response `#endif' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `import Control.Monad ( liftM )'
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `--
---------------------------------------------------------------------------'
from cvs server
cvs checkout: warning: unrecognized response `-- Basic Types' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `type HostName = String' from
cvs server
cvs checkout: warning: unrecognized response `type ProtocolName = String' from
cvs server
cvs checkout: warning: unrecognized response `type ServiceName = String' from
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `--
---------------------------------------------------------------------------'
from cvs server
cvs checkout: warning: unrecognized response `-- Service Database Access' from
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Calling getServiceByName for a
given service and protocol returns' from cvs server
cvs checkout: warning: unrecognized response `-- the systems service entry.
This should be used to find the port' from cvs server
cvs checkout: warning: unrecognized response `-- numbers for standard protocols
such as SMTP and FTP. The remaining' from cvs server
cvs checkout: warning: unrecognized response `-- three functions should be used
for browsing the service database' from cvs server
cvs checkout: warning: unrecognized response `-- sequentially.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Calling setServiceEntry with
True indicates that the service' from cvs server
cvs checkout: warning: unrecognized response `-- database should be left open
between calls to getServiceEntry. To' from cvs server
cvs checkout: warning: unrecognized response `-- close the database a call to
endServiceEntry is required. This' from cvs server
cvs checkout: warning: unrecognized response `-- database file is usually
stored in the file /etc/services.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `data ServiceEntry = ' from cvs
server
cvs checkout: warning: unrecognized response ` ServiceEnITY, WHETHER IN
CONTRACT, STRICT' from cvs server
cvs checkout: warning: unrecognized response `LIABILITY, OR TORT (INCLUDING
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY' from cvs server
cvs checkout: warning: unrecognized response `OUT OF THE USE OF THIS SOFTWARE,
EVEN IF ADVISED OF THE POSSIBILITY OF SUCH' from cvs server
cvs checkout: warning: unrecognized response `DAMAGE.' from cvs server
cvs checkout: warning: unrecognized response `m the in-between computation'
from cvs server
cvs checkout: warning: unrecognized response `bracketOnError before after thing
=' from cvs server
cvs checkout: warning: unrecognized response ` block (do' from cvs server
cvs checkout: warning: unrecognized response ` a <- before ' from cvs server
cvs checkout: warning: unrecognized response ` r <- Exception.catch ' from
cvs server
cvs checkout: warning: unrecognized response ` (unblock (thing a))' from
cvs server
cvs checkout: warning: unrecognized response ` (\e -> do { after a; throw e
})' from cvs server
cvs checkout: warning: unrecognized response ` return r' from cvs server
cvs checkout: warning: unrecognized response ` )' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response
`-----------------------------------------------------------------------------'
from cvs server
cvs checkout: warning: unrecognized response `-- Extra documentation' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `{-$buffering' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `The 'Handle' returned by
'connectTo' and 'accept' is block-buffered by' from cvs server
cvs checkout: warning: unrecognized response `default. For an interactive
application you may want to set the' from cvs server
cvs checkout: warning: unrecognized response `buffering mode on the 'Handle'
to' from cvs server
cvs checkout: warning: unrecognized response `'LineBuffering' or 'NoBuffering',
like so:' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `> h <- connectTo host port' from
cvs server
cvs checkout: warning: unrecognized response `> hSetBuffering h LineBuffering'
from cvs server
cvs checkout: warning: unrecognized response `-}' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `{-$performance' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `For really fast I\/O, it might be
worth looking at the 'hGetBuf' and' from cvs server
cvs checkout: warning: unrecognized response `'hPutBuf' family of functions in
"System.IO".' from cvs server
cvs checkout: warning: unrecognized response `-}' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `{-$sigpipe' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `On Unix, when writing to a socket
and the reading end is' from cvs server
cvs checkout: warning: unrecognized response `closed by the remote client, the
program is normally sent a' from cvs server
cvs checkout: warning: unrecognized response [EMAIL PROTECTED]@ signal by the
operating system. The' from cvs server
cvs checkout: warning: unrecognized response `default behaviour when a
@SIGPIPE@ is received is' from cvs server
cvs checkout: warning: unrecognized response `to terminate the program
silently, which can be somewhat confusing' from cvs server
cvs checkout: warning: unrecognized response `if you haven't encountered this
before. The solution is to' from cvs server
cvs checkout: warning: unrecognized response `specify that @SIGPIPE@ is to be
ignored, using' from cvs server
cvs checkout: warning: unrecognized response `the POSIX library:' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `> import Posix' from cvs server
cvs checkout: warning: unrecognized response `> main = do installHandler
sigPIPE Ignore Nothing; ...' from cvs server
cvs checkout: warning: unrecognized response `-}' from cvs server
cvs checkout: warning: unrecognized response `Parser a -> String ->
[(a,String)]' from cvs server
cvs checkout: warning: unrecognized response `papply (Parser p) inp = p inp'
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Derived combinators' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `plusplusplus :: Parser a ->
Parser a -> Parser a' from cvs server
cvs checkout: warning: unrecognized response `p `plusplusplus` q = first (p
`mplus` q)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `sat :: (Char -> Bool) -> Parser
Char' from cvs server
cvs checkout: warning: unrecognized response `sat p = do {x <- item; guard (p
x); return x}' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `many :: Parser a -> Parser [a]'
from cvs server
cvs checkout: warning: unrecognized response `many p = force (many1 p
`plusplusplus` return [])' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `many1 :: Parser a -> Parser [a]'
from cvs server
cvs checkout: warning: unrecognized response `many1 p = do {x <- p; xs <- many
p; return (x:xs)}' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `sepby :: Parser a -> Parser b ->
Parser [a]' from cvs server
cvs checkout: warning: unrecognized response `p `sepby` sep = (p `sepby1` sep)
`plusplusplus` return []' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `sepby1 :: Parser a -> Parser b ->
Parser [a]' from cvs server
cvs checkout: warning: unrecognized response `p `sepby1` sep = do x <- p' from
cvs server
cvs checkout: warning: unrecognized response ` xs <- many
(do {sep; p})' from cvs server
cvs checkout: warning: unrecognized response ` return(x:xs)'
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `char :: Char -> Parser Char' from
cvs server
cvs checkout: warning: unrecognized response `char x = sat (x==)' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `alphanum :: Parser Char' from cvs
server
cvs checkout: warning: unrecognized response `alphanum = sat isAlphaNum' from
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `string :: String -> Parser
String' from cvs server
cvs checkout: warning: unrecognized response `string [] = return ""' from
cvs server
cvs checkout: warning: unrecognized response `string (x:xs) = do char x' from
cvs server
cvs checkout: warning: unrecognized response ` string xs'
from cvs server
cvs checkout: warning: unrecognized response ` return (x:xs)'
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `hexdigit :: Parser Char' from cvs
server
cvs checkout: warning: unrecognized response `hexdigit = sat isHexDigit' from
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `--
---------------------------------------------------------------------------'
from cvs server
cvs checkout: warning: unrecognized response `-- Decoding
application/x-www-form-urlencoded data' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- An URL encoded value consist
of a sequence of' from cvs server
cvs checkout: warning: unrecognized response `-- zero or more name "=" value
pairs separated by "&"' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Env ::= [Name "=" Value {"&"
Name "=" Value}]' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Names and values are
URL-encoded,' from cvs server
cvs checkout: warning: unrecognized response `-- according to the following
table' from cvs server
cvs checkout: warning: unrecognized response `-- ' from cvs server
cvs checkout: warning: unrecognized response `-- character | encoding' from
cvs server
cvs checkout: warning: unrecognized response `-- ----------|---------' from
cvs server
cvs checkout: warning: unrecognized response `-- ' ' | '+'' from cvs
server
cvs checkout: warning: unrecognized response `-- '<' | "%XX"' from cvs
server
cvs checkout: warning: unrecognized response `-- c | "%"hexval(ord
c)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `urlDecode :: String ->
[(String,String)]' from cvs server
cvs checkout: warning: unrecognized response `urlDecode s = case papply env s
of' from cvs server
cvs checkout: warning: unrecognized response ` [] -> []' from
cvs server
cvs checkout: warning: unrecognized response ` ((e,_):_) -> e'
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `env :: Parser [(String,String)]'
from cvs server
cvs checkout: warning: unrecognized response `env = (do n <- urlEncoded' from
cvs server
cvs checkout: warning: unrecognized response ` string "="' from cvs
server
cvs checkout: warning: unrecognized response ` v <- urlEncoded' from
cvs server
cvs checkout: warning: unrecognized response ` return (n,v)) `sepby`
(string "&")' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `urlEncoded :: Parser String' from
cvs server
cvs checkout: warning: unrecognized response `urlEncoded' from cvs server
cvs checkout: warning: unrecognized response ` = many ( alphanum `mplus` extra
`mplus` safe' from cvs server
cvs checkout: warning: unrecognized response ` `mplus` do{ char '+' ;
return ' '}' from cvs server
cvs checkout: warning: unrecognized response ` `mplus` do{ char '%''
from cvs server
cvs checkout: warning: unrecognized response ` ; d <- hexadecimal'
from cvs server
cvs checkout: warning: unrecognized response ` ; return $ chr
(hex2int d)' from cvs server
cvs checkout: warning: unrecognized response ` }' from cvs server
cvs checkout: warning: unrecognized response ` )' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `extra :: Parser Char' from cvs
server
cvs checkout: warning: unrecognized response `extra = sat (`elem` "!*'(),")'
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `safe :: Parser Char' from cvs
server
cvs checkout: warning: unrecognized response `safe = sat (`elem` "$-_.")' from
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `hexadecimal :: Parser HexString'
from cvs server
cvs checkout: warning: unrecognized response `hexadecimal = do d1 <- hexdigit'
from cvs server
cvs checkout: warning: unrecognized response ` d2 <- hexdigit'
from cvs server
cvs checkout: warning: unrecognized response ` return [d1,d2]'
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `type HexString = String' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `hex2int :: HexString -> Int' from
cvs server
cvs checkout: warning: unrecognized response `hex2int ds = foldl (\n d ->
n*16+d) 0 (map (toInt . toUpper) ds)' from cvs server
cvs checkout: warning: unrecognized response ` where toInt d | isDigit d =
ord d - ord '0'' from cvs server
cvs checkout: warning: unrecognized response ` toInt d | isHexDigit d =
(ord d - ord 'A') + 10' from cvs server
cvs checkout: warning: unrecognized response ` toInt d =
error ("hex2int: illegal hex digit " ++ [d])' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- A function to do URL encoding
and proving its correctness might be a' from cvs server
cvs checkout: warning: unrecognized response `-- nice exercise for the book.'
from cvs server
cvs checkout: warning: unrecognized response `-- ' from cvs server
cvs checkout: warning: unrecognized response `-- We don't usually need it for
CGI scripts though. The browser does the' from cvs server
cvs checkout: warning: unrecognized response `-- encoding and the CGI script
does the decoding.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `--
---------------------------------------------------------------------------'
from cvs server
cvs checkout: warning: unrecognized response `-- Hide the CGI protocol from the
programmer' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `wrapper :: ([(String,String)] ->
IO Html) -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `wrapper f = do qs <-
getQueryString' from cvs server
cvs checkout: warning: unrecognized response ` cgiVars <-
getCgiVars' from cvs server
cvs checkout: warning: unrecognized response ` a <- f
(cgiVars ++ urlDecode qs)' from cvs server
cvs checkout: warning: unrecognized response ` putStr "Content-type:
text/html\n\n"' from cvs server
cvs checkout: warning: unrecognized response ` putStr (renderHtml
a)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getCgiVars :: IO
[(String,String)]' from cvs server
cvs checkout: warning: unrecognized response `getCgiVars = do vals <- mapM
myGetEnv cgiVarNames' from cvs server
cvs checkout: warning: unrecognized response ` return (zip
cgiVarNames vals)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `cgiVarNames :: [String]' from cvs
server
cvs checkout: warning: unrecognized response `cgiVarNames =' from cvs server
cvs checkout: warning: unrecognized response ` [ "DOCUMENT_ROOT"' from cvs
server
cvs checkout: warning: unrecognized response ` , "AUTH_TYPE"' from cvs server
cvs checkout: warning: unrecognized response ` , "GATEWAY_INTERFACE"' from
cvs server
cvs checkout: warning: unrecognized response ` , "SERVER_SOFTWARE"' from cvs
server
cvs checkout: warning: unrecognized response ` , "SERVER_NAME"' from cvs
server
cvs checkout: warning: unrecognized response ` , "REQUEST_METHOD"' from cvs
server
cvs checkout: warning: unrecognized response ` , "SERVER_ADMIN"' from cvs
server
cvs checkout: warning: unrecognized response ` , "SERVER_PORT"' from cvs
server
cvs checkout: warning: unrecognized response ` , "QUERY_STRING"' from cvs
server
cvs checkout: warning: unrecognized response ` , "CONTENT_LENGTH"' from cvs
server
cvs checkout: warning: unrecognized response ` , "CONTENT_TYPE"' from cvs
server
cvs checkout: warning: unrecognized response ` , "REMOTE_USER"' from cvs
server
cvs checkout: warning: unrecognized response ` , "REMOTE_IDENT"' from cvs
server
cvs checkout: warning: unrecognized response ` , "REMOTE_ADDR"' from cvs
server
cvs checkout: warning: unrecognized response ` , "REMOTE_HOST"' from cvs
server
cvs checkout: warning: unrecognized response ` , "TZ"' from cvs server
cvs checkout: warning: unrecognized response ` , "PATH"' from cvs server
cvs checkout: warning: unrecognized response ` , "PATH_INFO"' from cvs server
cvs checkout: warning: unrecognized response ` , "PATH_TRANSLATED"' from cvs
server
cvs checkout: warning: unrecognized response ` , "SCRIPT_NAME"' from cvs
server
cvs checkout: warning: unrecognized response ` , "SCRIPT_FILENAME"' from cvs
server
cvs checkout: warning: unrecognized response ` , "HTTP_CONNECTION"' from cvs
server
cvs checkout: warning: unrecognized response ` , "HTTP_ACCEPT_LANGUAGE"' from
cvs server
cvs checkout: warning: unrecognized response ` , "HTTP_ACCEPT"' from cvs
server
cvs checkout: warning: unrecognized response ` , "HTTP_HOST"' from cvs server
cvs checkout: warning: unrecognized response ` , "HTTP_UA_COLOR"' from cvs
server
cvs checkout: warning: unrecognized response ` , "HTTP_UA_CPU"' from cvs
server
cvs checkout: warning: unrecognized response ` , "HTTP_UA_OS"' from cvs server
cvs checkout: warning: unrecognized response ` , "HTTP_UA_PIXELS"' from cvs
server
cvs checkout: warning: unrecognized response ` , "HTTP_USER_AGENT"' from cvs
server
cvs checkout: warning: unrecognized response ` ] ' from
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `pwrapper :: PortID ->
([(String,String)] -> IO Html) -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `pwrapper pid f = ' from cvs server
cvs checkout: warning: unrecognized response ` do { sock <- listenOn pid'
from cvs server
cvs checkout: warning: unrecognized response ` ; acceptConnections fn
sock' from cvs server
cvs checkout: warning: unrecognized response ` }' from cvs server
cvs checkout: warning: unrecognized response ` where' from cvs server
cvs checkout: warning: unrecognized response ` fn h = do { qs <- hGetLine
h' from cvs server
cvs checkout: warning: unrecognized response ` ; a <- f
(urlDecode qs)' from cvs server
cvs checkout: warning: unrecognized response ` ; hPutStr h
"Content-type: text/html\n\n"' from cvs server
cvs checkout: warning: unrecognized response ` ; hPutStr h
(renderHtml a)' from cvs server
cvs checkout: warning: unrecognized response ` }' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `acceptConnections fn sock = do'
from cvs server
cvs checkout: warning: unrecognized response ` (h, SockAddrInet port haddr) <-
accept' sock' from cvs server
cvs checkout: warning: unrecognized response ` forkIO (fn h `finally` (hClose
h))' from cvs server
cvs checkout: warning: unrecognized response ` acceptConnections fn sock' from
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `accept' :: Socket
-- Listening Socket' from cvs server
cvs checkout: warning: unrecognized response ` -> IO (Handle,SockAddr)
-- StdIO Handle for read/write' from cvs server
cvs checkout: warning: unrecognized response `accept' sock = do' from cvs server
cvs checkout: warning: unrecognized response ` (sock', addr) <- Socket.accept
sock' from cvs server
cvs checkout: warning: unrecognized response ` handle <- socketToHandle sock'
ReadWriteMode' from cvs server
cvs checkout: warning: unrecognized response ` return (handle,addr)' from cvs
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `--
---------------------------------------------------------------------------'
from cvs server
cvs checkout: warning: unrecognized response `-- Small boot function for
creating dummy cgi scripts' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Sample program:' from cvs
server
cvs checkout: warning: unrecognized response `-- ' from cvs server
cvs checkout: warning: unrecognized response `-- main =
connectToCGIScript "localhost" (PortNumber 3432)' from cvs server
cvs checkout: warning: unrecognized response `-- ' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `connectToCGIScript :: String ->
PortID -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `connectToCGIScript host portId'
from cvs server
cvs checkout: warning: unrecognized response ` = do { str <-
getQueryString' from cvs server
cvs checkout: warning: unrecognized response ` ; h <- connectTo host
portId' from cvs server
cvs checkout: warning: unrecognized response `
`Exception.catch`' from cvs server
cvs checkout: warning: unrecognized response ` (\ e -> abort
"Can not connect to CGI damon." e)' from cvs server
cvs checkout: warning: unrecognized response ` ; hPutStrLn h str' from cvs
server
cvs checkout: warning: unrecognized response ` ; (sendBack h `finally`
(hClose h))' from cvs server
cvs checkout: warning: unrecognized response ` `Prelude.catch`
(\e -> if isEOFError e' from cvs server
cvs checkout: warning: unrecognized response `
then return ()' from cvs server
cvs checkout: warning: unrecognized response `
else ioError e)' from cvs server
cvs checkout: warning: unrecognized response ` }' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `abort :: String -> Exception ->
IO a' from cvs server
cvs checkout: warning: unrecognized response `abort msg e = ' from cvs server
cvs checkout: warning: unrecognized response ` do { putStrLn ("Content-type:
text/html\n\n" ++' from cvs server
cvs checkout: warning: unrecognized response ` "<html><body>" ++
msg ++ "</body></html>")' from cvs server
cvs checkout: warning: unrecognized response ` ; throw e' from cvs server
cvs checkout: warning: unrecognized response ` }' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `sendBack h = do { s <- hGetLine
h' from cvs server
cvs checkout: warning: unrecognized response ` ; putStrLn s'
from cvs server
cvs checkout: warning: unrecognized response ` ; sendBack h' from cvs
server
cvs checkout: warning: unrecognized response ` }' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getQueryString :: IO String' from
cvs server
cvs checkout: warning: unrecognized response `getQueryString = do' from cvs
server
cvs checkout: warning: unrecognized response ` method <- myGetEnv
"REQUEST_METHOD"' from cvs server
cvs checkout: warning: unrecognized response ` case method of' from cvs server
cvs checkout: warning: unrecognized response ` "POST" -> do len <-
myGetEnv "CONTENT_LENGTH"' from cvs server
cvs checkout: warning: unrecognized response ` inp <-
getContents' from cvs server
cvs checkout: warning: unrecognized response ` return (take
(read len) inp)' from cvs server
cvs checkout: warning: unrecognized response ` _ -> myGetEnv
"QUERY_STRING"' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `myGetEnv :: String -> IO String'
from cvs server
cvs checkout: warning: unrecognized response `myGetEnv v = Prelude.catch
(getEnv v) (const (return ""))' from cvs server
cvs checkout: warning: cannot open /cvs/CVSROOT/val-tags read/write: Read-only
file system
cvs checkout: cannot open directory /cvs/fptools/nofib/PRIVATE: Permission
denied
cvs checkout: skipping directory nofib/PRIVATE
cvs checkout: warning: cannot open /cvs/CVSROOT/val-tags read/write: Read-only
file system
ok. (GHC Version 6.4.3.20060916)
**** Building stage 1 compiler ... failed; relevant barfage
is below.
**** building source distribution ... cat:
/playpen/ghc/nightly/STABLE-cam-02-unx/fptools/libraries/extra-packages: No
such file or directory
Nightly run ended at Sat Sep 16 20:05:58 BST 2006
_______________________________________________
Cvs-ghc mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/cvs-ghc
