mirror of
https://github.com/facebook/sapling.git
synced 2024-10-12 01:39:21 +03:00
21 lines
504 B
Perl
21 lines
504 B
Perl
|
Test hangup signal in the middle of transaction
|
||
|
|
||
|
$ "$TESTDIR/hghave" fifo || exit 80
|
||
|
$ hg init
|
||
|
$ mkfifo p
|
||
|
$ hg serve --stdio < p &
|
||
|
$ P=$!
|
||
|
$ (echo lock; echo addchangegroup; sleep 5) > p &
|
||
|
$ Q=$!
|
||
|
$ sleep 3
|
||
|
0
|
||
|
0
|
||
|
adding changesets
|
||
|
$ kill -HUP $P
|
||
|
$ wait
|
||
|
transaction abort!
|
||
|
rollback completed
|
||
|
killed!
|
||
|
$ echo .hg/* .hg/store/*
|
||
|
.hg/00changelog.i .hg/journal.branch .hg/journal.desc .hg/journal.dirstate .hg/requires .hg/store .hg/store/00changelog.i .hg/store/00changelog.i.a
|