commit 2604400aa41a088c6cd6cb5b4a73b3f3742deeba
author Knut Nesheim <knutin@gmail.com> Mon Jul 01 15:46:38 2013 +0200
committer Knut Nesheim <knutin@gmail.com> Mon Jul 01 15:46:38 2013 +0200
tree 74d88af2202657b29073e05723a790d2df2a3b39
parent be0a0ce70610f752ed8a2d6a0d5940326db1a48b

gzip.

src/hyper.erl

diff --git a/src/hyper.erl b/src/hyper.erl
index 4791d26..81f4456 100644
--- a/src/hyper.erl
+++ b/src/hyper.erl
@@ -98,11 +98,12 @@
                               end, [], array:resize(Registers)),
 
     base64:encode(
-      iolist_to_binary(
-        lists:reverse(ByteEncoded))).
+      zlib:gzip(
+        iolist_to_binary(
+          lists:reverse(ByteEncoded)))).
 
 decode_registers(B) ->
-    decode_registers(base64:decode(B), []).
+    decode_registers(zlib:gunzip(base64:decode(B)), []).
 
 decode_registers(<<>>, Acc) ->
     lists:reverse(Acc);