The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#ifndef DISABLE_MONITOR

MODULE = FLTK               PACKAGE = FLTK::Monitor

=pod

=for license Artistic License 2.0 | Copyright (C) 2009 by Sanko Robinson

=for author Sanko Robinson <sanko@cpan.org> - http://sankorobinson.com/

=for version 0.530

=for git $Id: Monitor.xsi 192e821 2009-09-20 02:23:06Z sanko@cpan.org $

=head1 NAME

FLTK::Monitor -

=head1 Description



=cut

#include <fltk/Monitor.h>

=for apidoc ||FLTK::Rectangle * rect|work||

Allows you to do C<$rect->work->x()>, etc.

=cut

fltk::Rectangle
fltk::Monitor::work( )
    CODE:
        RETVAL = THIS->work;
    OUTPUT:
        RETVAL

=for apidoc ||int depth|depth||



=cut

int
fltk::Monitor::depth( )

=for apidoc ||float x|dpi_x||



=for apidoc ||float y|dpi_y||



=for apidoc ||float y|dpi||

Same as L<C<dpi_y>|FLTK::Monitor/"dpi_y">.

=cut

float
fltk::Monitor::dpi_x( )

float
fltk::Monitor::dpi_y( )

float
fltk::Monitor::dpi( )

=for apidoc ||int count|list|AV * monitors|



=cut

int
fltk::Monitor::list( AV * monitors )
    INIT:
        fltk::Monitor ** _monitors;
        for ( int i = 0; i < av_len(monitors); i++ )
            _monitors[ i ] = (fltk::Monitor *)(av_fetch(monitors, i, 0));
    C_ARGS: ( const fltk::Monitor ** ) _monitors

=for apidoc ||FLTK::Monitor large|all||



=cut

fltk::Monitor
fltk::Monitor::all( )

=for apidoc ||FLTK::Monitor location|find|int x|int y|



=cut

fltk::Monitor
fltk::Monitor::find(int x, int y)

BOOT:
    isa("FLTK::Monitor", "FLTK::Rectangle");

#endif // ifndef DISABLE_MONITOR