@@ -93,4 +93,5 @@ instance Binary Type where
93 1 -> Var <$> get
93 1 -> Var <$> get
94 2 -> Data <$> get <*> get
94 2 -> Data <$> get <*> get
95 3 -> return EmptyRecord
95 3 -> return EmptyRecord
96− 4 -> Record <$> get <*> get
96+ 4 -> Record <$> get <*> get
97+ _ -> error "Error reading a valid type from serialized string"