Read References field; referred by listing; test & tidy documentation

git-svn-id: file:///srv/svn/repo/kosuzu/trunk@39 eb64cd80-c68d-6f47-b6a3-0ada418499da

cli/conversion.ml

@@ -1,10 +1,15 @@
 open Logarion
+
+module Ref_set = Set.Make(String)
+module Id_map = Map.Make(String)
+
 type t = {
 	id: string;
 	dir: string;
 	kv: string Store.KV.t;
 	topic_roots: string list;
 	topics: (String_set.t * String_set.t) Topic_set.Map.t;
+	references: Ref_set.t Id_map.t;
 	texts: Text.t list
 }
 
@@ -19,5 +24,6 @@ let empty () = {
 	kv = Store.KV.empty;
 	topic_roots = [];
 	topics = Topic_set.Map.empty;
+	references = Id_map.empty;
 	texts = []
 }