Skip to content

Commit 932dbb9

Browse files
committed
Fix the install script for Windows.
1 parent f2d98dc commit 932dbb9

File tree

1 file changed

+5
-5
lines changed

1 file changed

+5
-5
lines changed

rosette/private/install.rkt

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -45,16 +45,16 @@
4545
(define (get-z3-url)
4646
(define site "https://github.com/Z3Prover/z3/releases/download")
4747
(define version "z3-4.8.8")
48-
(define os
48+
(define-values (os exe)
4949
(match (list (system-type) (system-type 'word))
50-
['(unix 64) "x64-ubuntu-16.04"]
51-
[`(macosx ,_) "x64-osx-10.14.6"]
52-
['(windows 64) "x64-win"]
50+
['(unix 64) (values "x64-ubuntu-16.04" "z3")]
51+
[`(macosx ,_) (values "x64-osx-10.14.6" "z3")]
52+
['(windows 64) (values "x64-win" "z3.exe")]
5353
[any (raise-user-error 'get-z3-url "Unknown system type '~a'" any)]))
5454
(define name (format "~a-~a" version os))
5555
(values
5656
(format "~a/~a/~a.zip" site version name)
57-
(format "~a/bin/z3" name)))
57+
(format "~a/bin/~a" name exe)))
5858

5959

6060
;; A copy of net/url's get-pure-port/headers, except with the Location header

0 commit comments

Comments
 (0)