Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
emacs
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
1
Issues
1
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Operations
Operations
Incidents
Environments
Packages & Registries
Packages & Registries
Container Registry
Analytics
Analytics
CI / CD
Repository
Value Stream
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
emacs
emacs
Commits
f106f9b0
Commit
f106f9b0
authored
May 20, 2003
by
Kenichi Handa
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
*** empty log message ***
parent
7da4427d
Changes
4
Hide whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
26 additions
and
116 deletions
+26
-116
etc/ChangeLog
etc/ChangeLog
+14
-0
etc/charsets/README
etc/charsets/README
+0
-1
etc/charsets/gb18030.awk
etc/charsets/gb18030.awk
+0
-115
src/ChangeLog
src/ChangeLog
+12
-0
No files found.
etc/ChangeLog
View file @
f106f9b0
2003-04-12 Kenichi Handa <handa@m17n.org>
* charsets/Makefile (MAPS): Change gb18030.map to gb18030-2.map
and gb18030-4.map.
(gb18030.map): Delete this target.
(gb18030-2.map, gb18030-4.map): New targets.
* charsets/gb18030.awk: Deleted.
* charsets/gb18030-2.awk, charsets/gb18030-4.awk: Make them work
for the map file included int glibc.
* charsets/gb18030-2.map, charsets/gb18030-4.map: Remade by them.
2003-04-12 Kenichi Handa <handa@m17n.org>
* HELLO: Change "Hindi" to more common characters.
...
...
etc/charsets/README
View file @
f106f9b0
...
...
@@ -73,7 +73,6 @@ MACINTOSH mac-roman.map mac-roman
VISCII viscii.map viscii
VISCII viscii-lower.map vietnamese-viscii-lower
VISCII viscii-upper.map vietnamese-viscii-upper
VISCII vscii.map vscii
KOI8-R koi8-r.map koi8-r
IBM866 ibm866.map alternativnyj
CP1251 windows-1251.map windows-1251
...
...
etc/charsets/gb18030.awk
deleted
100644 → 0
View file @
7da4427d
BEGIN
{
tohex
[
"A"
]
=
10
;
tohex
[
"B"
]
=
11
;
tohex
[
"C"
]
=
12
;
tohex
[
"D"
]
=
13
;
tohex
[
"E"
]
=
14
;
tohex
[
"F"
]
=
15
;
tohex
[
"a"
]
=
10
;
tohex
[
"b"
]
=
11
;
tohex
[
"c"
]
=
12
;
tohex
[
"d"
]
=
13
;
tohex
[
"e"
]
=
14
;
tohex
[
"f"
]
=
15
;
}
function
decode_hex
(
str
)
{
n
=
0
;
len
=
length
(
str
);
for
(
i
=
1
;
i
<=
len
;
i
++
)
{
c
=
substr
(
str
,
i
,
1
);
if
(
c
>=
"0"
&&
c
<=
"9"
)
n
=
n
*
16
+
(
c
-
"0"
);
else
n
=
n
*
16
+
tohex
[
c
];
}
return
n
;
}
function
gb_to_index
(
b0
,
b1
,
b2
,
b3
)
{
return
((((
b0
-
129
)
*
10
+
(
b1
-
48
))
*
126
+
(
b2
-
129
))
*
10
+
b3
-
48
);
}
function
index_to_gb
(
idx
)
{
b3
=
(
idx
%
10
)
+
48
;
idx
/=
10
;
b2
=
(
idx
%
126
)
+
129
;
idx
/=
126
;
b1
=
(
idx
%
10
)
+
48
;
b0
=
(
idx
/
10
)
+
129
;
return
sprintf
(
"%02X%02X%02X%02X"
,
b0
,
b1
,
b2
,
b3
);
}
function
decode_gb
(
str
)
{
b0
=
decode_hex
(
substr
(
str
,
3
,
2
));
b1
=
decode_hex
(
substr
(
str
,
7
,
2
));
b2
=
decode_hex
(
substr
(
str
,
11
,
2
));
b3
=
decode_hex
(
substr
(
str
,
15
,
2
));
return
gb_to_index
(
b0
,
b1
,
b2
,
b3
);
}
function
printline
(
from
,
to
)
{
fromgb
=
index_to_gb
(
from
);
fromuni
=
gbtable
[
from
];
if
(
from
==
to
)
printf
(
"0x%s U+%04X\n"
,
fromgb
,
fromuni
);
else
printf
(
"0x%s-0x%s U+%04X-U+%04X\n"
,
fromgb
,
index_to_gb
(
to
),
fromuni
,
fromuni
+
(
to
-
from
));
}
/^<U
[
0-9A-F
][
0-9A-F
][
0-9A-F
][
0-9A-F
]
>/
{
unicode
=
decode_hex
(
substr
(
$1
,
3
,
4
));
if
(
$2
~
/
\\
x8
[
1-4
]\\
x3
[
0-9
]\\
x
[
8-9A-F
][
0-9A-F
]\\
x3
[
0-9
]
/
)
unitable
[
unicode
]
=
decode_gb
(
$2
);
else
unitable
[
unicode
]
=
-
1
;
}
END
{
lastgb
=
0
;
surrogate_min
=
decode_hex
(
"D800"
);
surrogate_max
=
decode_hex
(
"DFFF"
);
lastgb
=
unitable
[
128
];
gbtable
[
lastgb
]
=
128
;
for
(
i
=
129
;
i
<
65536
;
i
++
)
{
if
(
unitable
[
i
]
==
0
&&
(
i
<
surrogate_min
||
i
>
surrogate_max
))
{
lastgb
++
;
gbtable
[
lastgb
]
=
i
;
unitable
[
i
]
=
lastgb
;
}
else
if
(
unitable
[
i
]
>
0
)
{
lastgb
=
unitable
[
i
];
gbtable
[
lastgb
]
=
i
;
}
}
fromgb
=
lastgb
=
unitable
[
128
];
for
(
i
=
129
;
i
<
65536
;
i
++
)
{
if
(
unitable
[
i
]
>
0
)
{
if
(
lastgb
+
1
==
unitable
[
i
])
{
lastgb
++
;
}
else
{
if
(
lastgb
>=
0
)
printline
(
fromgb
,
lastgb
);
fromgb
=
lastgb
=
unitable
[
i
];
}
}
else
# i.e. (unitable[i] < 0)
{
if
(
lastgb
>=
0
)
printline
(
fromgb
,
lastgb
);
lastgb
=
-
1
;
}
}
printline
(
fromgb
,
unitable
[
65535
]);
}
src/ChangeLog
View file @
f106f9b0
2003-05-20 Kenichi Handa <handa@m17n.org>
* fontset.c (BASE_FONTSET_P): Check FONTSET_BASE, not
FONTSET_NAME.
(fontset_add): Fix for the case that TO is less than TO1.
(Ffontset_info): Don't use fallback fontset on checking the
default fontset.
(dump_fontset): New function for debugging.
* coding.c (Fdefine_coding_system_internal): Fix for the case that
coding_type is Qcharset.
2003-05-07 Kenichi Handa <handa@m17n.org>
* chartab.c (map_sub_char_table): New argument DEFAULT_VAL.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment