~ chicken-core (chicken-5) 233ecbbdaf83aeb3f55cc873f82dbabd50190c03
commit 233ecbbdaf83aeb3f55cc873f82dbabd50190c03 Author: felix <felix@call-with-current-continuation.org> AuthorDate: Mon Dec 14 07:32:27 2009 +0100 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Mon Dec 14 07:32:27 2009 +0100 removed obsolete control-file declarations diff --git a/compiler.scm b/compiler.scm index 3251ed86..6ca7265c 100644 --- a/compiler.scm +++ b/compiler.scm @@ -1329,14 +1329,6 @@ (if (every string? fds) (set! foreign-declarations (append foreign-declarations fds)) (syntax-error 'declare "invalid declaration" spec) ) ) ) - ((c-options) - (emit-control-file-item `(c-options ,@(strip (cdr spec)))) ) - ((link-options) - (emit-control-file-item `(link-options ,@(strip (cdr spec))) ) ) - ((post-process) - (emit-control-file-item - (let ([file (pathname-strip-extension source-filename)]) - `(post-process ,@(map (cut string-substitute "\\$@" file <>) (cdr spec))) ) ) ) ((block) (set! block-compilation #t)) ((separate) (set! block-compilation #f)) ((keep-shadowed-macros) (set! undefine-shadowed-macros #f))Trap