Ar an séiú lá de mí Márta, scríobh Jerry James: Nope, that particular glory is all yours! I proposed something similar to your patch back in ’08, and noticed an issue then that’s still relevant. Cf. the following sample code: (let ((big-file "/Users/aidan/Desktop/VMware Images/Windows XP—Cygwin, dev tools/Windows XP Professional.vmdk")) (values (shell-command-to-string (concat "ls -l " (shell-quote-argument big-file))) ;; Access the size field in the file-attributes list: (nth 7 (file-attributes big-file)))) => "-rwxrwxrwx＠ 1 aidan wheel 6427770880 28 Dez 2008 /Users/aidan/Desktop/VMware Images/Windows XP—Cygwin, dev tools/Windows XP Professional.vmdk " ; 2132803584 The issue is that make_bignum (which is what make_integer breaks down to if the value doesn’t fit in a fixnum) truncates long longs. You document this in http://mid.gmane.org/870180fe0801221119o25a543cdi324606a452cb2d43＠mail.gm... . Something like: #define make_integer(x) \ (NUMBER_FITS_IN_A_FIXNUM (x) ? make_fixnum (x) : \ (sizeof (x) > SIZEOF_LONG ? make_bignum_long_long (x) : make_bignum (x))) would involve no extra run-time calculation for non-off_t or non-size_t values, though it would involve writing a make_bignum_long_long function. -- ‘Liston operated so fast that he once accidentally amputated an assistant’s fingers along with a patient’s leg, […] The patient and the assistant both died of sepsis, and a spectator reportedly died of shock, resulting in the only known procedure with a 300% mortality.’ (Atul Gawande, NEJM, 2012) _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://lists.xemacs.org/mailman/listinfo/xemacs-patches