[gambit-list] How to pass a Scheme string to a const char*?

Marc Feeley feeley at iro.umontreal.ca
Mon Dec 12 11:34:16 EST 2011


On 2011-12-12, at 11:20 AM, Marc Feeley wrote:

> (define closelog
>  (c-lambda
>   ()
>   void
>   "if (temp != NULL) ___EXT(___release_string)(temp);
>    closelog();"))

Sorry, that should be:

(define closelog
 (c-lambda
  ()
  void
  "if (temp != NULL) ___EXT(___release_string)(temp);
   temp = NULL;
   closelog();"))

Marc




More information about the Gambit-list mailing list