[nightly] 05-Oct-2006 build of STABLE on i386-unknown-linux (cam-02-unx.europe.corp.microsoft.com)

[GHC Build Reports]

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 Thu Oct 5 19:30:01 BST 2006.
**** checking out new source tree                 ... 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 `<- deviceGet fromIntegral glut_JOYSTICK_AXES' from cvs server
cvs checkout: warning: unrecognized response `      r <- deviceGet fromIntegral glut_JOYSTICK_POLL_RATE' from cvs server
cvs checkout: warning: unrecognized response `      return (b, a, 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 `-- Convenience unmarshalers' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `i2b :: CInt -> Bool' from cvs server
cvs checkout: warning: unrecognized response `i2b = (/= 0)' 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 `getDeviceInfo :: GLenum -> IO a -> GettableStateVar (Maybe a)' from cvs server
cvs checkout: warning: unrecognized response `getDeviceInfo dev act =' from cvs server
cvs checkout: warning: unrecognized response `   makeGettableStateVar $ do' from cvs server
cvs checkout: warning: unrecognized response `      hasDevice <- deviceGet i2b dev' from cvs server
cvs checkout: warning: unrecognized response `      if hasDevice then liftM Just act else return Nothing' 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 `-- | Contains version of GLUT in the form of' from cvs server
cvs checkout: warning: unrecognized response `-- @/flavour/ /major/./minor/./patchlevel/@, where @/flavour/@ is one of' from cvs server
cvs checkout: warning: unrecognized response `-- @GLUT@, @freeglut@ or @OpenGLUT at .' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `glutVersion :: GettableStateVar String' from cvs server
cvs checkout: warning: unrecognized response `glutVersion = makeGettableStateVar $ do' from cvs server
cvs checkout: warning: unrecognized response `   let isGLUT = isUnknown "glutSetOption"' from cvs server
cvs checkout: warning: unrecognized response `       isFreeglut = isUnknown "glutSetWindowStayOnTop"' from cvs server
cvs checkout: warning: unrecognized response `       isUnknown = liftM (== nullFunPtr) . getProcAddressInternal' from cvs server
cvs checkout: warning: unrecognized response `       showVersionPart x = shows (x `mod` 100)' from cvs server
cvs checkout: warning: unrecognized response `       showVersion v = showVersionPart (v `div` 10000) . showChar '.' .' from cvs server
cvs checkout: warning: unrecognized response `                       showVersionPart (v `div`   100) . showChar '.' .' from cvs server
cvs checkout: warning: unrecognized response `                       showVersionPart  v' from cvs server
cvs checkout: warning: unrecognized response `   g <- isGLUT' from cvs server
cvs checkout: warning: unrecognized response `   if g' from cvs server
cvs checkout: warning: unrecognized response `      then return "GLUT 3.7"   -- ToDo: just guessing' from cvs server
cvs checkout: warning: unrecognized response `      else do f <- isFreeglut' from cvs server
cvs checkout: warning: unrecognized response `              v <- simpleGet id glut_VERSION' from cvs server
cvs checkout: warning: unrecognized response `              let prefix = if f then "freeglut" else "OpenGLUT"' from cvs server
cvs checkout: warning: unrecognized response `              return $ showString prefix . showChar ' ' . showVersion v $ ""' 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 `-- | (/freeglut only/) Contains the thickness of the sizing border around the' from cvs server
cvs checkout: warning: unrecognized response `-- perimeter of a window that can be resized, in pixf __NHC__' from cvs server
cvs checkout: warning: unrecognized response `import NHC.FFI ( CInt )' from cvs server
cvs checkout: warning: unrecognized response `#endif' from cvs server
cvs checkout: warning: unrecognized response `import Graphics.UI.GLUT.Window ( Window )' 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 `-- | Controls the overlay for the /current window/. The requested display mode' from cvs server
cvs checkout: warning: unrecognized response `-- for the overlay is determined by the /initial display mode/.' from cvs server
cvs checkout: warning: unrecognized response `-- 'overlayPossible' can be used to determine if an overlay is possible for the' from cvs server
cvs checkout: warning: unrecognized response `-- /current window/ with the current /initial display mode/. Do not attempt to' from cvs server
cvs checkout: warning: unrecognized response `-- establish an overlay when one is not possible; GLUT will terminate the' from cvs server
cvs checkout: warning: unrecognized response `-- program.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- When 'hasOverlay' is set to 'True' when an overlay already exists, the' from cvs server
cvs checkout: warning: unrecognized response `-- existing overlay is first removed, and then a new overlay is established. The' from cvs server
cvs checkout: warning: unrecognized response `-- state of the old overlay\'s OpenGL context is discarded. Implicitly, the' from cvs server
cvs checkout: warning: unrecognized response `-- window\'s /layer in use/ changes to the overlay immediately after the overlay' from cvs server
cvs checkout: warning: unrecognized response `-- is established.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- The initial display state of an overlay is shown, however the overlay is only' from cvs server
cvs checkout: warning: unrecognized response `-- actually shown if the overlay\'s window is shown.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- Setting 'hasOverlay' to 'False' is safe even if no overlay is currently' from cvs server
cvs checkout: warning: unrecognized response `-- established, nothing happens in this case. Implicitly, the window\'s /layer' from cvs server
cvs checkout: warning: unrecognized response `-- in use/ changes to the normal plane immediately once the overlay is removed.' from cvs server
cvs checkout: warning: unrecognized response `-- ' from cvs server
cvs checkout: warning: unrecognized response `-- If the program intends to re-establish the overlay later, it is typically' from cvs server
cvs checkout: warning: unrecognized response `-- faster and less resource intensive to use 'overlayVisible' to simply change' from cvs server
cvs checkout: warning: unrecognized response `-- the display status of the overlay.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- /X Implementation Notes:/ GLUT for X uses the @SERVER_OVERLAY_VISUALS@' from cvs server
cvs checkout: warning: unrecognized response `-- convention to determine if overlay visuals are available. While the' from cvs server
cvs checkout: warning: unrecognized response `-- convention allows for opaque overlays (no transparency) and overlays with the' from cvs server
cvs checkout: warning: unrecognized response `-- transparency specified as a bitmask, GLUT overlay management only provides' from cvs server
cvs checkout: warning: unrecognized response `-- access to transparent pixel overlays.' from cvs server
cvs checkout: warning: unrecognized response `-- ' from cvs server
cvs checkout: warning: unrecognized response `-- Until RGBA overlays are better understood, GLUT only supports color index' from cvs server
cvs checkout: warning: unrecognized response `-- overlays.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `hasOverlay :: StateVar Bool' from cvs server
cvs checkout: warning: unrecognized response `hasOverlay = makeStateVar getHasOverlay setHasOverlay' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `setHasOverlay :: Bool -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `setHasOverlay False = glutRemoveOverlay' from cvs server
cvs checkout: warning: unrecognized response `setHasOverlay True  = glutEstablishOverlay' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV safe "glutRemoveOverlay" glutRemoveOverlay :: IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV safe "glutEstablishOverlay" glutEstablishOverlay :: IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getHasOverlay :: IO Bool' from cvs server
cvs checkout: warning: unrecognized response `getHasOverlay = layerGet (/= 0) glut_HAS_OVERLAY' 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 `-- | Contains 'True' if an overlay could be established for the /current window/' from cvs server
cvs checkout: warning: unrecognized response `-- given the current /initial display mode/. If it contains 'False',' from cvs server
cvs checkout: warning: unrecognized response `-- 'setHasOverlay' will fail with a fatal error if called.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `overlayPossible :: GettableStateVar Bool' from cvs server
cvs checkout: warning: unrecognized response `overlayPossible = makeGettableStateVar $ layerGet (/= 0) glut_OVERLAY_POSSIBLE' 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 `-- | Controls the visibility of the overlay of the /current window/.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- The effect of showing or hiding an overlay takes place immediately. Note that' from cvs server
cvs checkout: warning: unrecognized response `-- setting 'overlayVisible' to 'True' will not actually display the overlay' from cvs server
cvs checkout: warning: unrecognized response `-- unless the window is also shown (and even a shown window may be obscured by' from cvs server
cvs checkout: warning: unrecognized response `-- other windows, thereby obscuring the overlay). It is typically faster and' from cvs server
cvs checkout: warning: unrecognized response `-- less resource intensive to use the routines below to control the display' from cvs server
cvs checkout: warning: unrecognized response `-- status of an overlay as opposed to removing and re-establishing the overlay.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `overlayVisible :: SettableStateVar Bool' from cvs server
cvs checkout: warning: unrecognized response `overlayVisible =' from cvs server
cvs checkout: warning: unrecognized response `   makeSettableStateVar $ \flag ->' from cvs server
cvs checkout: warning: unrecognized response `      if flag then glutShowOverlay else glutHideOverlay' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV safe "glutShowOverlay" glutShowOverlay :: IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV safe "glutHideOverlay" glutHideOverlay :: 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- | The /layer in use/.' from cvs server
cvs checkout: warning: unrecognized response `data Layer' from cvs server
cvs checkout: warning: unrecognized response `   = Normal   -- ^ The normal plane.' from cvs server
cvs checkout: warning: unrecognized response `   | Overlay  -- ^ The overlay.' from cvs server
cvs checkout: warning: unrecognized response `   deriving ( Eq, Ord, Show )' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `marshalLayer :: Layer -> GLenum' from cvs server
cvs checkout: warning: unrecognized response `marshalLayer x = case x of' from cvs server
cvs checkout: warning: unrecognized response `   Normal -> glut_NORMAL' from cvs server
cvs checkout: warning: unrecognized response `   Overlay -> glut_OVERLAY' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `unmarshalLayer :: GLenum -> Layer' from cvs server
cvs checkout: warning: unrecognized response `unmarshalLayer x' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_NORMAL  = Normal' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_OVERLAY = Overlay' from cvs server
cvs checkout: warning: unrecognized response `   | otherwise = error ("unmarshalLayer: illegal value " ++ show x)' 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 `-- | Controls the per-window /layer in use/ for the /current window/, which can' from cvs server
cvs checkout: warning: unrecognized response `-- either be the normal plane or the overlay. Selecting the overlay should only' from cvs server
cvs checkout: warning: unrecognized response `-- be done if an overlay exists, however windows without an overlay may still' from cvs server
cvs checkout: warning: unrecognized response `-- set the /layer in use/ to 'Normal'. OpenGL commands for the window are' from cvs server
cvs checkout: warning: unrecognized response `-- directed to the current /layer in use/.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `layerInUse :: StateVar Layer' from cvs server
cvs checkout: warning: unrecognized response `layerInUse =' from cvs server
cvs checkout: warning: unrecognized response `   makeStateVar getLayerInUse setLayerInUse' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `setLayerInUse :: Layer -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `setLayerInUse = glutUseLayer . marshalLayer' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV safe "glutUseLayer" glutUseLayer :: GLenum -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getLayerInUse :: IO Layer' from cvs server
cvs checkout: warning: unrecognized response `getLayerInUse = layerGet (unmarshalLayer . fromIntegral) glut_LAYER_IN_USE' 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 `-- | Mark the overlay of the given window (or the /current window/, if none is' from cvs server
cvs checkout: warning: unrecognized response `-- supplied) as needing to be redisplayed. The next iteration through' from cvs server
cvs checkout: warning: unrecognized response `-- 'Graphics.UI.GLUT.Begin.mainLoop', the window\'s overlay display callback' from cvs server
cvs checkout: warning: unrecognized response `-- (or simply the display callback if no overlay display callback is registered)' from cvs server
cvs checkout: warning: unrecognized response `-- will be called to redisplay the window\'s overlay plane. Multiple calls to' from cvs server
cvs checkout: warning: unrecognized response `-- 'postOverlayRedisplay' before the next display callback opportunity (or' from cvs server
cvs checkout: warning: unrecognized response `-- overlay display callback opportunity if one is registered) generate only a' from cvs server
cvs checkout: warning: unrecognized response `-- single redisplay. 'postOverlayRedisplay' may be called within a window\'s' from cvs server
cvs checkout: warning: unrecognized response `-- display or overlay display callback to re-mark that window for redisplay.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- Logically, overlay damage notification for a window is treated as a' from cvs server
cvs checkout: warning: unrecognized response `-- 'postOverlayRedisplay' on the damaged window. Unlike damage reported by the' from cvs server
cvs checkout: warning: unrecognized response `-- window system, 'postOverlayRedisplay' will not set to true the overlay\'s' from cvs server
cvs checkout: warning: unrecognized response `-- damaged status (see 'Graphics.UI.GLUT.State.damaged').' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- Also, see 'Graphics.UI.GLUT.Window.postRedisplay'.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `postOverlayRedisplay :: Maybe Window -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `postOverlayRedisplay =' from cvs server
cvs checkout: warning: unrecognized response `   maybe glutPostOverlayRedisplay glutPostWindowOverlayRedisplay' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV safe "glutPostOverlayRedisplay"' from cvs server
cvs checkout: warning: unrecognized response `   glutPostOverlayRedisplay :: IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV safe "glutPostWindowOverlayRedisplay"' from cvs server
cvs checkout: warning: unrecognized response `   glutPostWindowOverlayRedisplay :: Window -> IO ()' from cvs server
cvs checkout: warning: unrecognized response ` s r' from cvs server
cvs checkout: warning: unrecognized response `renderObject Wireframe (Torus i o s r)      = wireTorus  i o s r ' from cvs server
cvs checkout: warning: unrecognized response `renderObject Solid     (Teapot h)           = solidTeapot h' from cvs server
cvs checkout: warning: unrecognized response `renderObject Wireframe (Teapot h)           = wireTeapot  h' from cvs server
cvs checkout: warning: unrecognized response `renderObject Solid     (SierpinskiSponge n) = solidSierpinskiSponge n' from cvs server
cvs checkout: warning: unrecognized response `renderObject Wireframe (SierpinskiSponge n) = wireSierpinskiSponge n' 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 `-- | Render a solid cube centered at the modeling coordinates origin with sides' from cvs server
cvs checkout: warning: unrecognized response `-- of the given length.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutSolidCube" solidCube' from cvs server
cvs checkout: warning: unrecognized response `   :: Height -- ^ Length of the cube sides' from cvs server
cvs checkout: warning: unrecognized response `   -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Render a wireframe cube centered at the modeling coordinates origin with' from cvs server
cvs checkout: warning: unrecognized response `-- sides of the given length.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutWireCube" wireCube' from cvs server
cvs checkout: warning: unrecognized response `   :: Height -- ^ Length of the cube sides' from cvs server
cvs checkout: warning: unrecognized response `   -> 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- | Render a solid dodecahedron (12-sided regular solid) centered at the' from cvs server
cvs checkout: warning: unrecognized response `-- modeling coordinates origin with a radius of @sqrt 3 at .' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign importels.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `windowBorderWidth :: GettableStateVar Int' from cvs server
cvs checkout: warning: unrecognized response `windowBorderWidth =' from cvs server
cvs checkout: warning: unrecognized response `   makeGettableStateVar (simpleGet fromIntegral glut_WINDOW_BORDER_WIDTH)' 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 `-- | (/freeglut only/) Contains the height of the header\/caption area of a' from cvs server
cvs checkout: warning: unrecognized response `-- window in pixels.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `windowHeaderHeight :: GettableStateVar Int' from cvs server
cvs checkout: warning: unrecognized response `windowHeaderHeight =' from cvs server
cvs checkout: warning: unrecognized response `   makeGettableStateVar (simpleGet fromIntegral glut_WINDOW_HEADER_HEIGHT)' 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 `-- | Render a solid cone oriented along the Z axis. The base of the cone is' from cvs server
cvs checkout: warning: unrecognized response `-- placed at Z = 0, and the top at Z = height. The cone is subdivided around the' from cvs server
cvs checkout: warning: unrecognized response `-- Z axis into slices, and along the Z axis into stacks.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutSolidCone" solidCone' from cvs server
cvs checkout: warning: unrecognized response `   :: Radius   -- ^ Radius of the base of the cone.' from cvs server
cvs checkout: warning: unrecognized response `   -> Height   -- ^ Height of the cone.' from cvs server
cvs checkout: warning: unrecognized response `   -> Slices   -- ^ Number of subdivisions around the Z axis.' from cvs server
cvs checkout: warning: unrecognized response `   -> Stacks   -- ^ The number of subdivisions along the Z axis.' from cvs server
cvs checkout: warning: unrecognized response `   -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Render a wireframe cone oriented along the Z axis. The base of the cone is' from cvs server
cvs checkout: warning: unrecognized response `-- placed at Z = 0, and the top at Z = height. The cone is subdivided around the' from cvs server
cvs checkout: warning: unrecognized response `-- Z axis into slices, and along the Z axis into stacks.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutWireCone" wireCone' from cvs server
cvs checkout: warning: unrecognized response `   :: Radius   -- ^ Radius of the base of the cone.' from cvs server
cvs checkout: warning: unrecognized response `   -> Height   -- ^ HeTOM_RIGHT_CORNER, glut_CURSOR_BOTTOM_LEFT_CORNER,' from cvs server
cvs checkout: warning: unrecognized response `   glut_CURSOR_INHERIT, glut_CURSOR_NONE, glut_CURSOR_FULL_CROSSHAIR,' from cvs server
cvs checkout: warning: unrecognized response `   glut_WINDOW_CURSOR )' from cvs server
cvs checkout: warning: unrecognized response `import Graphics.UI.GLUT.QueryUtils ( simpleGet )' from cvs server
cvs checkout: warning: unrecognized response `import Graphics.UI.GLUT.Types ( Window, makeWindow )' 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 `-- $CreatingAndDestroyingSubWindows' from cvs server
cvs checkout: warning: unrecognized response `-- Each created window has a unique associated OpenGL context. State changes to' from cvs server
cvs checkout: warning: unrecognized response `-- a window\'s associated OpenGL context can be done immediately after the' from cvs server
cvs checkout: warning: unrecognized response `-- window is created.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- The /display state/ of a window is initially for the window to be shown. But' from cvs server
cvs checkout: warning: unrecognized response `-- the window\'s /display state/ is not actually acted upon until' from cvs server
cvs checkout: warning: unrecognized response `-- 'Graphics.UI.GLUT.Begin.mainLoop' is entered. This means until' from cvs server
cvs checkout: warning: unrecognized response `-- 'Graphics.UI.GLUT.Begin.mainLoop' is called, rendering to a created window is' from cvs server
cvs checkout: warning: unrecognized response `-- ineffective because the window can not yet be displayed.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- The value returned by 'createWindow' and 'createSubWindow' is a unique' from cvs server
cvs checkout: warning: unrecognized response `-- identifier for the window, which can be used with 'currentWindow'.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Create a top-level window. The given name will be provided to the window' from cvs server
cvs checkout: warning: unrecognized response `-- system as the window\'s name. The intent is that the window system will label' from cvs server
cvs checkout: warning: unrecognized response `-- the window with the name.Implicitly, the /current window/ is set to the newly' from cvs server
cvs checkout: warning: unrecognized response `-- created window.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- /X Implementation Notes:/ The proper X Inter-Client Communication Conventions' from cvs server
cvs checkout: warning: unrecognized response `-- Manual (ICCCM) top-level properties are established. The @WM_COMMAND@' from cvs server
cvs checkout: warning: unrecognized response `-- property that lists the command line used to invoke the GLUT program is only' from cvs server
cvs checkout: warning: unrecognized response `-- established for the first window created.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `createWindow' from cvs server
cvs checkout: warning: unrecognized response `   :: String    -- ^ The window name' from cvs server
cvs checkout: warning: unrecognized response `   -> IO Window -- ^ The identifier for the newly created window' from cvs server
cvs checkout: warning: unrecognized response `createWindow name = withCString name glutCreateWindow' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutCreateWindow" glutCreateWindow ::' from cvs server
cvs checkout: warning: unrecognized response `      CString -> IO Window' 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 `-- | Create a subwindow of the identified window with the given relative' from cvs server
cvs checkout: warning: unrecognized response `-- position and size. Implicitly, the /current window/ is set to the' from cvs server
cvs checkout: warning: unrecognized response `-- newly created subwindow. Subwindows can be nested arbitrarily deep.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `createSubWindow' from cvs server
cvs checkout: warning: unrecognized response `   :: Window    -- ^ Identifier of the subwindow\'s parent window.' from cvs server
cvs checkout: warning: unrecognized response `   -> Position  -- ^ Window position in pixels relative to parent window\'s' from cvs server
cvs checkout: warning: unrecognized response `                --   origin.' from cvs server
cvs checkout: warning: unrecognized response `   -> Size      -- ^ Window size in pixels' from cvs server
cvs checkout: warning: unrecognized response `   -> IO Window -- ^ The identifier for the newly created subwindow' from cvs server
cvs checkout: warning: unrecognized response `createSubWindow win (Position x y) (Size w h) =' from cvs server
cvs checkout: warning: unrecognized response `   glutCreateSubWindow win' from cvs server
cvs checkout: warning: unrecognized response `                       (fromIntegral x) (fromIntegral y)' from cvs server
cvs checkout: warning: unrecognized response `                       (fromIntegral w) (fromIntegral h)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutCreateSubWindow" glutCreateSubWindow ::' from cvs server
cvs checkout: warning: unrecognized response `      Window -> CInt -> CInt -> CInt -> CInt -> IO Window' 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 `-- | Contains the /current window\'s/ parent. If the /current window/ is a' from cvs server
cvs checkout: warning: unrecognized response `-- top-level window, 'Nothing' is returned.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `parentWindow :: GettableStateVar (Maybe Window)' from cvs server
cvs checkout: warning: unrecognized response `parentWindow =' from cvs server
cvs checkout: warning: unrecognized response `   makeGettableStateVar $' from cvs server
cvs checkout: warning: unrecognized response `      getWindow (simpleGet makeWindow glut_WINDOW_PARENT)' 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 `-- | Contains the number of subwindows the /current window/ has, not counting' from cvs server
cvs checkout: warning: unrecognized response `-- children of children.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `numSubWindows :: GettableStateVar Int' from cvs server
cvs checkout: warning: unrecognized response `numSubWindows =' from cvs server
cvs checkout: warning: unrecognized response `   makeGettableStateVar $' from cvs server
cvs checkout: warning: unrecognized response `      simpleGet fromIntegral glut_WINDOW_NUM_CHILDREN' 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 `-- | Destroy the specified window and the window\'s associated OpenGL context,' from cvs server
cvs checkout: warning: unrecognized response `-- logical colormap (if the window is color index), and overlay and related' from cvs server
cvs checkout: warning: unrecognized response `-- state (if an overlay has been established). Any subwindows of the destroyed' from cvs server
cvs checkout: warning: unrecognized response `-- window are also destroyed by 'destroyWindow'. If the specified window was the' from cvs server
cvs checkout: warning: unrecognized response `-- /current window/, the /current window/ becomes invalid ('currentWindow' will' from cvs server
cvs checkout: warning: unrecognized response `-- contain 'Nothing').' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutDestroyWindow" destroyWindow ::' from cvs server
cvs checkout: warning: unrecognized response `   Window -> 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- | Controls the /current window/. It does /not/ affect the /layer in use/ for' from cvs server
cvs checkout: warning: unrecognized response `-- the window; this is done using 'Graphics.UI.GLUT.Overlay.layerInUse'.' from cvs server
cvs checkout: warning: unrecognized response `-- Contains 'Nothing' if no windows exist or the previously /current window/ was' from cvs server
cvs checkout: warning: unrecognized response `-- destroyed. Setting the /current window/ to 'Nothing' is a no-op.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `currentWindow :: StateVar (Maybe Window)' from cvs server
cvs checkout: warning: unrecognized response `currentWindow =' from cvs server
cvs checkout: warning: unrecognized response `   makeStateVar (getWindow glutGetWindow) (maybe (return ()) glutSetWindow)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getWindow :: IO Window -> IO (Maybe Window)' from cvs server
cvs checkout: warning: unrecognized response `getWindow act = do' from cvs server
cvs checkout: warning: unrecognized response `   win <- act' from cvs server
cvs checkout: warning: unrecognized response `   return $ if win == makeWindow 0 then Nothing else Just win' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutSetWindow" glutSetWindow :: Window -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutGetWindow" glutGetWindow :: IO Window' 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 `-- | Mark the normal plane of given window (or the /current window/, if none' from cvs server
cvs checkout: warning: unrecognized response `-- is supplied) as needing to be redisplayed. The next iteration through' from cvs server
cvs checkout: warning: unrecognized response `-- 'Graphics.UI.GLUT.Begin.mainLoop', the window\'s display callback will be' from cvs server
cvs checkout: warning: unrecognized response `-- called to redisplay the window\'s normal plane. Multiple calls to' from cvs server
cvs checkout: warning: unrecognized response `-- 'postRedisplay' before the next display callback opportunity generates only a' from cvs server
cvs checkout: warning: unrecognized response `-- single redisplay callback. 'postRedisplay' may be called within a window\'s' from cvs server
cvs checkout: warning: unrecognized response `-- display or overlay display callback to re-mark that window for redisplay.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- Logically, normal plane damage notification for a window is treated as a' from cvs server
cvs checkout: warning: unrecognized response `-- 'postRedisplay' on the damaged window. Unlike damage reported by the window' from cvs server
cvs checkout: warning: unrecognized response `-- system, 'postRedisplay' will /not/ set to true the normal plane\'s damaged' from cvs server
cvs checkout: warning: unrecognized response `-- status (see 'Graphics.UI.GLUT.State.damaged').' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- Also, see 'Graphics.UI.GLUT.Overlay.postOverlayRedisplay'.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `postRedisplay :: Maybe Window -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `postRedisplay = maybe glutPostRedisplay glutPostWindowRedisplay' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutPostRedisplay" glutPostRedisplay :: IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Mark the normal plane of the given window as needing to be redisplayed,' from cvs server
cvs checkout: warning: unrecognized response `-- otherwise the same as 'postRedisplay'.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- The advantage of this routine is that it saves the cost of using' from cvs server
cvs checkout: warning: unrecognized response `-- 'currentWindow' (entailing an expensive OpenGL context switch), which is' from cvs server
cvs checkout: warning: unrecognized response `-- particularly useful when multiple windows need redisplays posted at the same' from cvs server
cvs checkout: warning: unrecognized response `-- time. ' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutPostWindowRedisplay"' from cvs server
cvs checkout: warning: unrecognized response `   glutPostWindowRedisplay :: Window -> 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- | Perform a buffer swap on the /layer in use/ for the /current window/.' from cvs server
cvs checkout: warning: unrecognized response `-- Specifically, 'swapBuffers' promotes the contents of the back buffer of the' from cvs server
cvs checkout: warning: unrecognized response `-- /layer in use/ of the /current window/ to become the contents of the front' from cvs server
cvs checkout: warning: unrecognized response `-- buffer. The contents of the back buffer then become undefined. The update' from cvs server
cvs checkout: warning: unrecognized response `-- typically takes place during the vertical retrace of the monitor, rather than' from cvs server
cvs checkout: warning: unrecognized response `-- immediately after 'swapBuffers' is called.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- An implicit 'Graphics.Rendering.OpenGL.GL.FlushFinish.flush' is done by' from cvs server
cvs checkout: warning: unrecognized response `-- 'swapBuffers' before it returns. Subsequent OpenGL commands can be issued' from cvs server
cvs checkout: warning: unrecognized response `-- immediately after calling 'swapBuffers', but are not executed until the' from cvs server
cvs checkout: warning: unrecognized response `-- buffer exchange is completed.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- If the /layer in use/ is not double buffered, 'swapBuffers' has no effect.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutSwapBuffers" swapBuffers :: 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- $ChangingTheWindowGeometry' from cvs server
cvs checkout: warning: unrecognized response `-- Note that the requests by 'windowPosition', 'windowSize', and 'fullScreen'' from cvs server
cvs checkout: warning: unrecognized response `-- are not processed immediately. A request is executed after returning to the' from cvs server
cvs checkout: warning: unrecognized response `-- main event loop. This allows multiple requests to the same window to be' from cvs server
cvs checkout: warning: unrecognized response `-- coalesced.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- 'windowPosition' and 'windowSize' requests on a window will disable the full' from cvs server
cvs checkout: warning: unrecognized response `-- screen status of the window.' 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 `-- | Controls the position of the /current window/. For top-level windows,' from cvs server
cvs checkout: warning: unrecognized response `-- parameters of 'Position' are pixel offsets from the screen origin. For' from cvs server
cvs checkout: warning: unrecognized response `-- subwindows, the parameters are pixel offsets from the window\'s parent window' from cvs server
cvs checkout: warning: unrecognized response `-- origin.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- In the case of top-level windows, setting 'windowPosition' is considered only' from cvs server
cvs checkout: warning: unrecognized response `-- a request for positioning the window. The window system is free to apply its' from cvs server
cvs checkout: warning: unrecognized response `-- own policies to top-level window placement. The intent is that top-level' from cvs server
cvs checkout: warning: unrecognized response `-- windows should be repositioned according to the value of 'windowPosition'.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `windowPosition :: StateVar Position' from cvs server
cvs checkout: warning: unrecognized response `windowPosition = makeStateVar getWindowPosition setWindowPosition' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `setWindowPosition :: Position -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `setWindowPosition (Position x y) =' from cvs server
cvs checkout: warning: unrecognized response `   glutPositionWindow (fromIntegral x) (fromIntegral y)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutPositionWindow" glutPositionWindow ::' from cvs server
cvs checkout: warning: unrecognized response `   CInt -> CInt -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getWindowPosition :: IO Position' from cvs server
cvs checkout: warning: unrecognized response `getWindowPosition = do' from cvs server
cvs checkout: warning: unrecognized response `   x <- simpleGet fromIntegral glut_WINDOW_X' from cvs server
cvs checkout: warning: unrecognized response `   y <- simpleGet fromIntegral glut_WINDOW_Y' from cvs server
cvs checkout: warning: unrecognized response `   return $ Position x y' 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 `-- | Controls the size of the /current window/. The parameters of 'Size' are' from cvs server
cvs checkout: warning: unrecognized response `-- size extents in pixels. The width and height must be positive values.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- In the case of top-level windows, setting 'windowSize' is considered only a' from cvs server
cvs checkout: warning: unrecognized response `-- request for sizing the window. The window system is free to apply its own' from cvs server
cvs checkout: warning: unrecognized response `-- policies to top-level window sizing. The intent is that top-level windows' from cvs server
cvs checkout: warning: unrecognized response `-- should be reshaped according to the value of 'windowSize'. Whether a reshape' from cvs server
cvs checkout: warning: unrecognized response `-- actually takes effect and, if so, the reshaped dimensions are reported to the' from cvs server
cvs checkout: warning: unrecognized response `-- program by a reshape callback.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `windowSize :: StateVar Size' from cvs server
cvs checkout: warning: unrecognized response `windowSize = makeStateVar getWindowSize setWindowSize' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `setWindowSize :: Size -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `setWindowSize (Size w h) =' from cvs server
cvs checkout: warning: unrecognized response `   glutReshapeWindow (fromIntegral w) (fromIntegral h)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutReshapeWindow" glutReshapeWindow ::' from cvs server
cvs checkout: warning: unrecognized response `   CInt -> CInt -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getWindowSize :: IO Size' from cvs server
cvs checkout: warning: unrecognized response `getWindowSize = do' from cvs server
cvs checkout: warning: unrecognized response `   w <- simpleGet fromIntegral glut_WINDOW_WIDTH' from cvs server
cvs checkout: warning: unrecognized response `   h <- simpleGet fromIntegral glut_WINDOW_HEIGHT' from cvs server
cvs checkout: warning: unrecognized response `   return $ Size w 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- | Request that the /current window/ be made full screen. The exact semantics' from cvs server
cvs checkout: warning: unrecognized response `-- of what full screen means may vary by window system. The intent is to make' from cvs server
cvs checkout: warning: unrecognized response `-- the window as large as possible and disable any window decorations or borders' from cvs server
cvs checkout: warning: unrecognized response `-- added the window system. The window width and height are not guaranteed to be' from cvs server
cvs checkout: warning: unrecognized response `-- the same as the screen width and height, but that is the intent of making a' from cvs server
cvs checkout: warning: unrecognized response `-- window full screen.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- 'fullScreen' is defined to work only on top-level windows.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- /X Implementation Notes:/ In the X implementation of GLUT, full screen is' from cvs server
cvs checkout: warning: unrecognized response `-- implemented by sizing and positioning the window to cover the entire screen' from cvs server
cvs checkout: warning: unrecognized response `-- and posting the @_MOTIF_WM_HINTS@ property on the window requesting' from cvs server
cvs checkout: warning: unrecognized response `-- absolutely no decorations. Non-Motif window managers may not respond to' from cvs server
cvs checkout: warning: unrecognized response `-- @_MOTIF_WM_HINTS at .' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutFullScreen" fullScreen :: 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- $ManipulatingTheStackingOrder' from cvs server
cvs checkout: warning: unrecognized response `-- 'pushWindow' and 'popWindow' work on both top-level windows and subwindows.' from cvs server
cvs checkout: warning: unrecognized response `-- The effect of pushing and popping windows does not take place immediately.' from cvs server
cvs checkout: warning: unrecognized response `-- Instead the push or pop is saved for execution upon return to the GLUT event' from cvs server
cvs checkout: warning: unrecognized response `-- loop. Subsequent pop or push requests on a window replace the previously' from cvs server
cvs checkout: warning: unrecognized response `-- saved request for that window. The effect of pushing and popping top-level' from cvs server
cvs checkout: warning: unrecognized response `-- windows is subject to the window system\'s policy for restacking windows.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Change the stacking order of the /current window/ relative to its siblings' from cvs server
cvs checkout: warning: unrecognized response `-- (lowering it).' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutPushWindow" pushWindow :: IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Change the stacking order of the /current window/ relative to its siblings,' from cvs server
cvs checkout: warning: unrecognized response `-- bringing the /current window/ closer to the top.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutPopWindow" popWindow :: 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- | The display status of a window.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `data WindowStatus' from cvs server
cvs checkout: warning: unrecognized response `   = Shown' from cvs server
cvs checkout: warning: unrecognized response `   | Hidden' from cvs server
cvs checkout: warning: unrecognized response `   | Iconified' from cvs server
cvs checkout: warning: unrecognized response `   deriving ( Eq, Ord, Show )' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Controls the display status of the /current window/.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- Note that the effect of showing, hiding, and iconifying windows does not take' from cvs server
cvs checkout: warning: unrecognized response `-- place immediately. Instead the requests are saved for execution upon return' from cvs server
cvs checkout: warning: unrecognized response `-- to the GLUT event loop. Subsequent show, hide, or iconification requests on a' from cvs server
cvs checkout: warning: unrecognized response `-- window replace the previously saved request for that window. The effect of' from cvs server
cvs checkout: warning: unrecognized response `-- hiding, showing, or iconifying top-level windows is subject to the window' from cvs server
cvs checkout: warning: unrecognized response `-- system\'s policy for displaying windows. Subwindows can\'t be iconified.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `windowStatus :: SettableStateVar WindowStatus' from cvs server
cvs checkout: warning: unrecognized response `windowStatus = makeSettableStateVar setStatus' from cvs server
cvs checkout: warning: unrecognized response `   where setStatus Shown     = glutShowWindow' from cvs server
cvs checkout: warning: unrecognized response `         setStatus Hidden    = glutHideWindow' from cvs server
cvs checkout: warning: unrecognized response `         setStatus Iconified = glutIconifyWindow' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutShowWindow" glutShowWindow :: IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutHideWindow" glutHideWindow :: IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutIconifyWindow" glutIconifyWindow :: 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- $ChangingTheWindowIconTitle' from cvs server
cvs checkout: warning: unrecognized response `-- 'windowTitle' and 'iconTitle' should be set only when the /current' from cvs server
cvs checkout: warning: unrecognized response `-- window/ is a top-level window. Upon creation of a top-level window, the' from cvs server
cvs checkout: warning: unrecognized response `-- window and icon names are determined by the name given to 'createWindow'.' from cvs server
cvs checkout: warning: unrecognized response `-- Once created, setting 'windowTitle' and 'iconTitle' can change the window and' from cvs server
cvs checkout: warning: unrecognized response `-- icon names respectively of top-level windows. Each call requests the window' from cvs server
cvs checkout: warning: unrecognized response `-- system change the title appropriately. Requests are not buffered or' from cvs server
cvs checkout: warning: unrecognized response `-- coalesced. The policy by which the window and icon name are displayed is' from cvs server
cvs checkout: warning: unrecognized response `-- window system dependent.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Controls the window title of the /current top-level window/.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `windowTitle :: SettableStateVar String' from cvs server
cvs checkout: warning: unrecognized response `windowTitle =' from cvs server
cvs checkout: warning: unrecognized response `   makeSettableStateVar $ \name ->' from cvs server
cvs checkout: warning: unrecognized response `      withCString name glutSetWindowTitle' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutSetWindowTitle" glutSetWindowTitle ::' from cvs server
cvs checkout: warning: unrecognized response `      CString -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Controls the icon title of the /current top-level window/.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `iconTitle :: SettableStateVar String' from cvs server
cvs checkout: warning: unrecognized response `iconTitle =' from cvs server
cvs checkout: warning: unrecognized response `   makeSettableStateVar $ \name ->' from cvs server
cvs checkout: warning: unrecognized response `      withCString name glutSetIconTitle' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutSetIconTitle" glutSetIconTitle ::' from cvs server
cvs checkout: warning: unrecognized response `      CString -> 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 `' from cvs server
cvs checkout: warning: unrecognized response `-- | The different cursor images GLUT supports.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `data Cursor' from cvs server
cvs checkout: warning: unrecognized response `   = RightArrow        -- ^ Arrow pointing up and to the right.' from cvs server
cvs checkout: warning: unrecognized response `   | LeftArrow         -- ^ Arrow pointing up and to the left.' from cvs server
cvs checkout: warning: unrecognized response `   | Info              -- ^ Pointing hand.' from cvs server
cvs checkout: warning: unrecognized response `   | Destroy           -- ^ Skull & cross bones.' from cvs server
cvs checkout: warning: unrecognized response `   | Help              -- ^ Question mark.' from cvs server
cvs checkout: warning: unrecognized response `   | Cycle             -- ^ Arrows rotating in a circle.' from cvs server
cvs checkout: warning: unrecognized response `   | Spray             -- ^ Spray can.' from cvs server
cvs checkout: warning: unrecognized response `   | Wait              -- ^ Wrist watch.' from cvs server
cvs checkout: warning: unrecognized response `   | Text              -- ^ Insertion point cursor for text.' from cvs server
cvs checkout: warning: unrecognized response `   | Crosshair         -- ^ Simple cross-hair.' from cvs server
cvs checkout: warning: unrecognized response `   | UpDown            -- ^ Bi-directional pointing up & down.' from cvs server
cvs checkout: warning: unrecognized response `   | LeftRight         -- ^ Bi-directional pointing left & right.' from cvs server
cvs checkout: warning: unrecognized response `   | TopSide           -- ^ Arrow pointing to top side.' from cvs server
cvs checkout: warning: unrecognized response `   | BottomSide        -- ^ Arrow pointing to bottom side.' from cvs server
cvs checkout: warning: unrecognized response `   | LeftSide          -- ^ Arrow pointing to left side.' from cvs server
cvs checkout: warning: unrecognized response `   | RightSide         -- ^ Arrow pointing to right side.' from cvs server
cvs checkout: warning: unrecognized response `   | TopLeftCorner     -- ^ Arrow pointing to top-left corner.' from cvs server
cvs checkout: warning: unrecognized response `   | TopRightCorner    -- ^ Arrow pointing to top-right corner.' from cvs server
cvs checkout: warning: unrecognized response `   | BottomRightCorner -- ^ Arrow pointing to bottom-left corner.' from cvs server
cvs checkout: warning: unrecognized response `   | BottomLeftCorner  -- ^ Arrow pointing to bottom-right corner.' from cvs server
cvs checkout: warning: unrecognized response `   | Inherit           -- ^ Use parent\'s cursor.' from cvs server
cvs checkout: warning: unrecognized response `   | None              -- ^ Invisible cursor.' from cvs server
cvs checkout: warning: unrecognized response `   | FullCrosshair     -- ^ Full-screen cross-hair cursor (if possible, otherwise 'Crosshair').' from cvs server
cvs checkout: warning: unrecognized response `   deriving ( Eq, Ord, Show )' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `marshalCursor :: Cursor -> CInt' from cvs server
cvs checkout: warning: unrecognized response `marshalCursor x = case x of' from cvs server
cvs checkout: warning: unrecognized response `   RightArrow -> glut_CURSOR_RIGHT_ARROW' from cvs server
cvs checkout: warning: unrecognized response `   LeftArrow -> glut_CURSOR_LEFT_ARROW' from cvs server
cvs checkout: warning: unrecognized response `   Info -> glut_CURSOR_INFO' from cvs server
cvs checkout: warning: unrecognized response `   Destroy -> glut_CURSOR_DESTROY' from cvs server
cvs checkout: warning: unrecognized response `   Help -> glut_CURSOR_HELP' from cvs server
cvs checkout: warning: unrecognized response `   Cycle -> glut_CURSOR_CYCLE' from cvs server
cvs checkout: warning: unrecognized response `   Spray -> glut_CURSOR_SPRAY' from cvs server
cvs checkout: warning: unrecognized response `   Wait -> glut_CURSOR_WAIT' from cvs server
cvs checkout: warning: unrecognized response `   Text -> glut_CURSOR_TEXT' from cvs server
cvs checkout: warning: unrecognized response `   Crosshair -> glut_CURSOR_CROSSHAIR' from cvs server
cvs checkout: warning: unrecognized response `   UpDown -> glut_CURSOR_UP_DOWN' from cvs server
cvs checkout: warning: unrecognized response `   LeftRight -> glut_CURSOR_LEFT_RIGHT' from cvs server
cvs checkout: warning: unrecognized response `   TopSide -> glut_CURSOR_TOP_SIDE' from cvs server
cvs checkout: warning: unrecognized response `   BottomSide -> glut_CURSOR_BOTTOM_SIDE' from cvs server
cvs checkout: warning: unrecognized response `   LeftSide -> glut_CURSOR_LEFT_SIDE' from cvs server
cvs checkout: warning: unrecognized response `   RightSide -> glut_CURSOR_RIGHT_SIDE' from cvs server
cvs checkout: warning: unrecognized response `   TopLeftCorner -> glut_CURSOR_TOP_LEFT_CORNER' from cvs server
cvs checkout: warning: unrecognized response `   TopRightCorner -> glut_CURSOR_TOP_RIGHT_CORNER' from cvs server
cvs checkout: warning: unrecognized response `   BottomRightCorner -> glut_CURSOR_BOTTOM_RIGHT_CORNER' from cvs server
cvs checkout: warning: unrecognized response `   BottomLeftCorner -> glut_CURSOR_BOTTOM_LEFT_CORNER' from cvs server
cvs checkout: warning: unrecognized response `   Inherit -> glut_CURSOR_INHERIT' from cvs server
cvs checkout: warning: unrecognized response `   None -> glut_CURSOR_NONE' from cvs server
cvs checkout: warning: unrecognized response `   FullCrosshair -> glut_CURSOR_FULL_CROSSHAIR' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `unmarshalCursor :: CInt -> Cursor' from cvs server
cvs checkout: warning: unrecognized response `unmarshalCursor x' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_RIGHT_ARROW = RightArrow' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_LEFT_ARROW = LeftArrow' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_INFO = Info' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_DESTROY = Destroy' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_HELP = Help' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_CYCLE = Cycle' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_SPRAY = Spray' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_WAIT = Wait' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_TEXT = Text' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_CROSSHAIR = Crosshair' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_UP_DOWN = UpDown' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_LEFT_RIGHT = LeftRight' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_TOP_SIDE = TopSide' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_BOTTOM_SIDE = BottomSide' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_LEFT_SIDE = LeftSide' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_RIGHT_SIDE = RightSide' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_TOP_LEFT_CORNER = TopLeftCorner' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_TOP_RIGHT_CORNER = TopRightCorner' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_BOTTOM_RIGHT_CORNER = BottomRightCorner' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_BOTTOM_LEFT_CORNER = BottomLeftCorner' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_INHERIT = Inherit' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_NONE = None' from cvs server
cvs checkout: warning: unrecognized response `   | x == glut_CURSOR_FULL_CROSSHAIR = FullCrosshair' from cvs server
cvs checkout: warning: unrecognized response `   | otherwise = error ("unmarshalCursor: illegal value " ++ show x)' 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 `-- | Change the cursor image of the /current window/. Each call requests the' from cvs server
cvs checkout: warning: unrecognized response `-- window system change the cursor appropriately. The cursor image when a window' from cvs server
cvs checkout: warning: unrecognized response `-- is created is 'Inherit'. The exact cursor images used are implementation' from cvs server
cvs checkout: warning: unrecognized response `-- dependent. The intent is for the image to convey the meaning of the cursor' from cvs server
cvs checkout: warning: unrecognized response `-- name. For a top-level window, 'Inherit' uses the default window system' from cvs server
cvs checkout: warning: unrecognized response `-- cursor.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- /X Implementation Notes:/ GLUT for X uses SGI\'s @_SGI_CROSSHAIR_CURSOR@' from cvs server
cvs checkout: warning: unrecognized response `-- convention to access a full-screen cross-hair cursor if possible.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `cursor :: StateVar Cursor' from cvs server
cvs checkout: warning: unrecognized response `cursor = makeStateVar getCursor setCursor' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `setCursor :: Cursor -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `setCursor = glutSetCursor . marshalCursor' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutSetCursor" glutSetCursor :: CInt -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getCursor :: IO Cursor' from cvs server
cvs checkout: warning: unrecognized response `getCursor = simpleGet unmarshalCursor glut_WINDOW_CURSOR' 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 `-- | Setting 'pointerPosition' warps the window system\'s pointer to a new' from cvs server
cvs checkout: warning: unrecognized response `-- location relative to the origin of the /current window/ by the specified' from cvs server
cvs checkout: warning: unrecognized response `-- pixel offset, which may be negative. The warp is done immediately.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- If the pointer would be warped outside the screen\'s frame buffer region, the' from cvs server
cvs checkout: warning: unrecognized response `-- location will be clamped to the nearest screen edge. The window system is' from cvs server
cvs checkout: warning: unrecognized response `-- allowed to further constrain the pointer\'s location in window system' from cvs server
cvs checkout: warning: unrecognized response `-- dependent ways.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- Good advice from Xlib\'s @XWarpPointer@ man page: \"There is seldom any' from cvs server
cvs checkout: warning: unrecognized response `-- reason for calling this function. The pointer should normally be left to the' from cvs server
cvs checkout: warning: unrecognized response `-- user.\"' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `pointerPosition :: SettableStateVar Position' from cvs server
cvs checkout: warning: unrecognized response `pointerPosition =' from cvs server
cvs checkout: warning: unrecognized response `   makeSettableStateVar $ \(Position x y) ->' from cvs server
cvs checkout: warning: unrecognized response `      glutWarpPointer (fromIntegral x) (fromIntegral y)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe "glutWarpPointer" glutWarpPointer ::' from cvs server
cvs checkout: warning: unrecognized response `   CInt -> CInt -> IO ()' 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
cvs checkout: warning: unrecognized response `=rw' from cvs server
cvs checkout: warning: unrecognized response `882' from cvs server
cvs checkout: warning: unrecognized response `-- Caused a crash in GHC 6.4 when optimising, due to inlining of runST too early.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Spectral Norm benchmark' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `import Array' from cvs server
cvs checkout: warning: unrecognized response `import System(getArgs)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `main = do' from cvs server
cvs checkout: warning: unrecognized response `        --[arg] <- getArgs' from cvs server
cvs checkout: warning: unrecognized response `        --let n = (read arg) - 1 ' from cvs server
cvs checkout: warning: unrecognized response `        let n = 80' from cvs server
cvs checkout: warning: unrecognized response `        let init = listArray (0,n) (repeat 1.0)' from cvs server
cvs checkout: warning: unrecognized response `        let (v:u:rest) = drop 19 $ iterate (eval_AtA_times_u n) init' from cvs server
cvs checkout: warning: unrecognized response `        let vBv = sum [(u!i)*(v!i) |i<-[0..n]]' from cvs server
cvs checkout: warning: unrecognized response `        let vv  = sum [(v!i)*(v!i) |i<-[0..n]]' from cvs server
cvs checkout: warning: unrecognized response `        print $ sqrt (vBv/vv)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `eval_AtA_times_u n u = eval_At_times_u n v' from cvs server
cvs checkout: warning: unrecognized response `    where v = eval_A_times_u n u' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `eval_A x y = 1.0/((i+j)*(i+j+1)/2+i+1)' from cvs server
cvs checkout: warning: unrecognized response `    where i = fromIntegral x' from cvs server
cvs checkout: warning: unrecognized response `          j = fmport Control.Arrow' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `handle :: ArrowPlus a => a b c -> a (b,String) c -> a b c' from cvs server
cvs checkout: warning: unrecognized response `handle f h = proc b -> (f -< b) <+> (h -< (b,""))' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `f :: ArrowPlus a => a (Int,Int) String' from cvs server
cvs checkout: warning: unrecognized response `f = proc (x,y) ->' from cvs server
cvs checkout: warning: unrecognized response `	(|handle' from cvs server
cvs checkout: warning: unrecognized response `		(returnA -< show y)' from cvs server
cvs checkout: warning: unrecognized response `		(\s -> returnA -< s ++ show x)' from cvs server
cvs checkout: warning: unrecognized response `	|)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `g :: ArrowPlus a => a (Int,Int) String' from cvs server
cvs checkout: warning: unrecognized response `g = proc (x,y) ->' from cvs server
cvs checkout: warning: unrecognized response `	(|handle' from cvs server
cvs checkout: warning: unrecognized response `		(\msg -> returnA -< msg ++ show y)' from cvs server
cvs checkout: warning: unrecognized response `		(\s msg -> returnA -< s ++ show x)' from cvs server
cvs checkout: warning: unrecognized response `	|) ("hello " ++ show x)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `h :: ArrowPlus a => a (Int,Int) Int' from cvs server
cvs checkout: warning: unrecognized response `h = proc (x,y) ->' from cvs server
cvs checkout: warning: unrecognized response `	(' from cvs server
cvs checkout: warning: unrecognized response `		(\z -> returnA -< x + z)' from cvs server
cvs checkout: warning: unrecognized response `		<+>' from cvs server
cvs checkout: warning: unrecognized response `		(\z -> returnA -< y + z)' from cvs server
cvs checkout: warning: unrecognized response `	) (x*y)' from cvs server
cvs checkout: warning: server is not creating directories one at a time
cvs checkout: protocol error: cannot parse date 22 Feb 2006 15:26: (f :&: fs) (Succ t) = Succ (apply fs t)
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Having defined apply, we can forget about powertrees and do all our' from cvs server
cvs checkout: warning: unrecognized response `-- programming with Hom's.  Firstly, Hom is an arrow:' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `instance Arrow Hom where' from cvs server
cvs checkout: warning: unrecognized response `	arr f = f :&: arr (f *** f)' from cvs server
cvs checkout: warning: unrecognized response `	(f :&: fs) >>> (g :&: gs) = (g . f) :&: (fs >>> gs)' from cvs server
cvs checkout: warning: unrecognized response `	first (f :&: fs) =' from cvs server
cvs checkout: warning: unrecognized response `		first f :&: (arr transpose >>> first fs >>> arr transpose)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `transpose :: ((a,b), (c,d)) -> ((a,c), (b,d))' from cvs server
cvs checkout: warning: unrecognized response `transpose ((a,b), (c,d)) = ((a,c), (b,d))' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- arr maps f over the leaves of a powertree.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- The composition >>> composes sequences of functions pairwise.' from cvs server
cvs checkout: warning: unrecognized response `--  ' from cvs server
cvs checkout: warning: unrecognized response `-- The *** operator unriffles a powertree of pairs into a pair of powertrees,' from cvs server
cvs checkout: warning: unrecognized response `-- applies the appropriate function to each and riffles the results.' from cvs server
cvs checkout: warning: unrecognized response `-- It defines a categorical product for this arrow category.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- When describing algorithms, one often provides a pure function for the' from cvs server
cvs checkout: warning: unrecognized response `-- base case (trees of one element) and a (usually recursive) expression' from cvs server
cvs checkout: warning: unrecognized response `-- for trees of pairs.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- For example, a common divide-and-conquer pattern is the butterfly, where' from cvs server
cvs checkout: warning: unrecognized response `-- one recursive call processes the odd-numbered elements and the other' from cvs server
cvs checkout: warning: unrecognized response `-- processes the even ones (cf Geraint Jones and Mary Sheeran's Ruby papers):' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `butterfly :: (Pair a -> Pair a) -> Hom a a' from cvs server
cvs checkout: warning: unrecognized response `butterfly f = id :&: proc (x, y) -> do' from cvs server
cvs checkout: warning: unrecognized response `		x' <- butterfly f -< x' from cvs server
cvs checkout: warning: unrecognized response `		y' <- butterfly f -< y' from cvs server
cvs checkout: warning: unrecognized response `		returnA -< f (x', y')' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- The recursive calls operate on halves of the original tree, so the' from cvs server
cvs checkout: warning: unrecognized response `-- recursion is well-defined.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Some examples of butterflies:' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `rev :: Hom a a' from cvs server
cvs checkout: warning: unrecognized response `rev = butterfly swap' from cvs server
cvs checkout: warning: unrecognized response `	where	swap (x, y) = (y, x)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `unriffle :: Hom (Pair a) (Pair a)' from cvs server
cvs checkout: warning: unrecognized response `unriffle = butterfly transpose' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Batcher's sorter for bitonic sequences:' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `bisort :: Ord a => Hom a a' from cvs server
cvs checkout: warning: unrecognized response `bisort = butterfly cmp' from cvs server
cvs checkout: warning: unrecognized response `	where	cmp (x, y) = (min x y, max x y)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- This can be used (with rev) as the merge phase of a merge sort.' from cvs server
cvs checkout: warning: unrecognized response `--  ' from cvs server
cvs checkout: warning: unrecognized response `sort :: Ord a => Hom a a' from cvs server
cvs checkout: warning: unrecognized response `sort = id :&: proc (x, y) -> do' from cvs server
cvs checkout: warning: unrecognized response `		x' <- sort -< x' from cvs server
cvs checkout: warning: unrecognized response `		y' <- sort -< y' from cvs server
cvs checkout: warning: unrecognized response `		yr <- rev -< y'' from cvs server
cvs checkout: warning: unrecognized response `		p <- unriffle -< (x', yr)' from cvs server
cvs checkout: warning: unrecognized response `		bisort2 -< p' from cvs server
cvs checkout: warning: unrecognized response `	where _ :&: bisort2 = bisort' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Here is the scan operation, using the algorithm of Ladner and Fischer:' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `scan :: (a -> a -> a) -> a -> Hom a a' from cvs server
cvs checkout: warning: unrecognized response `scan op b = id :&: proc (x, y) -> do' from cvs server
cvs checkout: warning: unrecognized response `		y' <- scan op b -< op x y' from cvs server
cvs checkout: warning: unrecognized response `		l <- rsh b -< y'' from cvs server
cvs checkout: warning: unrecognized response `		returnA -< (op l x, y')' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- The auxiliary function rsh b shifts each element in the tree one place to' from cvs server
cvs checkout: warning: unrecognized response `-- the right, placing b in the now-vacant leftmost position, and discarding' from cvs server
cvs checkout: warning: unrecognized response `-- the old rightmost element:' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `rsh :: a -> Hom a a' from cvs server
cvs checkout: warning: unrecognized response `rsh b = const b :&: proc (x, y) -> do' from cvs server
cvs checkout: warning: unrecognized response `		w <- rsh b -< y' from cvs server
cvs checkout: warning: unrecognized response `		returnA -< (w, x)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Finally, here is the Fast Fourier Transform:' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `type C = Complex Double' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `fft :: Hom C C' from cvs server
cvs checkout: warning: unrecognized response `fft = id :&: proc (x, y) -> do' from cvs server
cvs checkout: warning: unrecognized response `		x' <- fft -< x' from cvs server
cvs checkout: warning: unrecognized response `		y' <- fft -< y' from cvs server
cvs checkout: warning: unrecognized response `		r <- roots (-1) -< ()' from cvs server
cvs checkout: warning: unrecognized response `		let z = r*y'' from cvs server
cvs checkout: warning: unrecognized response `		unriffle -< (x' + z, x' - z)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- The auxiliary function roots r (where r is typically a root of unity)' from cvs server
cvs checkout: warning: unrecognized response `-- populates a tree of size n (necessarily a power of 2) with the values' from cvs server
cvs checkout: warning: unrecognized response `-- 1, w, w^2, ..., w^(n-1), where w^n = r.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `roots :: C -> Ho<- expr -< ()' from cvs server
cvs checkout: warning: unrecognized response `		(|(symbol RPar)|)' from cvs server
cvs checkout: warning: unrecognized response `		returnA -< v' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Lexical analysis' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `lexer :: String -> [ExprSym]' from cvs server
cvs checkout: warning: unrecognized response `lexer [] = []' from cvs server
cvs checkout: warning: unrecognized response `lexer ('(':cs) = Sym LPar "(":lexer cs' from cvs server
cvs checkout: warning: unrecognized response `lexer (')':cs) = Sym RPar ")":lexer cs' from cvs server
cvs checkout: warning: unrecognized response `lexer ('+':cs) = Sym Plus "+":lexer cs' from cvs server
cvs checkout: warning: unrecognized response `lexer ('-':cs) = Sym Minus "-":lexer cs' from cvs server
cvs checkout: warning: unrecognized response `lexer ('*':cs) = Sym Mult "*":lexer cs' from cvs server
cvs checkout: warning: unrecognized response `lexer ('/':cs) = Sym Div "/":lexer cs' from cvs server
cvs checkout: warning: unrecognized response `lexer (c:cs)' from cvs server
cvs checkout: warning: unrecognized response `	| isSpace c = lexer cs' from cvs server
cvs checkout: warning: unrecognized response `	| isDigit c = Sym Number (c:w):lexer cs'' from cvs server
cvs checkout: warning: unrecognized response `	| otherwise = Sym Unknown [c]:lexer cs' from cvs server
cvs checkout: warning: unrecognized response `		where (w,cs') = span isDigit cs' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `parse = runBTParser expr . lexer' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `main = do' from cvs server
cvs checkout: warning: unrecognized response `	print (parse "1+2*(3+4)")' from cvs server
cvs checkout: warning: unrecognized response `	print (parse "3*5-17/3+4")' from cvs server
cvs checkout: warning: unrecognized response `ther-Modules: A, MainA' from cvs server
cvs checkout: warning: unrecognized response `Main-is: MainA.hs' from cvs server
cvs checkout: warning: unrecognized response `Extensions: OverlappingInstances' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `Executable: testB' from cvs server
cvs checkout: warning: unrecognized response `Other-Modules: B.A, B.MainB' from cvs server
cvs checkout: warning: unrecognized response `Main-is: B/MainB.hs' from cvs server
cvs [checkout aborted]: bad entries line `	x7 <- returnA -< C7' from server
Problem checking out testsuite
ok. (GHC Version 6.4.3.20061005)
**** Building stage 1 compiler                    ... failed; relevant barfage is below.
**** building source distribution                 ... ok.
No successfully built compilers to test; aborting.

------------------------------------------------------------------------
------------------------------------------------------------------------
The last 30 lines of /playpen/ghc/nightly/STABLE-cam-02-unx/logs/i386-unknown-linux-stage1 are
------------------------------------------------------------------------
------------------------------------------------------------------------

sed -e 's/""//g' -e 's/:[ 	]*,/: /g' >package.conf.inplace
gcc -E  -undef -traditional -P -DINSTALLING \
-DIMPORT_DIR='"$libdir/imports"' \
-DLIB_DIR='"$libdir"' \
-DINCLUDE_DIR='"$libdir/include"' \
-DDATA_DIR='"$datadir"' \
-DHTML_DIR='"$datadir/html/libraries/GLUT"' \
-DHADDOCK_IFACE='"$datadir/html/libraries/GLUT/GLUT.haddock"' \
 -x c -DMAINTAINER=sven.panne at aedion.de -I../../ghc/includes -Iinclude -DPACKAGE=GLUT -DVERSION=2.0 -DPKG_LIBDIR='"$libdir"' -DPKG_DATADIR='"$datadir"' package.conf.in | \
grep -v '^#pragma GCC' | \
sed -e 's/""//g' -e 's/:[ 	]*,/: /g' >package.conf.installed
../../ghc/utils/ghc-pkg/ghc-pkg-inplace --force --update-package <package.conf.inplace
Reading package info from stdin ... done.
cannot find libHSGLUT.a on library path (ignoring)
Saving old package config file... done.
Writing new package config file... done.
../../ghc/utils/ghc-pkg/ghc-pkg-inplace  -f ../../ghc/driver/package.conf --force --update-package <package.conf.installed
Reading package info from stdin ... done.
$libdir/imports doesn't exist or isn't a directory (ignoring)
$libdir doesn't exist or isn't a directory (ignoring)
$libdir/include doesn't exist or isn't a directory (ignoring)
cannot find libHSGLUT.a on library path (ignoring)
Saving old package config file... done.
Writing new package config file... done.
../../ghc/compiler/ghc-inplace -M -optdep-f -optdep.depend -optdep-s -optdepp -osuf o    -H16m -O -Wall -fffi -Iinclude '-#include "HsGLUT.h"' -cpp -DCALLCONV=ccall -ignore-package GLUT -H32m -O2 -fvia-C -optc-O2 -dcore-lint -package base -package OpenGL -fgenerics Graphics/UI/GLUT.hs Graphics/UI/GLUT/Begin.hs Graphics/UI/GLUT/Callbacks.hs Graphics/UI/GLUT/Callbacks/Global.hs Graphics/UI/GLUT/Callbacks/Registration.hs Graphics/UI/GLUT/Callbacks/Window.hs Graphics/UI/GLUT/Colormap.hs Graphics/UI/GLUT/Constants.hs Graphics/UI/GLUT/Debugging.hs Graphics/UI/GLUT/DeviceControl.hs Graphics/UI/GLUT/Extensions.hs Graphics/UI/GLUT/Fonts.hs Graphics/UI/GLUT/GameMode.hs Graphics/UI/GLUT/Initialization.hs Graphics/UI/GLUT/Menu.hs Graphics/UI/GLUT/Objects.hs Graphics/UI/GLUT/QueryUtils.hs Graphics/UI/GLUT/State.hs Graphics/UI/GLUT/Types.hs

Graphics/UI/GLUT/State.hs:80:0:
    parse error (possibly incorrect indentation)
gmake[1]: *** [depend] Error 1
gmake: *** [boot] Error 1

Nightly run ended at Thu Oct 5 20:05:27 BST 2006