PasteRack.org
Paste # 81863
2015-09-12 07:50:09

Fork as a new paste.

Paste viewed 110 times.


Embed:

Sandbox allows loading arbitrary modules?

; Tested with Racket 6.2.1, while investigating a problem with the handin server.

#lang racket
(require racket/sandbox)
(define evaler (make-module-evaluator '(module foo racket (require htdp/image) 1) #:language 'racket #:allow-for-require '(2htdp/image)))

(evaler '(begin (require htdp/image) (require net/http-client) (circle 20 "solid" "red")))