shrub/gen/hood/cp.hoon
Anton Dyudin 71f29242e0 fix #125
2016-05-06 16:21:29 -07:00

10 lines
226 B
Plaintext

::
:::: /hoon/cp/hood/gen
::
/? 310
:- %say
|= {^ {input/path output/path $~} $~}
:+ %kiln-info "copied"
?> =(-:(flop input) -:(flop output))
(foal output -:(flop input) [%atom %t ~] .^(* %cx input)) :: XX type