src/librarian/font-optimizer/ext/Font-TTF/lib/Font/TTF/Kern/CompactClassArray.pm

   1 package Font::TTF::Kern::CompactClassArray;
   2
   3 =head1 NAME
   4
   5 Font::TTF::Kern::CompactClassArray - Compact Class Array kern subtable for AAT
   6
   7 =head1 METHODS
   8
   9 =cut
  10
  11 use strict;
  12 use vars qw(@ISA);
  13 use Font::TTF::Utils;
  14 use Font::TTF::AATutils;
  15
  16 @ISA = qw(Font::TTF::Kern::Subtable);
  17
  18 sub new
  19 {
  20     my ($class) = @_;
  21     my ($self) = {};
  22
  23     $class = ref($class) || $class;
  24     bless $self, $class;
  25 }
  26
  27 =head2 $t->read
  28
  29 Reads the table into memory
  30
  31 =cut
  32
  33 sub read
  34 {
  35     my ($self, $fh) = @_;
  36
  37     die "incomplete";
  38
  39     $self;
  40 }
  41
  42 =head2 $t->out($fh)
  43
  44 Writes the table to a file
  45
  46 =cut
  47
  48 sub out_sub
  49 {
  50     my ($self, $fh) = @_;
  51
  52     die "incomplete";
  53
  54     $self;
  55 }
  56
  57 =head2 $t->print($fh)
  58
  59 Prints a human-readable representation of the table
  60
  61 =cut
  62
  63 sub print
  64 {
  65     my ($self, $fh) = @_;
  66
  67     my $post = $self->post();
  68
  69     $fh = 'STDOUT' unless defined $fh;
  70
  71     die "incomplete";
  72 }
  73
  74
  75 sub type
  76 {
  77     return 'kernCompactClassArray';
  78 }
  79
  80
  81 1;
  82
  83 =head1 BUGS
  84
  85 None known
  86
  87 =head1 AUTHOR
  88
  89 Jonathan Kew L<Jonathan_Kew@sil.org>. See L<Font::TTF::Font> for copyright and
  90 licensing.
  91
  92 =cut
  93