urbit/pkg/arvo/ted/ph/breach-sync.hoon

30 lines
1.1 KiB
Plaintext
Raw Normal View History

:: This tests that syncs are correctly restarted after a breach
::
::TODO breach tests broken by dangling bone?
2019-10-02 06:25:19 +03:00
/- spider
2019-10-02 06:39:49 +03:00
/+ *ph-io
=, strand=strand:spider
^- thread:spider
2019-11-16 04:37:20 +03:00
|= vase
=/ m (strand ,vase)
2021-06-18 08:54:17 +03:00
;< ~ bind:m start-azimuth
;< ~ bind:m (spawn ~bud)
;< ~ bind:m (spawn ~marbud)
;< ~ bind:m (init-ship ~bud |)
;< ~ bind:m (init-ship ~marbud |)
;< file=@t bind:m (touch-file ~bud %kids %foo)
;< ~ bind:m (check-file-touched ~marbud %base file)
:: Merge so that when we unify history with the %only-this merge later, we
:: don't get a spurious conflict in %base
2020-07-29 07:04:59 +03:00
::
;< ~ bind:m (dojo ~marbud "|merge %kids our %base")
2021-06-18 08:54:17 +03:00
;< ~ bind:m (breach-and-hear ~bud ~marbud)
;< ~ bind:m (init-ship ~bud |)
;< ~ bind:m
(dojo ~bud "|merge %kids ~marbud %kids, =gem %only-this")
;< file=@t bind:m (touch-file ~bud %kids %bar)
;< file=@t bind:m (touch-file ~bud %kids %baz)
;< ~ bind:m (check-file-touched ~marbud %base file)
2021-06-18 08:54:17 +03:00
;< ~ bind:m end
(pure:m *vase)