在Racket中指定内存限制

看见 custodians .

例如:

#lang racket

;; Set limit
(custodian-limit-memory
   (current-custodian) (* 2 1024 1024))

(define x (make-bytes (* 4 1024 1024)))

此代码的结果是“内存不足”。

在代码开头,您可以设置模块的内存限制。 (docs)

#lang racket/base
(define MAX-BYTES 1000)
(custodian-limit-memory (current-custodian) MAX-BYTES)

....

我不知道一个简单的命令行解决方案,但您可以致电 custodian-limit-memory 在您的 racketrc 文件设置REPL的限制。

racket/sandbox 尤其地 call-with-limits .