Fixed pullUp to not pull up list expressions

This patch looks like I removed the wrong line above, but it was identical to the line I actually removed, so the patch is fine, it just looks odd.

transformations/SimplifyExprs.hs

@@ -347,10 +347,6 @@ pullUp pullUpArraysInsideRecords
                     A.ExprVariable _ (A.DirectedVariable _ _ _) -> return e'
                     --TODO work out whether to pull up DerefVariable
                     _ -> pull t e'
-                A.List _ ->
-                  case e' of
-                    A.ExprVariable _ _ -> return e'
-                    _ -> pull t e'
                 _ -> return e'
       where
         pull :: A.Type -> A.Expression -> PassM A.Expression