From 9956bafe44c39e07dff0c569dedc5cef3b41dbc7 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Mon, 28 Jun 1999 15:43:12 +0000
Subject: [PATCH] [project @ 1999-06-28 15:43:12 by simonmar] a couple more
weird cases for lexing of qualified names.
---
ghc/tests/reader/should_compile/read023.hs | 7 +++++--
1 file changed, 5 insertions(+), 2 deletions(-)
diff --git a/ghc/tests/reader/should_compile/read023.hs b/ghc/tests/reader/should_compile/read023.hs
index dfcfd1e8b2bc..d43370fce015 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
--
GitLab