chicken-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re : [Chicken-users] csc -extend with user-preprocessor-pass


From: minh thu
Subject: Re : [Chicken-users] csc -extend with user-preprocessor-pass
Date: Mon, 12 Feb 2007 17:56:11 +0100

2007/2/12, felix winkelmann <address@hidden>:
On 2/11/07, minh thu <address@hidden> wrote:
> Hi,
>
> I'm trying the -extend <file> option of csc with the following <file>:
>
> (user-preprocessor-pass
>   (lambda form
>     (display (car form))
>     (newline)
>     '(display "..."))
>
> When compiling, the first top level form (of the being compiled file)
> is not displayed.
> Is it normal ?
>

No, that's a silly silly bug. Here's a patch:

--- old-chicken/batch-driver.scm        2007-02-12 08:03:19.223978592 +0100
+++ new-chicken/batch-driver.scm        2007-02-12 08:03:19.326962936 +0100
@@ -402,7 +402,7 @@
           (let ([proc (user-preprocessor-pass)])
             (when proc
               (when verbose (printf "User preprocessing pass...~%~!"))
-              (set! forms (cons (first forms) (map proc (cdr forms)))) ) )
+              (set! forms (map proc forms))))

           (print "source" '|1| forms)
           (begin-time)


Sorry.

Well, silly silly question:
What is the patch for ? Is it intended for those who use the latest
tarball? I guess the one who use the svn (or darcs ?) version can just
update ?

Thanks
thu




reply via email to

[Prev in Thread] Current Thread [Next in Thread]