hi!<br><br>  I have wrapper.scm (which is compiled code), and test.scm (which is interpreted)<br><br>  i.e. (compile-file-to-c "wrapper"); (link-flat '("wrapper ...) output: "blah.o1.c"); gcc -shared -fPIC ... blah.o1.c -o blah.o1<br>
<br>  test.scm:<br>  (load "blah")<br>  ...<br><br>  and I run everything with "gsi test.scm"<br><br>  Now, here's the problem. In test.scm, I need to call a glutDisplayFunc, which requires a _C_ callback. Okay, so I define function with (c-define (c-disp ...) ... (disp)). (disp) is the scheme funfction that does the real workd; c-disp is a c wrapper around disp. Since test.scm is interpted, I have to put it in wrapper.scm -- however, I want to keep disp in test.scm (rapid prototypinhg, changing it on the fly, etc ...). Question is, how can I get c-disp (which is in wrapper.scm) to get call (disp), which is in test.scm?<br>
<br>  if I just do wrapper.scm:<br><br>(c-define (c-disp) () void "f" "" (disp))<br><br>  and test.scm:<br>(load "graphics")<br><br>;(c-define (c-disp) () void "f" "" (disp))<br>
          <br>(define (disp)<br>  (glClear GL_COLOR_BUFFER_BIT)<br>  (glutWireTeapot 0.5))<br><br>and run gsi test.scm, I get:<br><br>$gsi test.scm<br>*** WARNING -- Variable "format" used in module "wrapper-s" is undefined<br>
<br>so the question is ... how can i get compile scheme code to 'wait' in order to call interpted scheme code?<br><br>thanks!<br>