String ports use UTF-8; ignore %default-port-encoding.

[bpt/guile.git] / benchmark-suite / benchmarks / bytevectors.bm

diff --git a/benchmark-suite/benchmarks/bytevectors.bm b/benchmark-suite/benchmarks/bytevectors.bm
index a686a08..b30bb38 100644 (file)
--- a/benchmark-suite/benchmarks/bytevectors.bm
+++ b/benchmark-suite/benchmarks/bytevectors.bm
@@ -1,8 +1,7 @@
-;;; -*- mode: scheme; coding: latin-1; -*-
+;;; -*- mode: scheme; coding: iso-8859-1; -*-
 ;;; R6RS Byte Vectors.
 ;;;
-;;; Copyright 2009  Ludovic Courtès <ludo@gnu.org>
-;;;
+;;; Copyright 2009, 2010 Free Software Foundation, Inc.
 ;;;
 ;;; This program is free software; you can redistribute it and/or
 ;;; modify it under the terms of the GNU Lesser General Public License
@@ -20,9 +19,9 @@
 ;;; Street, Fifth Floor, Boston, MA 02110-1301 USA
 
 (define-module (benchmarks bytevector)
-  :use-module (rnrs bytevector)
-  :use-module (srfi srfi-4)
-  :use-module (benchmark-suite lib))
+  #:use-module (rnrs bytevectors)
+  #:use-module (srfi srfi-4)
+  #:use-module (benchmark-suite lib))
 
 (define bv (make-bytevector 16384))