parseCompactValue ty = error $ "Cannot read value of type " ++ show ty
parseCompactValue ty = error $ "Cannot read value of type " ++ show ty
parseCompactValue ty = error $ "Cannot read value of type " ++ show ty