caml-list - the Caml user's mailing list
 help / color / mirror / Atom feed
From: Jonathan Bryant <jtbryant@valdosta.edu>
To: Raj B <rajb@rice.edu>
Cc: caml-list@yquem.inria.fr
Subject: Re: [Caml-list] C-like macros in OCaml
Date: Tue, 26 Jun 2007 18:06:47 -0400	[thread overview]
Message-ID: <3950E02A-2393-4307-9F58-28D8CE0CE52C@valdosta.edu> (raw)
In-Reply-To: <1B4EC64C-435D-42C5-95F3-C01869DD41FB@rice.edu>


On Jun 26, 2007, at 6:00 PM, Raj B wrote:
> Similarly, is there any way of getting a C-like enumeration? e.g.
>
> enum days {Mon = 1, Tue, Wed...}

You can use a variant and a pair of functions:

type weekday =
| Monday
| Tuesday
  ...
| Sunday

let weekday_to_int w = match w with
| Monday -> 1
| Tuesday -> 2
  ...
| Sunday -> 7

let int_to_weekday i = match i with
| 1 -> Monday
| 2 -> Tuesday
  ...
| 7 -> Sunday
| _ -> raise (Invalid_argument "int_to_weekday")

--Jonathan


  reply	other threads:[~2007-06-26 22:06 UTC|newest]

Thread overview: 9+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2007-06-26 22:00 Raj B
2007-06-26 22:06 ` Jonathan Bryant [this message]
2007-06-27  4:10 ` [Caml-list] " Richard Jones
2007-06-27  7:43   ` Jeremy Yallop
2007-06-27  8:08     ` Loup Vaillant
2007-06-27 12:53       ` Christopher L Conway
     [not found]         ` <6f9f8f4a0706280037h5f19af5flb764e1c2999b0337@mail.gmail.com>
2007-06-28  7:38           ` Loup Vaillant
2007-06-28  7:44         ` Nicolas Pouillard
     [not found] <20070627044609.6B456BC77@yquem.inria.fr>
2007-06-27  7:21 ` David Allsopp

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=3950E02A-2393-4307-9F58-28D8CE0CE52C@valdosta.edu \
    --to=jtbryant@valdosta.edu \
    --cc=caml-list@yquem.inria.fr \
    --cc=rajb@rice.edu \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).