1;; unicode 2 3;;;; Copyright (C) 2014 Free Software Foundation, Inc. 4;;;; 5;;;; This library is free software: you can redistribute it and/or modify 6;;;; it under the terms of the GNU Lesser General Public License as 7;;;; published by the Free Software Foundation, either version 3 of the 8;;;; License, or (at your option) any later version. 9;;;; 10;;;; This library is distributed in the hope that it will be useful, 11;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of 12;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13;;;; GNU Lesser General Public License for more details. 14;;;; 15;;;; You should have received a copy of the GNU Lesser General Public 16;;;; License along with this library. If not, see 17;;;; <http://www.gnu.org/licenses/>. 18;;;; 19 20(define-module (ice-9 unicode) 21 #:export (formal-name->char 22 char->formal-name)) 23 24(eval-when (expand load eval) 25 (load-extension (string-append "libguile-" (effective-version)) 26 "scm_init_unicode")) 27