From: simonmar Date: Wed, 15 May 2002 12:16:11 +0000 (+0000) Subject: [project @ 2002-05-15 12:16:11 by simonmar] X-Git-Tag: nhc98-1-18-release~1016 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=5ecc33683bd97852f8f4e8440b53ec02d971c1d2;p=haskell-directory.git [project @ 2002-05-15 12:16:11 by simonmar] Fix non-Haddockish comments --- diff --git a/Numeric.hs b/Numeric.hs index 2fb214d..55102a2 100644 --- a/Numeric.hs +++ b/Numeric.hs @@ -62,11 +62,8 @@ import Array #endif --- ********************************************************* --- * * --- \subsection{Reading} --- * * --- ********************************************************* +-- ----------------------------------------------------------------------------- +-- Reading readInt :: Num a => a -> (Char -> Bool) -> (Char -> Int) -> ReadS a readInt base isDigit valDigit = readP_to_S (L.readIntP base isDigit valDigit) @@ -102,13 +99,8 @@ readSigned readPos = readParen False read' return (n,s) --- ********************************************************* --- * * --- \subsection{Showing} --- * * --- ********************************************************* - - +-- ----------------------------------------------------------------------------- +-- Showing #ifdef __GLASGOW_HASKELL__ showInt :: Integral a => a -> ShowS