[Guile-commits] 02/08: Fix sandbox

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit 454f2eeb97bf3f28e3979615344ff845c4c91568
Author: Andy Wingo <address@hidden>
Date:   Wed Jan 3 16:26:10 2018 +0100

    Fix sandbox
    
    * module/ice-9/sandbox.scm (eval-in-sandbox): Remove use of
      deprecated-and-now-removed allow-legacy-syntax-objects? parameter.
---
 module/ice-9/sandbox.scm | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/module/ice-9/sandbox.scm b/module/ice-9/sandbox.scm
index d25dc2d..bbb8119 100644
--- a/module/ice-9/sandbox.scm
+++ b/module/ice-9/sandbox.scm
@@ -1,6 +1,6 @@
 ;;; Sandboxed evaluation of Scheme code
 
-;;; Copyright (C) 2017 Free Software Foundation, Inc.
+;;; Copyright (C) 2017, 2018 Free Software Foundation, Inc.
 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
@@ -260,10 +260,7 @@ allocation limit is exceeded, an exception will be thrown 
to the
       (call-with-time-and-allocation-limits
        time-limit allocation-limit
        (lambda ()
-         ;; Prevent the expression from forging syntax objects.  See "Syntax
-         ;; Transformer Helpers" in the manual.
-         (parameterize ((allow-legacy-syntax-objects? #f))
-           (eval exp module)))))
+         (eval exp module))))
     (lambda () (when sever-module? (sever-module! module)))))