diff --git a/ghc/driver/ghc-iface.lprl b/ghc/driver/ghc-iface.lprl index fe61f697da45264f753aec2884f0f2a16eab28d9..7f4cb6651d87fe0a0546f32e53b4a2a4af9ecbc9 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