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 Wed Mar 15 19:30:00 GMT 2006.
**** checking out new source tree                 ... tar: Cowardly refusing to 
create an empty archive
Try `tar --help' for more information.
cvs checkout: warning: cannot open /cvs/CVSROOT/val-tags read/write: Read-only 
file system
cvs checkout: warning: cannot open /cvs/CVSROOT/val-tags read/write: Read-only 
file system
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `   SettableStateVar, 
makeSettableStateVar,' from cvs server
cvs checkout: warning: unrecognized response `   StateVar, makeStateVar )' from 
cvs server
cvs checkout: warning: unrecognized response `import Graphics.UI.GLUT.Constants 
(' from cvs server
cvs checkout: warning: unrecognized response `   glut_INIT_WINDOW_X, 
glut_INIT_WINDOW_Y,' from cvs server
cvs checkout: warning: unrecognized response `   glut_INIT_WINDOW_WIDTH, 
glut_INIT_WINDOW_HEIGHT,' from cvs server
cvs checkout: warning: unrecognized response `   glut_RGBA, glut_RGB, 
glut_INDEX, glut_SINGLE, glut_DOUBLE, glut_ACCUM,' from cvs server
cvs checkout: warning: unrecognized response `   glut_ALPHA, glut_DEPTH, 
glut_STENCIL, glut_MULTISAMPLE, glut_STEREO,' from cvs server
cvs checkout: warning: unrecognized response `   glut_LUMINANCE,' from cvs 
server
cvs checkout: warning: unrecognized response `   glut_INIT_DISPLAY_MODE,' from 
cvs server
cvs checkout: warning: unrecognized response `   glut_DISPLAY_MODE_POSSIBLE,' 
from cvs server
cvs checkout: warning: unrecognized response `   glut_RENDERING_CONTEXT, 
glut_CREATE_NEW_CONTEXT, glut_USE_CURRENT_CONTEXT,' from cvs server
cvs checkout: warning: unrecognized response `   glut_DIRECT_RENDERING,' from 
cvs server
cvs checkout: warning: unrecognized response `   glut_FORCE_INDIRECT_CONTEXT, 
glut_ALLOW_DIRECT_CONTEXT,' from cvs server
cvs checkout: warning: unrecognized response `   glut_TRY_DIRECT_CONTEXT, 
glut_FORCE_DIRECT_CONTEXT )' from cvs server
cvs checkout: warning: unrecognized response `import 
Graphics.UI.GLUT.QueryUtils ( simpleGet, glutSetOption )' from cvs server
cvs checkout: warning: unrecognized response `import Graphics.UI.GLUT.Types ( 
Relation(..), relationToString )' 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 `-- | Given the program name and 
command line arguments, initialize the GLUT' from cvs server
cvs checkout: warning: unrecognized response `-- library and negotiate a 
session with the window system. During this' from cvs server
cvs checkout: warning: unrecognized response `-- process, 'initialize' may 
cause the termination of the GLUT program with an' from cvs server
cvs checkout: warning: unrecognized response `-- error message to the user if 
GLUT cannot be properly initialized.' from cvs server
cvs checkout: warning: unrecognized response `-- Examples of this situation 
include the failure to connect to the window' from cvs server
cvs checkout: warning: unrecognized response `-- system, the lack of window 
system support for OpenGL, and invalid command' from cvs server
cvs checkout: warning: unrecognized response `-- line options.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- 'initialize' also processes 
command line options, but the specific options' from cvs server
cvs checkout: warning: unrecognized response `-- parsed are window system 
dependent. Any command line arguments which are' from cvs server
cvs checkout: warning: unrecognized response `-- not GLUT-specific are 
returned.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- /X Implementation Notes:/ The 
X Window System specific options parsed by' from cvs server
cvs checkout: warning: unrecognized response `-- 'initialize' are as follows:' 
from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- * @-display /DISPLAY/@: 
Specify the X server to connect to. If not specified,' from cvs server
cvs checkout: warning: unrecognized response `--   the value of the @DISPLAY@ 
environment variable is used.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- * @-geometry /WxH+X+Y/@: 
Determines where windows should be created on the' from cvs server
cvs checkout: warning: unrecognized response `--   screen. The parameter 
following @-geometry@ should be formatted as a' from cvs server
cvs checkout: warning: unrecognized response `--   standard X geometry 
specification. The effect of using this option is to' from cvs server
cvs checkout: warning: unrecognized response `--   change the GLUT initial size 
and initial position the same as if' from cvs server
cvs checkout: warning: unrecognized response `--   'initialWindowSize' or 
'initialWindowPosition' were modified directly.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- * @-iconic@: Requests all 
top-level windows be created in an iconic state.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- * @-indirect@: Force the use 
of indirect OpenGL rendering contexts.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- * @-direct@: Force the use of 
direct OpenGL rendering contexts (not all GLX' from cvs server
cvs checkout: warning: unrecognized response `--   implementations support 
direct rendering contexts). A fatal error is' from cvs server
cvs checkout: warning: unrecognized response `--   generated if direct 
rendering is not supported by the OpenGL' from cvs server
cvs checkout: warning: unrecognized response `--   implementation. If neither 
@-indirect@ or @-direct@ are used to force a' from cvs server
cvs checkout: warning: unrecognized response `--   particular behavior, GLUT 
will attempt to use direct rendering if' from cvs server
cvs checkout: warning: unrecognized response `--   possible and otherwise 
fallback to indirect rendering.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- * @-gldebug@: After processing 
callbacks and\/or events, call' from cvs server
cvs checkout: warning: unrecognized response `--   
'Graphics.UI.GLUT.Debugging.reportErrors' to check if there are any pending' 
from cvs server
cvs checkout: warning: unrecognized response `--   OpenGL errors. Using this 
option is helpful in detecting OpenGL run-time' from cvs server
cvs checkout: warning: unrecognized response `--   errors.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- * @-sync@: Enable synchronous 
X protocol transactions. This option makes' from cvs server
cvs checkout: warning: unrecognized response `--   it easier to track down 
potential X protocol errors.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `initialize :: String      -- ^ 
The program name.' from cvs server
cvs checkout: warning: unrecognized response `           -> [String]    -- ^ 
The command line arguments' from cvs server
cvs checkout: warning: unrecognized response `           -> IO [ttableStateVar 
$ do' from cvs server
cvs checkout: warning: unrecognized response `   possible <- getBool 
glut_GAME_MODE_POSSIBLE' from cvs server
cvs checkout: warning: unrecognized response `   if possible' from cvs server
cvs checkout: warning: unrecognized response `      then do' from cvs server
cvs checkout: warning: unrecognized response `         w <- glutGameModeGet 
glut_GAME_MODE_WIDTH' from cvs server
cvs checkout: warning: unrecognized response `         h <- glutGameModeGet 
glut_GAME_MODE_HEIGHT' from cvs server
cvs checkout: warning: unrecognized response `         let size = Size 
(fromIntegral w) (fromIntegral h)' from cvs server
cvs checkout: warning: unrecognized response `         b <- glutGameModeGet 
glut_GAME_MODE_PIXEL_DEPTH' from cvs server
cvs checkout: warning: unrecognized response `         r <- glutGameModeGet 
glut_GAME_MODE_REFRESH_RATE' from cvs server
cvs checkout: warning: unrecognized response `         return $ Just $ 
GameModeInfo size (fromIntegral b) (fromIntegral r)' from cvs server
cvs checkout: warning: unrecognized response `      else return Nothing' from 
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getBool :: GLenum -> IO Bool' 
from cvs server
cvs checkout: warning: unrecognized response `getBool = liftM (/= 0) . 
glutGameModeGet' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutGameModeGet" glutGameModeGet ::' from cvs server
cvs checkout: warning: unrecognized response `   GLenum -> IO CInt' 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' when the 
/game mode/ is active, 'False' otherwise.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `gameModeActive :: 
GettableStateVar Bool' from cvs server
cvs checkout: warning: unrecognized response `gameModeActive = 
makeGettableStateVar $ getBool glut_GAME_MODE_ACTIVE' from cvs server
cvs checkout: warning: unrecognized response `! (fromIntegral i))' from cvs 
server
cvs checkout: warning: unrecognized response `   menuID <- glutCreateMenu cb' 
from cvs server
cvs checkout: warning: unrecognized response `   destructors <- zipWithM 
addMenuItem items [1..]' from cvs server
cvs checkout: warning: unrecognized response `   let destructor = do sequence_ 
destructors' from cvs server
cvs checkout: warning: unrecognized response `                       
glutDestroyMenu menuID' from cvs server
cvs checkout: warning: unrecognized response `                       
freeHaskellFunPtr cb' from cvs server
cvs checkout: warning: unrecognized response `   return (menuID, destructor)' 
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `makeCallback :: MenuItem -> 
MenuCallback' from cvs server
cvs checkout: warning: unrecognized response `makeCallback (MenuEntry _ cb) = 
cb' from cvs server
cvs checkout: warning: unrecognized response `makeCallback _ = error "shouldn't 
receive a callback for submenus"' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `addMenuItem :: MenuItem -> Value 
-> IO Destructor' from cvs server
cvs checkout: warning: unrecognized response `addMenuItem (MenuEntry s _) v = 
do' from cvs server
cvs checkout: warning: unrecognized response `   addMenuEntry s v' from cvs 
server
cvs checkout: warning: unrecognized response `   return $ glutRemoveMenuItem 1' 
from cvs server
cvs checkout: warning: unrecognized response `addMenuItem (SubMenu s m) _ = do' 
from cvs server
cvs checkout: warning: unrecognized response `   (menuID, destructor) <- 
saveExcursion (traverseMenu m)' from cvs server
cvs checkout: warning: unrecognized response `   addSubMenu s menuID' from cvs 
server
cvs checkout: warning: unrecognized response `   return $ do glutRemoveMenuItem 
1' from cvs server
cvs checkout: warning: unrecognized response `               destructor' from 
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- Perform an action, 
saving/restoring the current menu around it' from cvs server
cvs checkout: warning: unrecognized response `saveExcursion :: IO a -> IO a' 
from cvs server
cvs checkout: warning: unrecognized response `saveExcursion act = do' from cvs 
server
cvs checkout: warning: unrecognized response `   menuID <- get currentMenu' 
from cvs server
cvs checkout: warning: unrecognized response `   returnValue <- act' from cvs 
server
cvs checkout: warning: unrecognized response `   when (isRealMenu menuID) $' 
from cvs server
cvs checkout: warning: unrecognized response `      currentMenu $= menuID' from 
cvs server
cvs checkout: warning: unrecognized response `   return returnValue' from cvs 
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response 
`--------------------------------------------------------------------------------'
 from cvs server
cvs checkout: warning: unrecognized response `-- This seems to be a common 
Haskell hack nowadays: A plain old global variable' from cvs server
cvs checkout: warning: unrecognized response `-- with an associated mutator. 
Perhaps some language/library support is needed?' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `{-# NOINLINE theMenuTable #-}' 
from cvs server
cvs checkout: warning: unrecognized response `theMenuTable :: IORef MenuTable' 
from cvs server
cvs checkout: warning: unrecognized response `theMenuTable = unsafePerformIO 
(newIORef emptyMenuTable)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `getMenuTable :: IO MenuTable' 
from cvs server
cvs checkout: warning: unrecognized response `getMenuTable = readIORef 
theMenuTable' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `modifyMenuTable :: (MenuTable -> 
MenuTable) -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `modifyMenuTable = modifyIORef 
theMenuTable' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response 
`--------------------------------------------------------------------------------'
 from cvs server
cvs checkout: warning: unrecognized response `-- To facilitate cleanup, we have 
to keep track how to destroy menus which are' from cvs server
cvs checkout: warning: unrecognized response `-- currently attached in a window 
to a mouse button.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `data MenuHook = MenuHook Window 
MouseButton' from cvs server
cvs checkout: warning: unrecognized response `   deriving ( Eq, Ord )' from cvs 
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `type Destructor = IO ()' from cvs 
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `type MenuTable = Map MenuHook 
Destructor' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `emptyMenuTable :: MenuTable' from 
cvs server
cvs checkout: warning: unrecognized response `emptyMenuTable = Map.empty' from 
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `lookupInMenuTable :: MenuHook -> 
IO (Maybe Destructor)' from cvs server
cvs checkout: warning: unrecognized response `lookupInMenuTable callbackID =' 
from cvs server
cvs checkout: warning: unrecognized response `   liftM (Map.lookup callbackID) 
getMenuTable' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `deleteFromMenuTable :: MenuHook 
-> IO ()' from cvs server
cvs checkout: warning: unrecognized response `deleteFromMenuTable callbackID =' 
from cvs server
cvs checkout: warning: unrecognized response `   modifyMenuTable (Map.delete 
callbackID)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `addToMenuTable :: MenuHook -> 
Destructor -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `addToMenuTable callbackID funPtr 
=' from cvs server
cvs checkout: warning: unrecognized response `   modifyMenuTable (Map.insert 
callbackID funPtr)' 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 `type MenuID = CInt' from cvs 
server
cvs checkout: warning: unrecognized response `type Value  = CInt' from cvs 
server
cvs checkout: warning: unrecognized response `type Item   = CInt' 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 type of a menu callback 
action that is called when a menu entry from a' from cvs server
cvs checkout: warning: unrecognized response `-- menu is selected. The value 
passed to the callback is determined by the value' from cvs server
cvs checkout: warning: unrecognized response `-- for the selected menu entry.' 
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `type MenuCB = CInt -> IO ()' from 
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Create a new pop-up menu and 
return a unique identifier for it, which can' from cvs server
cvs checkout: warning: unrecognized response `-- be used when setting 
'currentMenu'. Implicitly, the /current menu/ is set to' from cvs server
cvs checkout: warning: unrecognized response `-- the newly created menu.' from 
cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- When the menu callback is 
called because a menu entry is selected for the' from cvs server
cvs checkout: warning: unrecognized response `-- menu, the /current menu/ will 
be implicitly set to the menu with the selected' from cvs server
cvs checkout: warning: unrecognized response `-- entry before the callback is 
made.' from cvs server
cvs checkout: warning: unrecognized response `--' from cvs server
cvs checkout: warning: unrecognized response `-- /X Implementation Notes:/ If 
available, GLUT for X will take advantage of' from cvs server
cvs checkout: warning: unrecognized response `-- overlay planes for 
implementing pop-up menus. The use of overlay planes can' from cvs server
cvs checkout: warning: unrecognized response `-- eliminate display callbacks 
when pop-up menus are deactivated. The' from cvs server
cvs checkout: warning: unrecognized response `-- @SERVER_OVERLAY_VISUALS@ 
convention is used to determine if overlay visuals' from cvs server
cvs checkout: warning: unrecognized response `-- are available.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutCreateMenu" glutCreateMenu ::' from cvs server
cvs checkout: warning: unrecognized response `   FunPtr MenuCB -> IO MenuID' 
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import ccall "wrapper" 
makeMenuFunc :: MenuCB -> IO (FunPtr MenuCB)' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Destroy the specified menu. 
If it was the /current menu/, the /current' from cvs server
cvs checkout: warning: unrecognized response `-- menu/ becomes invalid and 
'currentMenu' will contain 'Nothing'.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutDestroyMenu" glutDestroyMenu ::' from cvs server
cvs checkout: warning: unrecognized response `   MenuID -> 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 menu./ 
If no menus exist or the previous /current' from cvs server
cvs checkout: warning: unrecognized response `-- menu/ was destroyed, a pseudo 
menu is returned, see 'isRealMenu'.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `currentMenu :: StateVar MenuID' 
from cvs server
cvs checkout: warning: unrecognized response `currentMenu = makeStateVar 
glutGetMenu glutSetMenu' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutSetMenu" glutSetMenu :: MenuID -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutGetMenu" glutGetMenu :: IO MenuID' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Returns 'True' if the given 
menu identifier refers to a real menu, not' from cvs server
cvs checkout: warning: unrecognized response `-- a pseudo one.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `isRealMenu :: MenuID -> Bool' 
from cvs server
cvs checkout: warning: unrecognized response `isRealMenu = (/= 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 `-- | Add a menu entry to the 
bottom of the /current menu./ The given string will' from cvs server
cvs checkout: warning: unrecognized response `-- be displayed for the newly 
added menu entry. If the menu entry is selected by' from cvs server
cvs checkout: warning: unrecognized response `-- the user, the menu\'s callback 
will be called passing the given value as the' from cvs server
cvs checkout: warning: unrecognized response `-- callback\'s parameter.' from 
cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `addMenuEntry :: String -> Value 
-> IO ()' from cvs server
cvs checkout: warning: unrecognized response `addMenuEntry name value = 
withCString name $ \n -> glutAddMenuEntry n value' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutAddMenuEntry" glutAddMenuEntry ::' from cvs server
cvs checkout: warning: unrecognized response `   CString -> Value -> IO ()' 
from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Add a sub-menu trigger to 
the bottom of the /current menu./ The given' from cvs server
cvs checkout: warning: unrecognized response `-- string will be displayed for 
the newly added sub-menu trigger. If the' from cvs server
cvs checkout: warning: unrecognized response `-- sub-menu trigger is entered, 
the sub-menu specified by the given menu' from cvs server
cvs checkout: warning: unrecognized response `-- identifier will be cascaded, 
allowing sub-menu menu items to be selected.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `addSubMenu :: String -> MenuID -> 
IO ()' from cvs server
cvs checkout: warning: unrecognized response `addSubMenu name menuID = 
withCString name $ \n -> glutAddSubMenu n menuID' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutAddSubMenu" glutAddSubMenu ::' from cvs server
cvs checkout: warning: unrecognized response `   CString -> MenuID -> 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 `{- UNUSED' from cvs server
cvs checkout: warning: unrecognized response `-- | Change the specified menu 
entry in the /current menu/ into a menu entry.' from cvs server
cvs checkout: warning: unrecognized response `-- The given position determines 
which menu item should be changed and must be' from cvs server
cvs checkout: warning: unrecognized response `-- between 1 (the topmost menu 
item) and' from cvs server
cvs checkout: warning: unrecognized response `-- 
'Graphics.UI.GLUT.State.getNumMenuItems' inclusive. The menu item to change' 
from cvs server
cvs checkout: warning: unrecognized response `-- does not have to be a menu 
entry already. The given string will be displayed' from cvs server
cvs checkout: warning: unrecognized response `-- for the newly changed menu 
entry. The given value will be returned to the' from cvs server
cvs checkout: warning: unrecognized response `-- menu\'s callback if this menu 
entry is selected.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutChangeToMenuEntry" glutChangeToMenuEntry ::' from cvs server
cvs checkout: warning: unrecognized response `   Item -> CString -> Value -> IO 
()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Change the specified menu 
item in the /current menu/ into a sub-menu' from cvs server
cvs checkout: warning: unrecognized response `-- trigger. The  given position 
determines which menu item should be changed and' from cvs server
cvs checkout: warning: unrecognized response `-- must be between 1 and 
'Graphics.UI.GLUT.State.getNumMenuItems' inclusive. The' from cvs server
cvs checkout: warning: unrecognized response `-- menu item to change does not 
have to be a sub-menu trigger already. The' from cvs server
cvs checkout: warning: unrecognized response `-- given name will be displayed 
for the newly changed sub-menu trigger. The' from cvs server
cvs checkout: warning: unrecognized response `-- given menu identifier names 
the sub-menu to cascade from the newly added' from cvs server
cvs checkout: warning: unrecognized response `-- sub-menu trigger.' from cvs 
server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutChangeToSubMenu" glutChangeToSubMenu ::' from cvs server
cvs checkout: warning: unrecognized response `   Item -> CString -> MenuID -> 
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 `' from cvs server
cvs checkout: warning: unrecognized response `-- | Remove the menu item at the 
given position, regardless of whether it is a' from cvs server
cvs checkout: warning: unrecognized response `-- menu entry or sub-menu 
trigger. The position must be between 1 (the topmost' from cvs server
cvs checkout: warning: unrecognized response `-- menu item) and 
'Graphics.UI.GLUT.State.getNumMenuItems' inclusive. Menu items' from cvs server
cvs checkout: warning: unrecognized response `-- below the removed menu item 
are renumbered.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutRemoveMenuItem" glutRemoveMenuItem ::' from cvs server
cvs checkout: warning: unrecognized response `   Item -> 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 `-- | Attach a mouse button for 
the /current window/ to the identifier of the' from cvs server
cvs checkout: warning: unrecognized response `-- /current menu./ By attaching a 
menu identifier to a button, the named menu' from cvs server
cvs checkout: warning: unrecognized response `-- will be popped up when the 
user presses the specified button. Note that the' from cvs server
cvs checkout: warning: unrecognized response `-- menu is attached to the button 
by identifier, not by reference.' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `attachMenu_ :: MouseButton -> IO 
()' from cvs server
cvs checkout: warning: unrecognized response `attachMenu_ = glutAttachMenu . 
marshalMouseButton' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutAttachMenu" glutAttachMenu :: CInt -> IO ()' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `-- | Detach an attached mouse 
button from the /current window./' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `detachMenu_ :: MouseButton -> IO 
()' from cvs server
cvs checkout: warning: unrecognized response `detachMenu_ = glutDetachMenu . 
marshalMouseButton' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `foreign import CALLCONV unsafe 
"glutDetachMenu" glutDetachMenu :: CInt -> 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 `-- | Contains the number of menu 
items in the /current menu./' from cvs server
cvs checkout: warning: unrecognized response `' from cvs server
cvs checkout: warning: unrecognized response `numMenuItems :: GettableStateVar 
Int' from cvs server
cvs checkout: warning: unrecognized response `numMenuItems = 
makeGettableStateVar $ simpleGet fromIntegral glut_MENU_NUM_ITEMS' 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 aborted]: bad entries line `bisort :: Ord a => Hom a a' from 
server
Problem checking out testsuite
ok. (GHC Version 6.4.2.20060315)
**** 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 [EMAIL PROTECTED] -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/Objects.hs 
Graphics/UI/GLUT/Overlay.hs Graphics/UI/GLUT/QueryUtils.hs 
Graphics/UI/GLUT/State.hs Graphics/UI/GLUT/Types.hs Graphics/UI/GLUT/Window.hs

Graphics/UI/GLUT/Initialization.hs:38:11:
    parse error on input `prog'
gmake[1]: *** [depend] Error 1
gmake: *** [boot] Error 1

Nightly run ended at Wed Mar 15 20:05:04 GMT 2006
_______________________________________________
Cvs-ghc mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to