diff options
author | IOhannes m zmölnig <zmoelnig@umlautQ.umlaeute.mur.at> | 2016-12-12 14:18:23 +0100 |
---|---|---|
committer | IOhannes m zmölnig <zmoelnig@umlautQ.umlaeute.mur.at> | 2016-12-12 14:18:23 +0100 |
commit | 0b84e302c3cc5e4456ca13b292750f0ae63406bc (patch) | |
tree | 35db47e955fedf352e6cbdc2ac8a46936e5703b3 /binary-io.scm | |
parent | 776255b6ac4c65cafad6a4d5f03380895d31ea96 (diff) |
New upstream version 17.0
Diffstat (limited to 'binary-io.scm')
-rw-r--r-- | binary-io.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/binary-io.scm b/binary-io.scm index 6f5bba5..2f27536 100644 --- a/binary-io.scm +++ b/binary-io.scm @@ -239,7 +239,7 @@ (lambda () (let ((magic (read-chars))) (if (not (string=? magic ".snd")) - (error 'bad-header "~A is not an au file: ~A" file) + (error 'bad-header "~A is not an au file" file) (let* ((data-location (read-bint32)) (data-size (read-bint32)) (sample-type (read-bint32)) |