caml-list - the Caml user's mailing list
 help / color / mirror / Atom feed
From: Ollie Frolovs <ollie.frolovs.2012@my.bristol.ac.uk>
To: caml users <caml-list@inria.fr>
Subject: [Caml-list] Modules and record fields
Date: Sun, 25 May 2014 11:30:20 +0100	[thread overview]
Message-ID: <52C51721-8564-472C-AA7A-2ABE66C4D809@my.bristol.ac.uk> (raw)

Hello

I was using some colours in my program and thought that it would be a good idea to put colour constants into a separate module. 

module Solarized = struct
  type colour = {r:int; g:int;  b:int}

  let base03 = {r=0x00; g=0x2b; b=0x36}
  let orange = {r=0xcb; g=0x4b; b=0x16}
  (* etc etc *)
end

I need three separate RGB components because I’m using an API which needs them separately, rather than in some pre-packed way.

I was planning to use the module like this

let module S = Solarized in
Sdl.set_render_draw_color ren S.orange.r S.orange.g S.orange.b 0xff
(* etc etc *)

that is, to locally open the module and refer to the colours and their subcomponent.

But this does not work. It appears for some reason that I have to address the subcomponents as

Solarized.orange.Solarized.r

which defeats the purpose! Is there any other way to achieve my goal?

Best regards

Ollie 

             reply	other threads:[~2014-05-25 10:30 UTC|newest]

Thread overview: 8+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2014-05-25 10:30 Ollie Frolovs [this message]
2014-05-25 10:45 ` Gabriel Scherer
2014-05-25 10:59 ` Gabriel Kerneis
2014-05-25 12:46   ` Ollie Frolovs
2014-05-25 13:57     ` Gabriel Scherer
2014-05-25 14:56       ` Ollie Frolovs
2014-05-25 15:02         ` Gabriel Scherer
2014-05-26  9:14           ` Goswin von Brederlow

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=52C51721-8564-472C-AA7A-2ABE66C4D809@my.bristol.ac.uk \
    --to=ollie.frolovs.2012@my.bristol.ac.uk \
    --cc=caml-list@inria.fr \
    /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).