| … | |
… | |
| 2379 | int glGenTexture () |
2379 | int glGenTexture () |
| 2380 | CODE: |
2380 | CODE: |
| 2381 | { |
2381 | { |
| 2382 | GLuint name; |
2382 | GLuint name; |
| 2383 | if (AvFILL (texture_av) >= 0) |
2383 | if (AvFILL (texture_av) >= 0) |
| 2384 | name = (GLuint)av_pop (texture_av); |
2384 | name = (GLuint)(size_t)av_pop (texture_av); |
| 2385 | else |
2385 | else |
| 2386 | glGenTextures (1, &name); |
2386 | glGenTextures (1, &name); |
| 2387 | RETVAL = name; |
2387 | RETVAL = name; |
| 2388 | } |
2388 | } |
| 2389 | OUTPUT: |
2389 | OUTPUT: |
| … | |
… | |
| 2394 | { |
2394 | { |
| 2395 | /* make a half-assed attempt at returning the memory used by the texture */ |
2395 | /* make a half-assed attempt at returning the memory used by the texture */ |
| 2396 | /* textures are frequently being reused by cfplus anyway */ |
2396 | /* textures are frequently being reused by cfplus anyway */ |
| 2397 | glBindTexture (GL_TEXTURE_2D, name); |
2397 | glBindTexture (GL_TEXTURE_2D, name); |
| 2398 | glTexImage2D (GL_TEXTURE_2D, 0, GL_ALPHA, 0, 0, 0, GL_ALPHA, GL_UNSIGNED_BYTE, 0); |
2398 | glTexImage2D (GL_TEXTURE_2D, 0, GL_ALPHA, 0, 0, 0, GL_ALPHA, GL_UNSIGNED_BYTE, 0); |
| 2399 | av_push (texture_av, (SV *)name); |
2399 | av_push (texture_av, (SV *)(size_t)name); |
| 2400 | /*glDeleteTextures (1, &name_);*/ |
2400 | /*glDeleteTextures (1, &name_);*/ |
| 2401 | } |
2401 | } |
| 2402 | |
2402 | |
| 2403 | int glGenList () |
2403 | int glGenList () |
| 2404 | CODE: |
2404 | CODE: |
