kReplaced by AWK script.
authordrepper <drepper>
Mon, 15 Jun 1998 18:08:47 +0000 (18:08 +0000)
committerdrepper <drepper>
Mon, 15 Jun 1998 18:08:47 +0000 (18:08 +0000)
iconvdata/gap.pl [deleted file]

diff --git a/iconvdata/gap.pl b/iconvdata/gap.pl
deleted file mode 100644 (file)
index 2a06adc..0000000
+++ /dev/null
@@ -1,16 +0,0 @@
-$first=$last=$idx=0;
-while (<>) {
-  local($ucs,$rest) = split;
-  local($u)=hex($ucs);
-  if ($u - $last > 6) {
-    if ($last != 0) {
-      printf ("  { start: 0x%04x, end: 0x%04x, idx: %5d },\n",
-             $first, $last, $idx);
-      $idx -= $u - $last - 1;
-    }
-    $first=$u;
-  }
-  $last=$u;
-}
-printf ("  { start: 0x%04x, end: 0x%04x, idx: %5d },\n",
-       $first, $last, $idx);