eval-expression-print-level 4 (setq first '(second (third (forth (tifth (sixth ())))))) (second (third (forth (tifth ...)))) (setq eval-expression-print-level nil) nil first (second (third (forth (tifth (sixth nil)))))