From: sof <unknown>
Date: Sun, 27 Jul 1997 09:13:50 +0000 (+0000)
Subject: [project @ 1997-07-27 09:13:50 by sof]
X-Git-Tag: Approximately_1000_patches_recorded~176
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=617ccc8395b012b6073383b606bfbc227c68b589;p=ghc-hetmet.git

[project @ 1997-07-27 09:13:50 by sof]
regexp change for usage lines
---

diff --git a/ghc/driver/ghc-iface.lprl b/ghc/driver/ghc-iface.lprl
index fe61f69..7f4cb66 100644
--- a/ghc/driver/ghc-iface.lprl
+++ b/ghc/driver/ghc-iface.lprl
@@ -187,7 +187,7 @@ sub readHiFile {
 	} elsif ( /^_([a-z_]+)_$/ ) {
 	    $now_in = $1;
 
-	} elsif ( $now_in eq 'usages' && /^(\S+)\s+(!\s+)?(\d+)\s+:: (.*)/ ) {
+	} elsif ( $now_in eq 'usages' && /^(\S+)\s+(!\s+)?(\d+)\s+::(.*)/ ) {
 	    $Stuff{"$mod:usages"} .= $_; # save the whole thing