| 1 | Index: driver.scm |
|---|
| 2 | =================================================================== |
|---|
| 3 | [0;31m--- driver.scm (revision 23283)[0;0m |
|---|
| 4 | [0;33m+++ driver.scm (working copy)[0;0m |
|---|
| 5 | [1;37m@@ -212,11 +212,10 @@[0;0m |
|---|
| 6 | [0;0m (reverse imports))[0;0m |
|---|
| 7 | [0;0m (if prepare[0;0m |
|---|
| 8 | [0;0m mstore[0;0m |
|---|
| 9 | [0;31m- (when (pair? files)[0;0m |
|---|
| 10 | [0;31m- (if output-file[0;0m |
|---|
| 11 | [0;31m- (with-output-to-file output-file[0;0m |
|---|
| 12 | [0;31m- (cut compile-files state files show))[0;0m |
|---|
| 13 | [0;31m- (compile-files state files show))))))[0;0m |
|---|
| 14 | [0;33m+ (if output-file[0;0m |
|---|
| 15 | [0;33m+ (with-output-to-file output-file[0;0m |
|---|
| 16 | [0;33m+ (cut compile-files state files show))[0;0m |
|---|
| 17 | [0;33m+ (compile-files state files show)))))[0;0m |
|---|
| 18 | [0;0m (('help . _)[0;0m |
|---|
| 19 | [0;0m (spock-help))[0;0m |
|---|
| 20 | [0;0m (('output-file out . more)[0;0m |
|---|
