Commit 1b45cd09 authored by simonpj's avatar simonpj
Browse files

[project @ 2002-06-14 14:04:01 by simonpj]

Make count_lines use the in-place unlit
parent 990dd09b
...@@ -8,7 +8,7 @@ ...@@ -8,7 +8,7 @@
foreach $f ( @ARGV ) { foreach $f ( @ARGV ) {
if ( $f =~ /\.lhs$/ ) { if ( $f =~ /\.lhs$/ ) {
open(INF, "c:/fptools-HEAD/ghc/utils/unlit/unlit $f - |") || die "Couldn't unlit $f!\n"; open(INF, "../utils/unlit/unlit $f - |") || die "Couldn't unlit $f!\n";
} else { } else {
open(INF, "< $f") || die "Couldn't open $f!\n"; open(INF, "< $f") || die "Couldn't open $f!\n";
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment