diff --git a/csc.scm b/csc.scm
index 4f3afe5..c2e899e 100644
a
|
b
|
|
199 | 199 | (define default-shared-library-files (if msvc |
200 | 200 | (list (string-append "libchicken." library-extension)) |
201 | 201 | '("-lchicken"))) |
| 202 | (define unsafe-libraries #f) |
202 | 203 | (define unsafe-library-files |
203 | 204 | (list |
204 | 205 | (quotewrap |
… |
… |
EOF |
639 | 640 | [(|-O5|) |
640 | 641 | (set! rest (cons* "-optimize-level" "5" rest)) |
641 | 642 | (t-options "-unsafe-libraries") |
| 643 | (set! unsafe-libraries #t) |
642 | 644 | (set! library-files unsafe-library-files) |
643 | 645 | (set! shared-library-files unsafe-shared-library-files) |
644 | 646 | (when (memq (build-platform) '(mingw32 cygwin gnu)) |
… |
… |
EOF |
685 | 687 | (set! rest (cdr rest)) ] |
686 | 688 | [(-unsafe-libraries) |
687 | 689 | (t-options arg) |
| 690 | (set! unsafe-libraries #t) |
688 | 691 | (set! library-files unsafe-library-files) |
689 | 692 | (set! shared-library-files unsafe-shared-library-files) ] |
690 | 693 | [(-rpath) |
… |
… |
EOF |
699 | 702 | [else |
700 | 703 | (when (memq s '(-unsafe -benchmark-mode)) |
701 | 704 | (when (eq? s '-benchmark-mode) |
| 705 | (set! unsafe-libraries #t) |
702 | 706 | (set! library-files unsafe-library-files) |
703 | 707 | (set! shared-library-files unsafe-shared-library-files) ) ) |
704 | 708 | (when (eq? s '-to-stdout) |
… |
… |
EOF |
845 | 849 | (when (and osx (or (not cross-chicken) host-mode)) |
846 | 850 | (unless (zero? ($system |
847 | 851 | (string-append |
848 | | "install_name_tool -change libchicken.dylib " |
| 852 | "install_name_tool -change lib" (if unsafe-libraries "u" "") "chicken.dylib " |
849 | 853 | (quotewrap |
850 | 854 | (make-pathname |
851 | 855 | (prefix "" "lib" |
852 | 856 | (if host-mode |
853 | 857 | INSTALL_LIB_HOME |
854 | 858 | TARGET_RUN_LIB_HOME)) |
855 | | "libchicken.dylib") ) |
| 859 | (if unsafe-libraries "libuchicken.dylib" "libchicken.dylib")) ) |
856 | 860 | " " |
857 | 861 | target) ) ) |
858 | 862 | (exit last-exit-code) ) ) |