[gambit-list] Expose C constants to Scheme

Alex Sandro Queiroz e Silva asandroq at gmail.com
Fri Sep 26 13:24:52 EDT 2008


Hallo,

Arnaud Bergeron wrote:
> 
> Here is what I have right now:
> 
> (define-macro (c-define-const name c-name)
>   `(define ,name ((c-lambda () int (string-append "___result = "
> ,c-name ";")))))
> 

     There is a misplaced comma:

(define-macro (c-define-const name c-name)
   `(define ,name ((c-lambda () int ,(string-append "___result = "
                                                    c-name
                                                    ";")))))

Cheers,
-alex
http://www.ventonegro.org/



More information about the Gambit-list mailing list