iOS: detect iPhone 4-inch as retina


git-svn-id: https://geuz.org/svn/gmsh/trunk@18022 59c8cabf-10d6-4a28-b43f-3936b85956c4