[ocamlbuild] Remove touch.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@8586 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02master
parent
2396e3b2c3
commit
bc7a152e6a
|
@ -311,7 +311,6 @@ module Common_commands = struct
|
|||
let ln_f pointed pointer = Cmd (S [A"ln"; A"-f"; P pointed; Px pointer])
|
||||
let ln_s pointed pointer = Cmd (S[A"ln"; A"-s"; P pointed; Px pointer])
|
||||
let rm_f x = Cmd (S [A"rm"; A"-f"; Px x])
|
||||
let touch file = Cmd (S[A"touch"; Px file])
|
||||
let chmod opts file = Cmd (S[A"chmod"; opts; Px file])
|
||||
let cmp a b = Cmd (S[A"cmp"; P a; Px b])
|
||||
end
|
||||
|
|
|
@ -62,7 +62,6 @@ module Common_commands : sig
|
|||
val ln_f : Pathname.t -> Pathname.t -> Command.t
|
||||
val ln_s : Pathname.t -> Pathname.t -> Command.t
|
||||
val rm_f : Pathname.t -> Command.t
|
||||
val touch : Pathname.t -> Command.t
|
||||
val chmod : Command.spec -> Pathname.t -> Command.t
|
||||
val cmp : Pathname.t -> Pathname.t -> Command.t
|
||||
end
|
||||
|
|
|
@ -522,7 +522,6 @@ module type PLUGIN = sig
|
|||
val ln_f : Pathname.t -> Pathname.t -> Command.t
|
||||
val ln_s : Pathname.t -> Pathname.t -> Command.t
|
||||
val rm_f : Pathname.t -> Command.t
|
||||
val touch : Pathname.t -> Command.t
|
||||
val chmod : Command.spec -> Pathname.t -> Command.t
|
||||
val cmp : Pathname.t -> Pathname.t -> Command.t
|
||||
|
||||
|
|
Loading…
Reference in New Issue