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

git-svn-id: file:///srv/svn/repo/kosuzu/trunk@39 eb64cd80-c68d-6f47-b6a3-0ada418499da
2022-12-12 22:52:55 +00:00
parent e6452a861d
commit 1547dc4d27
9 changed files with 108 additions and 38 deletions
--- a/lib/id.ml
+++ b/lib/id.ml
@@ -12,7 +12,7 @@ let random_state = Random.State.make_self_init
 (*end*)

 type t = string
-let compare = String.compare	
+let compare = String.compare
 let nil = ""

 let short ?(len) id =