From 027f53e35bc57e0046bbb3c02f74e8504961b499 Mon Sep 17 00:00:00 2001
From: Magnus Ahltorp <map@kth.se>
Date: Thu, 11 Feb 2016 15:51:34 +0100
Subject: Added rudimentary support for chunks. This means that the
 implementation should be compatible with the specification.

---
 test/listpermdb.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'test')

diff --git a/test/listpermdb.erl b/test/listpermdb.erl
index 04acbfa..a12e5e4 100755
--- a/test/listpermdb.erl
+++ b/test/listpermdb.erl
@@ -101,7 +101,7 @@ printindex(<<Unknown:16/binary, _Rest/binary>>, FileOffset) ->
 
 printdata(<<>>, FileOffset) ->
     {ok, FileOffset};
-printdata(<<?DATA_ENTRY_COOKIE:64, Key:32/binary, Length:32, Rest/binary>>, FileOffset) ->
+printdata(<<?DATA_ENTRY_COOKIE:64, Key:32/binary, 1:16, Length:16, Rest/binary>>, FileOffset) ->
     FileOffset2 = FileOffset + 8 + 32 + 4,
     io:format("data ~p key ~p length ~p~n", [FileOffset, Key, Length]),
     <<Data:Length/binary, Rest2/binary>> = Rest,
-- 
cgit v1.1