diff options
| author | Bryan Newbold <bnewbold@robocracy.org> | 2017-02-20 00:05:37 -0800 |
|---|---|---|
| committer | Bryan Newbold <bnewbold@robocracy.org> | 2017-02-20 00:05:37 -0800 |
| commit | 710a97992705d67c3ded0d4b270c5978ce29b11f (patch) | |
| tree | ddcb2f7a91cbb86ce582e74227768b7b898c29e1 /requires.scm | |
| parent | 50eb784bfcf15ee3c6b0b53d747db92673395040 (diff) | |
| download | scm-955168ab5c534b63c9e15a33f468b4750f6c1007.tar.gz scm-955168ab5c534b63c9e15a33f468b4750f6c1007.zip | |
Import Upstream version 5e4upstream/5e4
Diffstat (limited to 'requires.scm')
| -rw-r--r-- | requires.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/requires.scm b/requires.scm index cad8db0..3703bf9 100644 --- a/requires.scm +++ b/requires.scm @@ -2,12 +2,12 @@ (define library-vicinity (let* ((vl (case (software-type) - ((AMIGA) '(#\: #\/)) - ((MS-DOS WINDOWS ATARIST OS/2) '(#\\ #\/)) - ((MACOS THINKC) '(#\:)) - ((NOSVE) '(#\: #\.)) - ((UNIX COHERENT PLAN9) '(#\/)) - ((VMS) '(#\: #\])))) + ((amiga) '(#\: #\/)) + ((ms-dos windows atarist os/2) '(#\\ #\/)) + ((macos thinkc) '(#\:)) + ((nosve) '(#\: #\.)) + ((unix coherent plan9) '(#\/)) + ((vms) '(#\: #\])))) (iv (implementation-vicinity)) (vc (and (positive? (string-length iv)) (string-ref iv (+ -1 (string-length iv))))) |