From: simonmar <unknown>
Date: Mon, 28 Jun 1999 15:43:12 +0000 (+0000)
Subject: [project @ 1999-06-28 15:43:12 by simonmar]
X-Git-Tag: Approximately_9120_patches~6068
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=9956bafe44c39e07dff0c569dedc5cef3b41dbc7

[project @ 1999-06-28 15:43:12 by simonmar]
a couple more weird cases for lexing of qualified names.
---

diff --git a/ghc/tests/reader/should_compile/read023.hs b/ghc/tests/reader/should_compile/read023.hs
index dfcfd1e..d43370f 100644
--- a/ghc/tests/reader/should_compile/read023.hs
+++ b/ghc/tests/reader/should_compile/read023.hs
@@ -1,9 +1,12 @@
 module ShouldCompile where
 
 -- M.<keyword> isn't a qualified identifier
-f = Just.let x=id in x
+f  = Just.let x=id in x
+f' = Just.\1 where (.\) = ($)
 
 -- M.{as,hiding,qualified} *are* qualified identifiers
-g = ShouldCompile.as
+g  = ShouldCompile.as
+g' = (ShouldCompile.!)
 
 as x = x
+(!) x = x