I can't seem to reproduce this bug at will. It boils down to:

# ExFileParse> ("","") == ("","")
# 
# Program error: {Show_Bool_showsPrec 0 
# INTERNAL ERROR: Error in graph

i.e. (==) applied to args of type (String,String).


# ExFileParse> ([],[]) == (([],[]) :: ([Char],[Char]))
#
# Program error: {Show_Bool_showsPrec 0 
# INTERNAL ERROR: Error in graph

# ExFileParse> ("a","a") == ("b","c")
#
# Program error: {Show_Bool_showsPrec 0 
# INTERNAL ERROR: Error in graph

whereas

# ExFileParse> ((),()) == ((),())
# True
# ExFileParse> ([],[]) == (([],[]) :: ([Char],[()]))
# True
# ExFileParse> ([1],[1]) == ([1],[1])
# True
# ExFileParse> ("","","") == ("","","")
# True

and (ouch!)

# ExFileParse> if (==) ("","") ("","") then 3 else 5
# 5

but

# ExFileParse> (==) ("","") ("","") || False
# 
# Program error: {
# INTERNAL ERROR: Error in graph


--
Fabrice

Hugs 1.4, The Nottingham and Yale Haskell User's System. Version 970719.
Options:   --with-x --disable-large-banner --enable-TREX
OS:        HP-UX varsovie A.09.05 A 9000/735 2001675185 two-user license
Compiler:  gcc version 2.6.3

===============================================================================
Fabrice Lavier        <[EMAIL PROTECTED]>         (1.514) 345 1644, ext. 317
===============================================================================

Reply via email to