aboutsummaryrefslogtreecommitdiff
path: root/lib/cmark/tools/mkcasefold.pl
diff options
context:
space:
mode:
authorFelix (xq) Queißner <git@mq32.de>2020-06-09 18:27:38 +0200
committerFelix (xq) Queißner <git@mq32.de>2020-06-09 18:27:38 +0200
commitde8fd9328e9deb0d1ec596d7486686ea3cb688c2 (patch)
tree9c25d7568dee522c1d2ed7b6d238d1dad54163f6 /lib/cmark/tools/mkcasefold.pl
parent661ddc244793102ee0720871c4edcd64f80bc744 (diff)
downloadkristall-de8fd9328e9deb0d1ec596d7486686ea3cb688c2.tar.gz
Includes cmark markdown parser library.
Diffstat (limited to 'lib/cmark/tools/mkcasefold.pl')
-rwxr-xr-xlib/cmark/tools/mkcasefold.pl22
1 files changed, 22 insertions, 0 deletions
diff --git a/lib/cmark/tools/mkcasefold.pl b/lib/cmark/tools/mkcasefold.pl
new file mode 100755
index 0000000..740ce77
--- /dev/null
+++ b/lib/cmark/tools/mkcasefold.pl
@@ -0,0 +1,22 @@
+binmode STDOUT;
+print(" switch (c) {\n");
+my $lastchar = "";
+while (<STDIN>) {
+ if (/^[A-F0-9]/ and / [CF]; /) {
+ my ($char, $type, $subst) = m/([A-F0-9]+); ([CF]); ([^;]+)/;
+ if ($char eq $lastchar) {
+ break;
+ }
+ my @subst = $subst =~ m/(\w+)/g;
+ printf(" case 0x%s:\n", $char);
+ foreach (@subst) {
+ printf(" bufpush(0x%s);\n", $_);
+ }
+ printf(" break;\n");
+ $lastchar = $char;
+ }
+}
+printf(" default:\n");
+printf(" bufpush(c);\n");
+print(" }\n");
+