lib/SDL/SFont.pm

   1 # SDL::OpenGL.pm
   2 #
   3 #       SFont bitmat font support
   4 #
   5 #       Copyright (C) 2004 David J. Goehrig
   6
   7 package SDL::SFont;
   8
   9 require Exporter;
  10 require DynaLoader;
  11 use vars qw(
  12         @EXPORT
  13         @ISA
  14 );
  15 @ISA=qw(Exporter DynaLoader);
  16
  17 use SDL;
  18
  19 BEGIN {
  20
  21 };
  22
  23 sub SDL_TEXTWIDTH {
  24         return SDL::SFont::TextWidth(join('',@_));
  25 }
  26
  27
  28 bootstrap SDL::SFont;
  29
  30 1;
  31
  32 __END__;
  33
  34 =pod
  35
  36
  37
  38 =head1 NAME
  39
  40 SDL::SFont - a perl extension
  41
  42 =head1 DESCRIPTION
  43
  44
  45
  46 =head1 AUTHOR
  47
  48 David J. Goehrig
  49
  50 =head1 SEE ALSO
  51
  52 L<perl> L<SDL::App>
  53
  54 =cut