123456789101112131415161718192021222324252627 |
- ;; unicode
- ;;;; Copyright (C) 2014 Free Software Foundation, Inc.
- ;;;;
- ;;;; This library is free software: you can redistribute it and/or modify
- ;;;; it under the terms of the GNU Lesser General Public License as
- ;;;; published by the Free Software Foundation, either version 3 of the
- ;;;; License, or (at your option) any later version.
- ;;;;
- ;;;; This library 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 Lesser General Public License for more details.
- ;;;;
- ;;;; You should have received a copy of the GNU Lesser General Public
- ;;;; License along with this library. If not, see
- ;;;; <http://www.gnu.org/licenses/>.
- ;;;;
- (define-module (ice-9 unicode)
- #:export (formal-name->char
- char->formal-name))
- (eval-when (expand load eval)
- (load-extension (string-append "libguile-" (effective-version))
- "scm_init_unicode"))
|