projects / sdlgit/SDL_perl.git / blame
| Commit | Line | Data |
|---|---|---|
| df4106bf | 1 | #!/usr/bin/perl -w |
| 2 | BEGIN { | |
| 3 | unshift @INC, 'blib/lib','blib/arch'; | |
| 4 | } | |
| 5 | ||
| 6 | use strict; | |
| 7 | use SDL; | |
| 8 | use SDL::Config; | |
| 9 | ||
| 10 | use Test::More; | |
| 11 | ||
| 12 | plan ( tests => 2 ); | |
| 13 | ||
| 14 | use_ok( 'SDL::Video' ); | |
| 15 | ||
| 16 | can_ok ('SDL::Video', qw/ | |
| 17 | get_video_surface | |
| 18 | get_video_info | |
| 19 | video_driver_name | |
| 20 | list_modes | |
| 21 | video_mode_ok | |
| 22 | set_video_mode | |
| 23 | update_rect | |
| 24 | update_rects | |
| 25 | flip | |
| 26 | set_colors | |
| 27 | set_palette | |
| 28 | set_gamma | |
| 29 | get_gamma_ramp | |
| 30 | set_gmmma_ramp | |
| 31 | map_RGB | |
| 32 | map_RGBA | |
| 33 | get_RGB | |
| 34 | get_RGBA | |
| 35 | create_RGB_surface_from | |
| 36 | lock_surface | |
| 37 | unlock_surface | |
| 38 | convert_surface | |
| 39 | display_format | |
| 40 | display_format_alpha | |
| 41 | load_BMP | |
| 42 | save_BMP | |
| 43 | set_color_key | |
| 44 | set_alpha | |
| 45 | set_clip_rect | |
| 46 | get_clip_rect | |
| 47 | blit_surface | |
| 48 | fill_rect | |
| 49 | GL_load_library | |
| 50 | GL_get_proc_address | |
| 51 | GL_get_attribute | |
| 52 | GL_set_attribute | |
| 53 | GL_swap_buffers | |
| 54 | GL_attr | |
| df4106bf | 55 | lock_YUV_overlay |
| 56 | unlock_YUV_overlay | |
| 57 | display_YUV_overlay | |
| df4106bf | 58 | /); |
| 59 |