diff options
| author | Nicolas Pouillard <np@nicolaspouillard.fr> | 2007-11-21 21:33:49 +0000 |
|---|---|---|
| committer | Nicolas Pouillard <np@nicolaspouillard.fr> | 2007-11-21 21:33:49 +0000 |
| commit | bc7a152e6a2629c2949866a6d265918a61ff35b2 (patch) | |
| tree | ebf37cd7b8533f65ac00eedaf8eb4fa16ab9c196 | |
| parent | 2396e3b2c3417c48617e26c16433899ecbe8d84c (diff) | |
[ocamlbuild] Remove touch.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@8586 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
| -rw-r--r-- | ocamlbuild/rule.ml | 1 | ||||
| -rw-r--r-- | ocamlbuild/rule.mli | 1 | ||||
| -rw-r--r-- | ocamlbuild/signatures.mli | 1 |
3 files changed, 0 insertions, 3 deletions
diff --git a/ocamlbuild/rule.ml b/ocamlbuild/rule.ml index fae7bfc02..3b06dc6cc 100644 --- a/ocamlbuild/rule.ml +++ b/ocamlbuild/rule.ml @@ -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 diff --git a/ocamlbuild/rule.mli b/ocamlbuild/rule.mli index 8479ceceb..7b85f1e6e 100644 --- a/ocamlbuild/rule.mli +++ b/ocamlbuild/rule.mli @@ -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 diff --git a/ocamlbuild/signatures.mli b/ocamlbuild/signatures.mli index 724152917..9f8b209b5 100644 --- a/ocamlbuild/signatures.mli +++ b/ocamlbuild/signatures.mli @@ -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 |