From 5ecc33683bd97852f8f4e8440b53ec02d971c1d2 Mon Sep 17 00:00:00 2001 From: simonmar Date: Wed, 15 May 2002 12:16:11 +0000 Subject: [PATCH] [project @ 2002-05-15 12:16:11 by simonmar] Fix non-Haddockish comments --- Numeric.hs | 16 ++++------------ 1 file changed, 4 insertions(+), 12 deletions(-) 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 -- 1.7.10.4