%% %% This is file `se-utf32le.def', %% generated with the docstrip utility. %% %% The original source files were: %% %% stringenc.dtx (with options: `utf32,utf32le') %% %% This is a generated file. %% %% Copyright (C) 2007, 2008 by Heiko Oberdiek %% %% This work may be distributed and/or modified under the %% conditions of the LaTeX Project Public License, either %% version 1.3 of this license or (at your option) any later %% version. The latest version of this license is in %% http://www.latex-project.org/lppl.txt %% and version 1.3 or later is part of all distributions of %% LaTeX version 2005/12/01 or later. %% %% This work has the LPPL maintenance status "maintained". %% %% This Current Maintainer of this work is Heiko Oberdiek. %% %% This work consists of the main source file stringenc.dtx %% and the derived files %% stringenc.sty, stringenc.pdf, stringenc.ins, stringenc.drv, %% se-utf32be.def, se-utf32le.def, se-utf8.def, se-utf16le.def, %% se-pdfdoc.def, se-iso-8859-1.def, se-cp1252.def, %% se-ascii.def, se-iso-8859-2.def, se-iso-8859-3.def, %% se-iso-8859-4.def, se-iso-8859-5.def, se-iso-8859-6.def, %% se-iso-8859-7.def, se-iso-8859-8.def, se-iso-8859-9.def, %% se-iso-8859-10.def, se-iso-8859-11.def, se-iso-8859-13.def, %% se-iso-8859-14.def, se-iso-8859-15.def, se-iso-8859-16.def, %% se-koi8-r.def, se-nextstep.def, se-mac-centeuro.def, %% se-mac-cyrillic.def, se-mac-roman.def, se-dec-mcs.def, %% se-cp437.def, se-cp850.def, se-cp852.def, se-cp855.def, %% se-cp858.def, se-cp865.def, se-cp866.def, se-cp1250.def, %% se-cp1251.def, se-cp1257.def, stringenc-test1.tex, %% stringenc-test2.tex. %% \ProvidesFile{se-utf32le.def}[2008/10/27 v1.6 stringenc: UTF-32LE] \expandafter\gdef\csname\SE@PrefixTo utf32le\endcsname#1#2#3#4{% \SE@ResultAdd{#3#4#1#20000}% } \expandafter\gdef\csname\SE@PrefixSurrogateTo utf32le\endcsname #1#2#3#4#5#6#7#8{% \edef\SE@w{\SE@Nibble@NumToBin{"#2}}% \edef\SE@a{\SE@Nibble@NumToBin{"#3}}% \edef\SE@c{\SE@Nibble@NumToBin{"#6}}% \edef\SE@w{% \expandafter\SE@GobbleTwo\SE@w \expandafter\SE@CarTwo\SE@a\@nil }% \edef\SE@w{% \SE@Nibbles@BinToHex\SE@w }% \SE@Add\SE@w{\expandafter"\SE@w}\SE@one \edef\SE@a{% \expandafter\SE@GobbleTwo\SE@a \SE@Nibble@NumToBin{"#4}% \expandafter\SE@GobbleTwo\SE@c }% \SE@utfxxxii@le@add{% 00% \ifnum\SE@w>15 % 10% \else 0% \SE@Nibble@NumToHex\SE@w \fi \SE@Nibbles@BinToHex\SE@a #7#8% }% } \gdef\SE@utfxxxii@le@add#1{% \edef\SE@temp{#1}% \SE@ResultAdd{% \expandafter\SE@utfxxxii@le@switch\SE@temp }% } \gdef\SE@utfxxxii@le@switch#1#2#3#4#5#6#7#8{% #7#8#5#6#3#4#1#2% } \expandafter\gdef\csname\SE@PrefixFrom utf32le\endcsname#1{% \expandafter\SE@utfxxxii@le@from#1\relax\relax\relax\relax \relax\relax\relax\relax } \gdef\SE@utfxxxii@le@from#1#2#3#4#5#6#7#8{% \ifx#1\relax \let\SE@next\relax \else \ifx#8\relax \let\SE@next\relax \SE@InvalidCharacter \else \let\SE@next\SE@utfxxxii@le@from \SE@utfxxxii@from#7#8#5#6#3#4#1#2% \fi \fi \SE@next } \gdef\SE@utfxxxii@from#1#2#3#4#5#6#7#8{% \ifcase\ifnum"#1#2>\z@ \SE@zero \else \ifnum"#3#4#5#6#7#8>"10FFFF % \SE@zero \else \ifnum"#3#4#5#6#7#8<"D800 % \SE@one \else \ifnum"#3#4#5#6#7#8>"DFFF % \SE@one \else \SE@zero \fi \fi \fi \fi \SE@InvalidCharacter \ifSE@TestMode \let\SE@next\SE@SkipRemaining \fi \else \ifcase"#3#4 % \SE@ResultAdd{#5#6#7#8}% \else \edef\SE@low{\SE@Nibble@NumToBin{"#6}}% \SE@Add\SE@high{"#3#4}{-1}% \edef\SE@high{% 10\SE@Nibble@NumToBin\SE@high \SE@Nibble@NumToBin{"#5}% \expandafter\SE@CarTwo\SE@low\@nil }% \edef\SE@low{% 11\expandafter\SE@GobbleTwo\SE@low }% \SE@ResultAdd{% D\SE@Nibbles@BinToHex\SE@high D\SE@Nibbles@BinToHex\SE@low #7#8% }% \fi \fi } \endinput %% %% End of file `se-utf32le.def'.