rename all files .ss -> .rkt

original commit: 28b4043077
This commit is contained in:
Matthew Flatt 2010-04-27 16:05:36 -06:00
commit 0fcf163a4d
32 changed files with 8 additions and 8 deletions

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require scheme/cmdline
rico/command-name
raco/command-name
compiler/zo-parse
compiler/decompile
scheme/pretty)

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require scheme/cmdline
rico/command-name
raco/command-name
compiler/distribute)
(define verbose (make-parameter #f))

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require scheme/cmdline
rico/command-name
raco/command-name
compiler/private/embed
dynext/file)

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require scheme/cmdline
rico/command-name
raco/command-name
scheme/pretty)
(define source-files

View File

@ -1,6 +1,6 @@
#lang setup/infotab
(define rico
(define raco-commands
'(("make" compiler/commands/make "compile source to bytecode" 100)
("exe" compiler/commands/exe "create executable" 20)
("pack" compiler/commands/pack "pack files/collections into a .plt archive" 10)

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require scheme/cmdline
rico/command-name
raco/command-name
compiler/cm
"../compiler.ss"
dynext/file)

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require scheme/cmdline
rico/command-name
raco/command-name
setup/pack
setup/getinfo
compiler/distribute)

View File

@ -185,7 +185,7 @@
(hash-update! errors (common-message exn) add1 0)
(unless (and (not (care-about-nonserious?)) (not serious?))
(when (or (verbose-mode) (stop-on-first-error))
(printf "~a -- ~a: ~a~n" file phase (exn-message exn)))
(fprintf (current-error-port) "~a -- ~a: ~a~n" file phase (exn-message exn)))
(when (stop-on-first-error)
exn)))