Re: [Chicken-users] Problem with define-embedded/foreign-declare

[felix]

Daniel B. Faken wrote:
> Hi all,
>
>   I tried the example of define-embedded from the manual, and got this, 
> with chicken-1.43 (on redhat 7.3):
>
> login:/data/netfinity/faken%cat > bar.scm
> (include "chicken-entry-points")
>
> (define-embedded (foo (int x) (c-string y)) int
>   (print x ": " y) 
>   x)
>
> (define-embedded (square (double x)) unsigned-int
>   (* x x))
> login:/data/netfinity/faken%chicken bar.scm
> compiling `bar.scm' ...
> Error: suspicious code fragment in `foreign-declare' form:
> ------------------------------------------------------------
>
>  int   foo(int  x, char *  y) {
> ------------------------------------------------------------
> unbalanced parentheses (`}')
>
>
>   Anyone have a quick fix?

Line 1035 of compiler.scm should look like this:

            (check-c-syntax (apply string-append fds) 'foreign-declare) ) )

If it doesn't change it accordingly and rebuild chicken.

(I'm sorry for the hassle - during the last time I have made numerous
fixes and release way too many unstable versions. This will hopefully
get better soon...)


cheers,
felix