[Caml-list] is there a more concise way to write this?

[Martin DeMello]

      let a = match (out, value) with
        (true, true)  -> [o; v]
      | (false, true) -> [v]
      | (true, false) -> [o]
      | (false, false) -> []

-- 
Caml-list mailing list.  Subscription management and archives:
https://sympa-roc.inria.fr/wws/info/caml-list
Beginner's list: http://groups.yahoo.com/group/ocaml_beginners
Bug reports: http://caml.inria.fr/bin/caml-bugs