urbit/gen/hood/cp.hoon

::  Kiln: copy file in clay
::
::::  /hoon/cp/hood/gen
  ::
/?    310
:-  %say
=,  space:userlib
|=  {^ {input/path output/path ~} ~}
:-  %kiln-info
?.  =(-:(flop input) -:(flop output))
  ["Can't move to a different mark" ~]
=+  dir=.^(arch %cy input)
?~  fil.dir
  ~&  "No such file:"
  [<input> ~]
:-  "copied"
`(foal output -:(flop input) [%atom %t ~] .^(* %cx input))    ::  XX type
added one-line info to all generators 2016-10-22 02:44:39 +03:00			`:: Kiln: copy file in clay`
standardize location-header structure 2016-02-05 05:57:44 +03:00			`::`
fix hoon location header information 2016-02-05 06:05:37 +03:00			`:::: /hoon/cp/hood/gen`
standardize location-header structure 2016-02-05 05:57:44 +03:00			`::`
formal reponsibility taken gen/ 314->310 2016-02-17 04:40:32 +03:00			`/? 310`
rename generators to %say, %ask, %get 2015-09-12 03:24:51 +03:00			`:- %say`
port forward lore, role, and rolt usage 2016-12-03 01:14:39 +03:00			`=, space:userlib`
Stop using obsolete $~ syntax. 2018-03-19 07:18:20 +03:00			`\|= {^ {input/path output/path ~} ~}`
updates \|cp and \|mv to print errors without stacktraces 2016-07-19 07:08:28 +03:00			`:- %kiln-info`
moves \|cp and \|mv implementations back into the generators 2016-07-16 07:19:49 +03:00			`?. =(-:(flop input) -:(flop output))`
refactors kiln/\|cp/\|mv to use (unit toro) instead of a bogus one 2016-07-20 01:21:21 +03:00			`["Can't move to a different mark" ~]`
moves \|cp and \|mv implementations back into the generators 2016-07-16 07:19:49 +03:00			`=+ dir=.^(arch %cy input)`
			`?~ fil.dir`
			`~& "No such file:"`
refactors kiln/\|cp/\|mv to use (unit toro) instead of a bogus one 2016-07-20 01:21:21 +03:00			`[<input> ~]`
updates \|cp and \|mv to print errors without stacktraces 2016-07-19 07:08:28 +03:00			`:- "copied"`
refactors kiln/\|cp/\|mv to use (unit toro) instead of a bogus one 2016-07-20 01:21:21 +03:00			`(foal output -:(flop input) [%atom %t ~] .^(* %cx input)) :: XX type