better regression testing

This commit is contained in:
Simon Michael 2007-07-11 08:25:05 +00:00
parent e08b2c1ea6
commit 06b376385b

View File

@ -23,22 +23,15 @@ xprofile: build
mv hledger.prof profs/$(TIME).xprof mv hledger.prof profs/$(TIME).xprof
ghcprof profs/$(TIME).xprof ghcprof profs/$(TIME).xprof
#LEDGER=test.dat test:
compare: build @./hledger.hs test
rm -f 1 2 @./regtest.py
ledger -s balance >1
ledger register >>1
ledger print >>1
./hledger -s balance >2
./hledger register >>2
./hledger print >>2
diff 1 2
haddock: haddock:
haddock -h -o doc *.hs haddock -h -o doc *.hs
overview: overview:
@./overview.hs Types.hs | tee OVERVIEW @./overview.hs Types.hs >OVERVIEW
loc: loc:
@darcs trackdown 'find . -name "*hs" |xargs wc -l |echo OUTPUT `tail -1`; false' |ruby -nae'puts $$F[1] if /^OUTPUT/' @darcs trackdown 'find . -name "*hs" |xargs wc -l |echo OUTPUT `tail -1`; false' |ruby -nae'puts $$F[1] if /^OUTPUT/'