<div dir="ltr">Jens, I have it working now, thanks.<div><br></div><div>I think I inherited a modified copy of code when it is far simpler to run the official distro (now that I understand how to do so :-).</div><div><br></div>
<div>Can I ask, what is important about using "Module"?</div><div><br></div><div>Thanks for your prompt help.</div><div><br></div><div>Fred</div><div><br><br><div class="gmail_quote">On Mon, Sep 29, 2008 at 3:38 PM, Jens Axel Soegaard <span dir="ltr"><<a href="mailto:jensaxel@soegaard.net">jensaxel@soegaard.net</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"><div><div></div><div class="Wj3C7c">Fred G. Martin wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
I am trying to run a version of the Henderson picture language stuff<br>
for my students. It works fine in PLT 3.72 with Textual (MzScheme,<br>
includes R5RS). The images display in the listener.<br>
<br>
In PLT 4.1, I can load the code when choosing Full Swindle, but<br>
instead of images in the listener, I get a lovely "image-snip"<br>
message:<br>
<br>
<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
(paint (load-painter "einstein"))<br>
<br>
</blockquote>
#<image-snip%><br>
<br>
Can anyone point me in the right direction? The code I am running<br>
from my colleague Holly Yanco's last version, problem set 4 at<br>
<a href="http://www.cs.uml.edu/~holly/91.301/" target="_blank">http://www.cs.uml.edu/~holly/91.301/</a> .<br>
<br>
</blockquote></div></div>
Just curious, are you using features not present in the SICP package available on PLaneT?<br>
(I think they share most of the code)<br>
<br>
The following will display Einstein (use the module langauge).<br>
<br>
#lang scheme<br>
(require (planet "sicp.ss" ("soegaard" "sicp.plt" 2 0)))<br>
(paint (load-painter "einstein"))<br>
<br>
The einstein painter happens to be builtin, it was defined like<br>
this (more or less).<br>
<br>
(define einstein (load-painter "einstein.gif"))<br>
<br>
See the documentation here:<br>
<br>
<a href="http://planet.plt-scheme.org/package-source/soegaard/sicp.plt/2/0/planet-docs/sicp-manual/index.html" target="_blank">http://planet.plt-scheme.org/package-source/soegaard/sicp.plt/2/0/planet-docs/sicp-manual/index.html</a><br>
<font color="#888888">
<br>
<br>
-- <br>
Jens Axel Søgaard<br>
</font></blockquote></div><br></div></div>