comparison src/alloc.c @ 1362:4bea5980f778

* alloc.c (Fmemory_limit): Explain why we divide by 1024. Don't bother trying to display the size in the minibuffer.
author Jim Blandy <jimb@redhat.com>
date Wed, 07 Oct 1992 20:42:40 +0000
parents ef16e7c0d402
children 0b98dbec0738
comparison
equal deleted inserted replaced
1361:a45cf4b36ce9 1362:4bea5980f778
2013 /* Debugging aids. */ 2013 /* Debugging aids. */
2014 2014
2015 DEFUN ("memory-limit", Fmemory_limit, Smemory_limit, 0, 0, "", 2015 DEFUN ("memory-limit", Fmemory_limit, Smemory_limit, 0, 0, "",
2016 "Return the address of the last byte Emacs has allocated, divided by 1024.\n\ 2016 "Return the address of the last byte Emacs has allocated, divided by 1024.\n\
2017 This may be helpful in debugging Emacs's memory usage.\n\ 2017 This may be helpful in debugging Emacs's memory usage.\n\
2018 If called interactively, print the result in the minibuffer.") 2018 The value is divided by 1024 to make sure it will fit in a lisp integer.")
2019 () 2019 ()
2020 { 2020 {
2021 Lisp_Object end; 2021 Lisp_Object end;
2022 2022
2023 XSET (end, Lisp_Int, (int) sbrk (0)); 2023 XSET (end, Lisp_Int, (int) sbrk (0) / 1024);
2024
2025 if (! NILP (Finteractive_p))
2026 message ("Memory limit at %dk.", XINT (end));
2027 2024
2028 return end; 2025 return end;
2029 } 2026 }
2030 2027
2031 2028