… | |
… | |
4 | # include <malloc.h> |
4 | # include <malloc.h> |
5 | # include <windows.h> |
5 | # include <windows.h> |
6 | # include <wininet.h> |
6 | # include <wininet.h> |
7 | # pragma warning(disable:4244) |
7 | # pragma warning(disable:4244) |
8 | # pragma warning(disable:4761) |
8 | # pragma warning(disable:4761) |
|
|
9 | #endif |
|
|
10 | |
|
|
11 | //#define DEBUG 1 |
|
|
12 | #if DEBUG |
|
|
13 | # include <valgrind/memcheck.h> |
9 | #endif |
14 | #endif |
10 | |
15 | |
11 | #include "EXTERN.h" |
16 | #include "EXTERN.h" |
12 | #include "perl.h" |
17 | #include "perl.h" |
13 | #include "XSUB.h" |
18 | #include "XSUB.h" |
… | |
… | |
882 | ExitThread (retval); // unclean, please beam me up |
887 | ExitThread (retval); // unclean, please beam me up |
883 | #else |
888 | #else |
884 | _exit (retval); |
889 | _exit (retval); |
885 | #endif |
890 | #endif |
886 | |
891 | |
|
|
892 | void |
|
|
893 | debug () |
|
|
894 | CODE: |
|
|
895 | { |
|
|
896 | #if DEBUG |
|
|
897 | VALGRIND_DO_LEAK_CHECK; |
|
|
898 | #endif |
|
|
899 | } |
|
|
900 | |
887 | MODULE = CFPlus PACKAGE = CFPlus::Font |
901 | MODULE = CFPlus PACKAGE = CFPlus::Font |
888 | |
902 | |
889 | CFPlus::Font |
903 | CFPlus::Font |
890 | new_from_file (SV *class, char *path, int id = 0) |
904 | new_from_file (SV *class, char *path, int id = 0) |
891 | CODE: |
905 | CODE: |
… | |
… | |
2123 | |
2137 | |
2124 | int |
2138 | int |
2125 | volume (int volume = -1) |
2139 | volume (int volume = -1) |
2126 | CODE: |
2140 | CODE: |
2127 | RETVAL = Mix_VolumeMusic (volume); |
2141 | RETVAL = Mix_VolumeMusic (volume); |
|
|
2142 | OUTPUT: |
|
|
2143 | RETVAL |
|
|
2144 | |
|
|
2145 | int |
|
|
2146 | fade_out (int ms) |
|
|
2147 | CODE: |
|
|
2148 | RETVAL = Mix_FadeOutMusic (ms); |
2128 | OUTPUT: |
2149 | OUTPUT: |
2129 | RETVAL |
2150 | RETVAL |
2130 | |
2151 | |
2131 | CFPlus::MixMusic |
2152 | CFPlus::MixMusic |
2132 | new_from_file (SV *class, char *path) |
2153 | new_from_file (SV *class, char *path) |