From 2d4f8bdf7c12c16fc75cd7c705f7c84733109215 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Sat, 23 Jan 1999 13:33:52 +0000
Subject: [PATCH] [project @ 1999-01-23 13:33:51 by sof] Updated to work with
 current sources

---
 ghc/tests/stranal/should_compile/ins.hs        |    4 ++--
 ghc/tests/stranal/should_compile/str001.stderr |    3 +--
 ghc/tests/stranal/should_compile/syn.hs        |    2 +-
 3 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/ghc/tests/stranal/should_compile/ins.hs b/ghc/tests/stranal/should_compile/ins.hs
index 8f61d07..a50320c 100644
--- a/ghc/tests/stranal/should_compile/ins.hs
+++ b/ghc/tests/stranal/should_compile/ins.hs
@@ -1,5 +1,5 @@
---!! TEST OF DEFACTORISATION FOR FUNCTIONS THAT DROP 
---!!             POLYMORPHIC VARIABLES
+-- !! TEST OF DEFACTORISATION FOR FUNCTIONS THAT DROP 
+-- !!             POLYMORPHIC VARIABLES
 
 module Test where
 data Boolean = FF | TT
diff --git a/ghc/tests/stranal/should_compile/str001.stderr b/ghc/tests/stranal/should_compile/str001.stderr
index 7fd8616..6c089a3 100644
--- a/ghc/tests/stranal/should_compile/str001.stderr
+++ b/ghc/tests/stranal/should_compile/str001.stderr
@@ -1,3 +1,2 @@
 ghc: module version changed to 1; reason: no old .hi file
-_exports_
-ShouldSucceed area2 Point2{Point2};
+__export ShouldSucceed area2 Point2{Point2};
diff --git a/ghc/tests/stranal/should_compile/syn.hs b/ghc/tests/stranal/should_compile/syn.hs
index e4b1f63..6693db7 100644
--- a/ghc/tests/stranal/should_compile/syn.hs
+++ b/ghc/tests/stranal/should_compile/syn.hs
@@ -1,4 +1,4 @@
---!!! THIS TEST IS FOR TYPE SYNONIMS AND FACTORISATION IN THEIR PRESENCE.
+-- !!! THIS TEST IS FOR TYPE SYNONIMS AND FACTORISATION IN THEIR PRESENCE.
 
 module Test where
 data M a = A | B a (M a)
-- 
1.7.10.4