X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fencoding.scm;h=a35be6c391ce44ffc871fe5c15533a18a170751a;hb=refs%2Fheads%2Fbugs%2F567849;hp=d500c0c270b20c9f6302bd9ee8e9579961f5d298;hpb=7f65b882cf00bdc468eef1f2517161b56e3a3851;p=lilypond.git diff --git a/scm/encoding.scm b/scm/encoding.scm index d500c0c270..a35be6c391 100644 --- a/scm/encoding.scm +++ b/scm/encoding.scm @@ -1,8 +1,19 @@ -;;;; encoding.scm -- font encoding +;;;; This file is part of LilyPond, the GNU music typesetter. ;;;; -;;;; source file of the GNU LilyPond music typesetter +;;;; Copyright (C) 2004--2011 Jan Nieuwenhuizen ;;;; -;;;; (c) 2004--2008 Jan Nieuwenhuizen +;;;; LilyPond is free software: you can redistribute it and/or modify +;;;; it under the terms of the GNU General Public License as published by +;;;; the Free Software Foundation, either version 3 of the License, or +;;;; (at your option) any later version. +;;;; +;;;; LilyPond is distributed in the hope that it will be useful, +;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;;; GNU General Public License for more details. +;;;; +;;;; You should have received a copy of the GNU General Public License +;;;; along with LilyPond. If not, see . (define-public latin1-coding-vector #(.notdef .notdef .notdef .notdef .notdef .notdef .notdef .notdef @@ -48,7 +59,7 @@ (define-public (decode-byte-string str) "Return vector of glyphname symbols that correspond to string, -assuming that STR is byte-coded using ENCODING-NAME." +assuming that @var{str} is byte-coded using latin-1 encoding." (let* ((len (string-length str)) (output-vector (make-vector len '.notdef)))