Overview
Comment: | updated ducttape-lib to fix incompatibilities with megatest |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | v1.63-xor-report |
Files: | files | file ages | folders |
SHA1: |
f792807bb9c595d3abf41dcea5079006 |
User & Date: | bjbarcla on 2017-02-01 16:03:57 |
Other Links: | branch diff | manifest | tags |
Context
2017-02-03
| ||
15:48 | caught up with v1.6306 check-in: 938f9d5e38 user: bjbarcla tags: v1.63-xor-report | |
2017-02-01
| ||
16:03 | updated ducttape-lib to fix incompatibilities with megatest check-in: f792807bb9 user: bjbarcla tags: v1.63-xor-report | |
16:01 | updated ducttape-lib to fix incompatibilities with megatest check-in: ffa2b8e7af user: bjbarcla tags: v1.63-xor-report | |
Changes
Modified ducttape/test_ducttape.scm from [5a04bd5130] to [337f613f00].
1 2 3 4 5 6 7 8 9 10 11 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 | - + - + - + - + - + - + - + | #!/usr/bin/env csi -script (use test) (include "ducttape-lib.scm") (import ducttape-lib) (import ansi-escape-sequences) (use trace) (set! systype (do-or-die (if (file-exists? "/bin/uname") "/bin/uname" "/usr/bin/uname"))) ;(trace skim-cmdline-opts-withargs-by-regex) ;(trace keyword-skim) ;(trace re-match?) (define (reset-ducttape) |
︙ | |||
132 133 134 135 136 137 138 | 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 | - + | (let-values (((ec o e) (isys "/bin/ls /zzzzz"))) (let ((expected-code (if (equal? systype "Darwin") 1 2)) (expected-err (if (equal? systype "Darwin") "ls: /zzzzz: No such file or directory" |
︙ |