The return value of `load'

The return value of `load'

[Panicz Maciej Godek]

Hey,
let's assume that I have two files. The first one contains a single sexp:
2plus3.scm:
(+ 2 3)

Now I would like to load that file, just like the `load' or `primitive-load'
does, but I would like to have an access to the return value of the last
expression from the file:

(define x (load "2plus3.scm")) ; (i wish x was 5)

The similar effect could be achieved using

(let* ((f (open-file "2plus3.scm" "r"))
       (v (read f)))
  (close f)
  (primitive-eval v))

but I was wondering if it was possible to implement this feature
as a default behavior of `load' or `primitive-load' -- it would be convenient
for the programs that would want to store the data in the external files.

Regards
M.

Re: The return value of `load'

[Andy Wingo]

On Mon 01 Aug 2011 15:02, Panicz Maciej Godek <godek.maciek@gmail.com> writes:

> (define x (load "2plus3.scm")) ; (i wish x was 5)

I have fixed this to return the result(s) of evaluating the last
expression in the file, or the unspecified value if the file has no
forms.  Previously there was differing behavior: primitive-load didn't
return the values, but load-compiled (which `load' could call) would
return the values.

Andy
-- 
http://wingolog.org/