From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: rm@fabula.de
Newsgroups: gmane.lisp.guile.devel
Subject: Bug in eval-string?
Date: Thu, 8 Aug 2002 14:56:41 +0200
Sender: guile-devel-admin@gnu.org
Message-ID: <20020808125641.GA23831@www>
NNTP-Posting-Host: localhost.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1028810664 17442 127.0.0.1 (8 Aug 2002 12:44:24 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Thu, 8 Aug 2002 12:44:24 +0000 (UTC)
Return-path: <guile-devel-admin@gnu.org>
Original-Received: from fencepost.gnu.org ([199.232.76.164])
	by main.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 17cmeM-0004XD-00
	for <guile-devel@m.gmane.org>; Thu, 08 Aug 2002 14:44:23 +0200
Original-Received: from localhost ([127.0.0.1] helo=fencepost.gnu.org)
	by fencepost.gnu.org with esmtp (Exim 3.35 #1 (Debian))
	id 17cmf2-0002UI-00; Thu, 08 Aug 2002 08:45:04 -0400
Original-Received: from www.elogos.de ([212.18.192.92])
	by fencepost.gnu.org with smtp (Exim 3.35 #1 (Debian))
	id 17cmen-0002Tp-00
	for <guile-devel@gnu.org>; Thu, 08 Aug 2002 08:44:49 -0400
Original-Received: by www.elogos.de (Postfix, from userid 5001)
	id AA91F1049A6; Thu,  8 Aug 2002 14:56:41 +0200 (CEST)
Original-To: guile-devel@gnu.org
Content-Disposition: inline
User-Agent: Mutt/1.3.24i
Errors-To: guile-devel-admin@gnu.org
X-BeenThere: guile-devel@gnu.org
X-Mailman-Version: 2.0.11
Precedence: bulk
List-Help: <mailto:guile-devel-request@gnu.org?subject=help>
List-Post: <mailto:guile-devel@gnu.org>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/guile-devel>,
	<mailto:guile-devel-request@gnu.org?subject=subscribe>
List-Id: Developers list for Guile,
	the GNU extensibility library <guile-devel.gnu.org>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/guile-devel>,
	<mailto:guile-devel-request@gnu.org?subject=unsubscribe>
List-Archive: <http://mail.gnu.org/pipermail/guile-devel/>
Xref: main.gmane.org gmane.lisp.guile.devel:1008
X-Report-Spam: http://spam.gmane.org/gmane.lisp.guile.devel:1008

Hello list,

according to the documentation, 'eval-string' 
evaluation "... takes place in the environment 
returned by the procedure interaction-environment".
Unfortunately this doesn't seem to work for me
(see the following test case):


 tia  Ralf Mattes

------------------------x--------------------------------

;; File: eval-test.scm
;; create an evaluation context
(define boxx (make-module))
(set-module-kind! boxx 'directory)

;; fill it with _some_ bindings
(module-define! boxx 'define define)

(eval '(define meaning-of-life 42) boxx)

;; test the bindings
(eval 'meaning-of-life boxx)

;; => 42

(let ((interaction-environment (lambda () boxx)))
  (format #t "Meaning of life in a box is: ~A\n"
          (eval-string "meaning-of-life")))

;; Backtrace:
;;  16: 1* (let (#) (format #t "Meaning of life in a box is: ~A " #))
;;  17: 2  [simple-format #t "Meaning of life in a box is: ~A " ...
;;  18: 3*  [eval-string "meaning-of-life"]
;; In unknown file:
;;   ?: 4*  meaning-of-life
;;
;; <unnamed port>: In expression meaning-of-life:
;; <unnamed port>: Unbound variable: meaning-of-life
;; ABORT: (unbound-variable)


_______________________________________________
Guile-devel mailing list
Guile-devel@gnu.org
http://mail.gnu.org/mailman/listinfo/guile-devel