diff options
| author | Jörg Frings-Fürst <debian@jff.email> | 2025-03-22 18:00:25 +0100 |
|---|---|---|
| committer | Jörg Frings-Fürst <debian@jff.email> | 2025-03-22 18:00:25 +0100 |
| commit | 0737819efdd0bae112d16d874cac7e747e43cd08 (patch) | |
| tree | 98a9ac84f7f347ae530c14852c68870682f3d04c /lib/uniname/gen-uninames.lisp | |
| parent | 163a663518f33bab48b28431972e580b366b4d49 (diff) | |
| parent | e670957a8693f860cf7d77fed4ce6b4b056a8083 (diff) | |
Merge branch 'release/debian/1.3-1'debian/1.3-1
Diffstat (limited to 'lib/uniname/gen-uninames.lisp')
| -rwxr-xr-x | lib/uniname/gen-uninames.lisp | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/uniname/gen-uninames.lisp b/lib/uniname/gen-uninames.lisp index 1b0c60cf..30191f2e 100755 --- a/lib/uniname/gen-uninames.lisp +++ b/lib/uniname/gen-uninames.lisp @@ -1,6 +1,7 @@ -#!/usr/local/bin/clisp -C +#!/usr/bin/env -S clisp -C -;;; Creation of gnulib's uninames.h from the UnicodeData.txt table. +;;; Creation of gnulib's uninames.h from the UnicodeData.txt and NameAliases.txt +;;; tables. ;;; Copyright (C) 2000-2024 Free Software Foundation, Inc. ;;; Written by Bruno Haible <bruno@clisp.org>, 2000-12-28. @@ -48,8 +49,8 @@ length ; number of words ) -(defun main (inputfile outputfile aliasfile) - (declare (type string inputfile outputfile aliasfile)) +(defun main (inputfile aliasfile outputfile) + (declare (type string inputfile aliasfile outputfile)) #+UNICODE (setq *default-file-encoding* charset:utf-8) (let ((all-chars '()) (all-chars-hashed (make-hash-table :test #'equal)) |