Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-03 19:26:36 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Handling case when impl version can't be detected.

Browse source
This commit is contained in:
Alex Shinn 2015-05-08 07:24:02 +09:00
parent 9688f01afd
commit 5b6ca8e760
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lib/chibi/snow/commands.scm
View file

@ -33,8 +33,11 @@
(let ((msg (let ((msg
(string-append (string-append
"Implementation " (symbol->string (car spec)) "Implementation " (symbol->string (car spec))
" is an unsupported version, " version ", but" (if (string? version)
" at least " (fourth spec) " is required."))) (string-append " is an unsupported version, "
version)
" is an unknown version")
", but at least " (fourth spec) " is required.")))
(cond (cond
(confirm? (confirm?
(yes-or-no? cfg msg " Install anyway?")) (yes-or-no? cfg msg " Install anyway?"))