diff --git a/collects/tests/racket/embed-me1.rkt b/collects/tests/racket/embed-me1.rkt index 7e2bb11748..65f7030bb1 100644 --- a/collects/tests/racket/embed-me1.rkt +++ b/collects/tests/racket/embed-me1.rkt @@ -1,5 +1,5 @@ (module embed-me1 mzscheme (with-output-to-file "stdout" - (lambda () (printf "This is 1~n")) + (lambda () (printf "This is 1\n")) 'append)) diff --git a/collects/tests/racket/embed-me1b.rkt b/collects/tests/racket/embed-me1b.rkt index 5af91026b6..5c2ae8fce6 100644 --- a/collects/tests/racket/embed-me1b.rkt +++ b/collects/tests/racket/embed-me1b.rkt @@ -4,6 +4,6 @@ (for-syntax scheme/base)) (define-runtime-path file '(lib "icons/file.gif")) (with-output-to-file "stdout" - (lambda () (printf "This is 1b~n")) + (lambda () (printf "This is 1b\n")) #:exists 'append) diff --git a/collects/tests/racket/embed-me1c.rkt b/collects/tests/racket/embed-me1c.rkt index 067c8ad230..70c8a943c8 100644 --- a/collects/tests/racket/embed-me1c.rkt +++ b/collects/tests/racket/embed-me1c.rkt @@ -4,6 +4,6 @@ (for-syntax scheme/base)) (define-runtime-path file '(lib "etc.ss")) ; in mzlib (with-output-to-file "stdout" - (lambda () (printf "This is 1c~n")) + (lambda () (printf "This is 1c\n")) #:exists 'append) diff --git a/collects/tests/racket/embed-me1d.rkt b/collects/tests/racket/embed-me1d.rkt index cc6b750193..7bc3cd2149 100644 --- a/collects/tests/racket/embed-me1d.rkt +++ b/collects/tests/racket/embed-me1d.rkt @@ -4,5 +4,5 @@ (for-syntax scheme/base)) (define-runtime-path file '(lib "file.gif" "icons")) (with-output-to-file "stdout" - (lambda () (printf "This is 1d~n")) + (lambda () (printf "This is 1d\n")) #:exists 'append) diff --git a/collects/tests/racket/embed-me1e.rkt b/collects/tests/racket/embed-me1e.rkt index 645df59905..8ad79cff45 100644 --- a/collects/tests/racket/embed-me1e.rkt +++ b/collects/tests/racket/embed-me1e.rkt @@ -4,5 +4,5 @@ (for-syntax scheme/base)) (define-runtime-path file '(lib "html")) (with-output-to-file "stdout" - (lambda () (printf "This is 1e~n")) + (lambda () (printf "This is 1e\n")) #:exists 'append) diff --git a/collects/tests/racket/embed-me2.rkt b/collects/tests/racket/embed-me2.rkt index 53abb21299..0e4d9481dd 100644 --- a/collects/tests/racket/embed-me2.rkt +++ b/collects/tests/racket/embed-me2.rkt @@ -2,8 +2,5 @@ (require "embed-me1.ss" mzlib/etc) (with-output-to-file "stdout" - (lambda () (printf "This is 2: ~a~n" true)) + (lambda () (printf "This is 2: ~a\n" true)) 'append)) - - - diff --git a/collects/tests/racket/embed.rktl b/collects/tests/racket/embed.rktl index 457f2ea6b4..f959ec7031 100644 --- a/collects/tests/racket/embed.rktl +++ b/collects/tests/racket/embed.rktl @@ -37,7 +37,7 @@ (mk-dest-bin #t))) (define (prepare exe src) - (printf "Making ~a with ~a...~n" exe src) + (printf "Making ~a with ~a...\n" exe src) (when (file-exists? exe) (delete-file exe)))