[don't treat the empty list like a string unless its type matches properly.
John Meacham <john@repetae.net>**20061220050747] hunk ./E/E.hs 127
+toString (ELit LitCons { litName = n, litArgs = [], litType = t }) = if vEmptyList == n && t == tString then return "" else fail "not a string"