raise minimum memory limit in DrRacket to 8 megabytes

collects/drracket/private/main.rkt

@@ -116,8 +116,8 @@
 
 (drr:set-default 'drracket:child-only-memory-limit (* 1024 1024 128)
                          (λ (x) (or (boolean? x)
-                                    (integer? x)
+                                    (exact-integer? x)
-                                    (x . >= . (* 1024 1024 1)))))
+                                    (x . >= . (* 1024 1024 8)))))
 
 (drr:set-default 'drracket:recent-language-names 
                          null 

collects/drracket/private/unit.rkt

@@ -4639,7 +4639,7 @@ module browser threading seems wrong.
       (let* ([n (string->number (send txt get-text))])
         (and n
              (integer? n)
-             (1 . <= . n))))
+             (8 . <= . n))))
     
     (define (background sd)
       (let ([txt (send tb get-editor)])

collects/string-constants/private/english-string-constants.rkt

@@ -961,7 +961,7 @@ please adhere to these guidelines:
  (force-quit-menu-item-help-string "Uses custodian-shutdown-all to abort the current evaluation")
  (limit-memory-menu-item-label "Limit Memory...")
  (limit-memory-msg-1 "The limit will take effect the next time the program")
- (limit-memory-msg-2 "is Run, and it must be at least one megabyte.")
+ (limit-memory-msg-2 "is Run, and it must be at least eight megabytes.")
  (limit-memory-unlimited "Unlimited")
  (limit-memory-limited "Limited")
  (limit-memory-megabytes "Megabytes")

collects/string-constants/private/french-string-constants.rkt

@@ -947,8 +947,8 @@
   (force-quit-menu-item-label "Forcer le programme à quitter")
   (force-quit-menu-item-help-string "Utilise custodian-shutdown-all pour terminer toute l'évaluation courante")
   (limit-memory-menu-item-label "Limiter la mémoire...")
-  (limit-memory-msg-1 "La limite prendra effet à la prochaine exécution du programme.")
+  ;(limit-memory-msg-1 "La limite prendra effet à la prochaine exécution du programme.")
-  (limit-memory-msg-2 "Elle doit être d'au moins un megaoctet.")
+  ;(limit-memory-msg-2 "Elle doit être d'au moins un megaoctet.")  ;; the minimum limit is now 8 megs
   (limit-memory-unlimited "Illimitée")
   (limit-memory-limited "Limitée à")
   (limit-memory-megabytes "megaoctets")

collects/string-constants/private/german-string-constants.rkt

@@ -853,8 +853,8 @@
  (force-quit-menu-item-label "Programm zwingen aufzuhören")
  (force-quit-menu-item-help-string "Benutzt custodian-shutdown-all, um die Auswertung abzubrechen")
  (limit-memory-menu-item-label "Speicherverbrauch einschränken...")
- (limit-memory-msg-1 "Das Limit wird beim nächsten Programmstart aktiv")
+ ;(limit-memory-msg-1 "Das Limit wird beim nächsten Programmstart aktiv")
- (limit-memory-msg-2 "und muss mindestens ein Megabyte betragen.")
+ ;(limit-memory-msg-2 "und muss mindestens ein Megabyte betragen.") ;; minimum memory limit is now 8 megabytes
  (limit-memory-unlimited "nicht einschränken")
  (limit-memory-limited "einschränken")
  (limit-memory-megabytes "Megabytes")

collects/string-constants/private/japanese-string-constants.rkt

@@ -867,7 +867,7 @@ please adhere to these guidelines:
  (force-quit-menu-item-help-string "現在の式評価を強制終了するには custodian-shutdown-all を使用してください")
  (limit-memory-menu-item-label "メモリを制限する...")
  (limit-memory-msg-1 "ここで指定したメモリ制限値は、プログラムを次回に実行するときに有効になります。")
- (limit-memory-msg-2 "制限値は 1MB 以上にしてください。")
+ (limit-memory-msg-2 "制限値は 8MB 以上にしてください。")
  (limit-memory-unlimited "制限しない")
  (limit-memory-limited "制限する")
  (limit-memory-megabytes "MB")

collects/string-constants/private/korean-string-constants.rkt

@@ -799,7 +799,7 @@
  (force-quit-menu-item-label "프로그램 강제중단")
  (force-quit-menu-item-help-string "작업관리자를 사용하여 현재 계산을 중단")
  (limit-memory-menu-item-label "메모리 제한")
- (limit-memory-msg-1 "메모리 제한은 1MB 이상이어야 하며, 바꾼 제한 설")
+ (limit-memory-msg-1 "메모리 제한은 8MB 이상이어야 하며, 바꾼 제한 설")
  (limit-memory-msg-2 "정은 프로그램을 다시 시작할 때부터 적용됩니다.")
  (limit-memory-unlimited "제한없음")
  (limit-memory-limited "제한있음")

collects/string-constants/private/russian-string-constants.rkt

@@ -873,8 +873,8 @@ please adhere to these guidelines:
  (force-quit-menu-item-label "Принудительно выйти из программы")
  (force-quit-menu-item-help-string "Прервать все текущие вычисления")
  (limit-memory-menu-item-label "Ограничение по памяти...")
- (limit-memory-msg-1 "Ограничение станет действовать после следующего запуска программы")
+ ;(limit-memory-msg-1 "Ограничение станет действовать после следующего запуска программы")
- (limit-memory-msg-2 "Для выполнения необходим, по крайней мере, один мегабайт.")
+ ;(limit-memory-msg-2 "Для выполнения необходим, по крайней мере, один мегабайт.")  ;; minimum memory limit is now 8 megs
  (limit-memory-unlimited "Без ограничений")
  (limit-memory-limited "С ограничением")
  (limit-memory-megabytes "Мегабайт")

collects/string-constants/private/simplified-chinese-string-constants.rkt

@@ -776,8 +776,8 @@
   (force-quit-menu-item-label "终止")
   (force-quit-menu-item-help-string "使用custodian-shutdown-all退出当前计算")
   (limit-memory-menu-item-label "限制内存使用...")
-  (limit-memory-msg-1 "内存限制会在下一次运行")
+  ;(limit-memory-msg-1 "内存限制会在下一次运行")
-  (limit-memory-msg-2 "时生效。内存限制最低值为1megabyte.")
+  ;(limit-memory-msg-2 "时生效。内存限制最低值为1megabyte.") ;; memory limit is now 8 megabytes
   (limit-memory-unlimited "无限制")
   (limit-memory-limited "限制")
   (limit-memory-megabytes "Megabytes")

collects/string-constants/private/traditional-chinese-string-constants.rkt

@@ -775,8 +775,8 @@
   (force-quit-menu-item-label "终止")
   (force-quit-menu-item-help-string "使用custodian-shutdown-all退出当前计算")
   (limit-memory-menu-item-label "限制内存使用...")
-  (limit-memory-msg-1 "内存限制会在下一次运行")
+  ;(limit-memory-msg-1 "内存限制会在下一次运行")
-  (limit-memory-msg-2 "时生效。内存限制最低值为1megabyte.")
+  ;(limit-memory-msg-2 "时生效。内存限制最低值为1megabyte.") ;; memory limit is now 8 megabytes
   (limit-memory-unlimited "无限制")
   (limit-memory-limited "限制")
   (limit-memory-megabytes "Megabytes")

collects/string-constants/private/ukrainian-string-constants.rkt

@@ -873,8 +873,8 @@ please adhere to these guidelines:
  (force-quit-menu-item-label "Примусово вийти з програми")
  (force-quit-menu-item-help-string "Перервати всі поточні обчислення")
  (limit-memory-menu-item-label "Обмеження по пам'яті...")
- (limit-memory-msg-1 "Обмеження стануть діяти після наступного виконання програми")
+ ;(limit-memory-msg-1 "Обмеження стануть діяти після наступного виконання програми")
- (limit-memory-msg-2 "Для виконання необхідно, принаймні, 1 мегабайт.")
+ ;(limit-memory-msg-2 "Для виконання необхідно, принаймні, 1 мегабайт.")  ;; minimum memory limit is now 8 megabytes
  (limit-memory-unlimited "Без обмежень")
  (limit-memory-limited "З обмеженнями")
  (limit-memory-megabytes "Мегабайт")