From a9a31b1de5776a3b08a82101a4fa711294f0dd1d Mon Sep 17 00:00:00 2001 From: "Manuel A. Fernandez Montecelo" Date: Fri, 27 May 2016 14:28:30 +0100 Subject: Imported Upstream version 0.9.6+really0.9.3 --- lib/unictype/joiningtype_byname.c | 63 --------------------------------------- 1 file changed, 63 deletions(-) delete mode 100644 lib/unictype/joiningtype_byname.c (limited to 'lib/unictype/joiningtype_byname.c') diff --git a/lib/unictype/joiningtype_byname.c b/lib/unictype/joiningtype_byname.c deleted file mode 100644 index 6208e194..00000000 --- a/lib/unictype/joiningtype_byname.c +++ /dev/null @@ -1,63 +0,0 @@ -/* Arabic joining type of Unicode characters. - Copyright (C) 2011-2015 Free Software Foundation, Inc. - Written by Bruno Haible , 2011. - - This program 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 program 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 program. If not, see . */ - -#include - -/* Specification. */ -#include "unictype.h" - -#include - -#include "unictype/joiningtype_byname.h" - -int -uc_joining_type_byname (const char *joining_type_name) -{ - size_t len; - - len = strlen (joining_type_name); - if (len <= MAX_WORD_LENGTH) - { - char buf[MAX_WORD_LENGTH + 1]; - const struct named_joining_type *found; - - /* Copy joining_type_name into buf, converting '_' and '-' to ' '. */ - { - const char *p = joining_type_name; - char *q = buf; - - for (;; p++, q++) - { - char c = *p; - - if (c == '_' || c == '-') - c = ' '; - *q = c; - if (c == '\0') - break; - } - } - /* Here q == buf + len. */ - - /* Do a hash table lookup, with case-insensitive comparison. */ - found = uc_joining_type_lookup (buf, len); - if (found != NULL) - return found->joining_type; - } - /* Invalid joining type name. */ - return -1; -} -- cgit v1.2.3