misc-deps
/
racket-ansi
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Avoid versioning problems by just always rebuilding the native library

This commit is contained in:
Tony Garnock-Jones 2015-01-16 14:14:56 -05:00
parent 0f9cc06dff
commit 2770248a09
1 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
ansi/private/install.rkt
View File

@ -16,14 +16,14 @@
(system-library-subpath)))
(define shared-object-target (build-path shared-object-target-path
(append-extension-suffix "tty-raw-extension")))
(when (not (file-exists? shared-object-target))
(define c-source (build-path private-path "tty-raw-extension.c"))
(define object (build-path shared-object-target-path "tty-raw-extension.o"))
(make-directory* shared-object-target-path)
(compile-extension #f ;; not quiet
c-source
object
'())
(link-extension #f ;; not quiet
(list object)
shared-object-target))))
(when (file-exists? shared-object-target) (delete-file shared-object-target))
(define c-source (build-path private-path "tty-raw-extension.c"))
(define object (build-path shared-object-target-path "tty-raw-extension.o"))
(make-directory* shared-object-target-path)
(compile-extension #f ;; not quiet
c-source
object
'())
(link-extension #f ;; not quiet
(list object)
shared-object-target)))