Simon Marlow <[EMAIL PROTECTED]> wrote,

> The preferred way should presumably be LINE pragmas.

Indeed.  Or do you want to tell me that you are going to
break one of my favourite programs?

<EndangeredProgram>
import Char

instance Eq (a -> b) where
  _ ==_  = False

instance Show (a -> b) where
  show = const "<function>"

instance Num b => Num (a -> b) where
  fromInteger = const . fromInteger
  (+)    = undefined
  (*)    = undefined
  signum = undefined
  abs    = undefined

(#)     :: Int -> Int -> String
(x # y)  = chr x : chr y : "!"

main = putStrLn $ 78
 # 111 "Foo.hs"
</EndangeredProgram>

Cheers,
Manuel

_______________________________________________
Haskell mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/haskell

Reply via email to