Commit 58673f1e authored by Seb Mondet's avatar Seb Mondet

Implement recipes and debian-wheezy

parent 4a34b164
This diff is collapsed.
......@@ -3,7 +3,7 @@ open Astring
module Environment = struct
type t =
| Qemu of [ `Arm ] * [ `Openwrt ]
| Qemu of [ `Arm ] * [ `Openwrt | `Debian_wheezy ]
let to_string_hum =
function
| Qemu (_, _) -> "Qemu-arm-owrt"
......@@ -11,11 +11,11 @@ end
module Action = struct
type t =
| Exec of string list
| Get_file of string
| Get_file of string * string
let to_string_hum =
function
| Exec l -> strf "exec: {%s}" (String.concat ~sep:" " l)
| Get_file p -> strf "get: '%s'" p
| Get_file (p, a) -> strf "get: '%s' as '%s'" p a
end
type t = {
environment: Environment.t;
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment