gmane.lisp.scheme.scheme48

Ivan Shmakov | 22 Jul 06:33

c/external.c:727:8: warning: extra tokens at end of #endif directive

$ nl -ba c/external.c 
...
   723	  for (i = 0; i < nargs; i++) {
   724	    s48_ref_t ref = va_arg(arguments, s48_ref_t);
   725	#ifdef DEBUG_FFI
   726	    fprintf(stderr, "call_scheme_2: pushing arg %d ref %x\n", i, ref);
   727	#endif DEBUG_FFI

	Shouldn't there be no DEBUG_FFI on this line?

   728	    s48_push(s48_deref(ref));
   729	  }
...
$

headers

Michael Sperber | 3 Aug 17:26

Re: c/external.c:727:8: warning: extra tokens at end of #endif directive


Ivan Shmakov <ivan <at> theory.asu.ru> writes:

> $ nl -ba c/external.c 
> ...
>    723	  for (i = 0; i < nargs; i++) {
>    724	    s48_ref_t ref = va_arg(arguments, s48_ref_t);
>    725	#ifdef DEBUG_FFI
>    726	    fprintf(stderr, "call_scheme_2: pushing arg %d ref %x\n", i, ref);
>    727	#endif DEBUG_FFI
>
> 	Shouldn't there be no DEBUG_FFI on this line?

Yes.  I've finally pushed the fix for this.  Thanks!

--

-- 
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla