Hi,<div><br></div><div>As for the error you encountered, can you please do ,be in the REPL to see exactly what it is that failed.</div><div><br></div><div>Regarding how to make it work with a compiled file, can you please clarify what you mean by making it to work with a compiled file - i.e., what is it you are trying to achieve, and what part of it is it that you don't get to work currently?<br>
<br>Brgds,</div><div>Mikael<br><br><div class="gmail_quote">2011/7/9 Roger Wilson <span dir="ltr"><<a href="mailto:misterrogerwilson@gmail.com">misterrogerwilson@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">
Hi,<br><br>I have a basic Scheme question.<br><br>The following works as
intended from my Swank REPL. How do I make it work with a compiled
file? I'm trying to create a Meroon object that has an automatically
created unique id each time one is created. <br>
<br>(define *global-id* 0)<br>(define (get-next-global-id) <br> (let ((current-global-id *global-id*)) <br> (set! *global-id* (+ *global-id* 1)) <br> current-global-id))<br><br>(define-class my-object Object <br>
((= object-id :initializer get-next-global-id)))<br><br><br>When the Gambit setup function runs I get the error....<br><br>*** ERROR IN | object| -- (Argument 1) NUMBER expected<br>(= #!unbound #!unbound 'get-next-global-id)<br>
<font color="#888888">
<font color="#888888">
<br><br>Roger.</font>
</font><br>_______________________________________________<br>
Gambit-list mailing list<br>
<a href="mailto:Gambit-list@iro.umontreal.ca">Gambit-list@iro.umontreal.ca</a><br>
<a href="https://webmail.iro.umontreal.ca/mailman/listinfo/gambit-list" target="_blank">https://webmail.iro.umontreal.ca/mailman/listinfo/gambit-list</a><br>
<br></blockquote></div><br></div>