Update comment describing data layout.

[tatoo.git] / src / compact_tree.ml

diff --git a/src/compact_tree.ml b/src/compact_tree.ml
index 8329499..485f5ff 100644 (file)
--- a/src/compact_tree.ml
+++ b/src/compact_tree.ml
@@ -31,10 +31,9 @@ type t = {
 
 
 (* encoding :
-   i -> kind | QNameId lsl 8
-   i + 1 -> fc
-   i + 2 -> ns
-   i + 3 -> p
+   i + 0 -> fc
+   i + 1 -> ns
+   i + 2 -> p
 *)
 
 let next i = i + 3