caml-list - the Caml user's mailing list
 help / color / mirror / Atom feed
From: Martin Jambon <martinj@mylife.com>
To: OCaml Mailing List <caml-list@inria.fr>
Subject: [ANN] Atdgen/Biniou with support for cyclic values
Date: Mon, 20 Dec 2010 04:47:17 -0800	[thread overview]
Message-ID: <4D0F5055.8060007@mylife.com> (raw)

Hi list,

Atdgen is a tool that produces OCaml serializers and deserializers from
type definitions in the ATD syntax.  Two serialization formats are
supported:  JSON and Biniou.  For more information on the project, see

  http://martin.jambon.free.fr/atd-biniou-intro.html

The main highlight of this release (1.1.0) is support for sharing, which
allows the serialization of cyclic values such as graphs.  Sharing is
currently supported for the Biniou format only and requires extra
wrapping using type ref for non-record types.

The other new features are listed here:

  http://oss.wink.com/atdgen/atdgen-1.1.0/Changes.txt


Example:

$ cat cycle.atd
type shared_node = node shared (* sharing point *)

type node = {
  label : string;
  self : shared_node;
}

$ cat test_cycle.ml
open Cycle

let () =
  let rec a = { label = "A"; self = a } in
  let s = string_of_shared_node a in
  Printf.printf "%i %S\n" (String.length s) s;
  let a' = shared_node_of_string s in
  assert (a != a');
  assert (a == a.self);
  assert (a' == a'.self);
  print_endline "Success"

$ atdgen cycle.atd
$ ocamlfind opt -o test_cycle \
    graph.mli graph.ml test_cycle.ml \
    -package atdgen -linkpkg
$ ./test_cycle
17 "\026\000\021\002\239\175\r\244\018\001A\204P\139\140\026\015"
Success


Dissection of the serialized value:

  \026 shared_tag
  \000 0 indicates that the value follows

  \021 record_tag
  \002 field count
    \239\175\r\244 hash("label")
      \018 string_tag
      \001 string length
      A    string contents
    \204P\139\140 hash("self")
      \026 shared_tag
      \015 find value 15 bytes backward

The Biniou format is fully described here:

  http://martin.jambon.free.fr/biniou-format.txt



Home of each project:

  http://martin.jambon.free.fr/biniou.html
  http://martin.jambon.free.fr/yojson.html
  http://oss.wink.com/atd/
  http://oss.wink.com/atdgen/


Non-interactive installation with Godi:

$ godi_console update
$ godi_console perform -build godi-atdgen


Each of these four projects are distributed under a BSD license.

Biniou (c) 2010 Martin Jambon
Yojson (c) 2010 Martin Jambon
Atd (c) 2010 MyLife
Atdgen (c) 2010 MyLife




Enjoy.



Martin


             reply	other threads:[~2010-12-20 12:47 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2010-12-20 12:47 Martin Jambon [this message]
2010-12-20 12:59 ` [Caml-list] " Микола Стрєбков

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=4D0F5055.8060007@mylife.com \
    --to=martinj@mylife.com \
    --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).