From 4682deeb62247d34de87f8e777f99e2d337fd377 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=B6rg=20Frings-F=C3=BCrst?= Date: Sun, 20 Oct 2024 15:21:43 +0200 Subject: New upstream version 1.3 --- lib/uniname/gen-uninames.lisp | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'lib/uniname/gen-uninames.lisp') 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 , 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)) -- cgit v1.2.3