From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 14 Jan 2004 14:24:38 +0000 (+0000)
Subject: (do_check_ram_size): Don't hardcode the lisp address space size.
X-Git-Tag: ttn-vms-21-2-B4~7937
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/eccab1443473de595b404d0fe05206a33e16f425?ds=sidebyside

(do_check_ram_size): Don't hardcode the lisp address space size.
---

diff --git a/src/macterm.c b/src/macterm.c
index 29be6659c3..fc65c4dab6 100644
--- a/src/macterm.c
+++ b/src/macterm.c
@@ -6643,8 +6643,8 @@ do_check_ram_size (void)
 
   if (Gestalt (gestaltPhysicalRAMSize, &physical_ram_size) != noErr
       || Gestalt (gestaltLogicalRAMSize, &logical_ram_size) != noErr
-      || physical_ram_size > 256 * 1024 * 1024
-      || logical_ram_size > 256 * 1024 * 1024)
+      || physical_ram_size > (1 << VALBITS)
+      || logical_ram_size > (1 << VALBITS))
     {
       StopAlert (RAM_TOO_LARGE_ALERT_ID, NULL);
       exit (1);