… | |
… | |
2392 | void glDeleteTexture (int name) |
2392 | void glDeleteTexture (int name) |
2393 | CODE: |
2393 | CODE: |
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 *)(size_t)name); |
2399 | av_push (texture_av, (SV *)(size_t)name); |
2400 | /*glDeleteTextures (1, &name_);*/ |
2400 | /*{ GLuint name_ = name; glDeleteTextures (1, &name_); }*/ |
2401 | } |
2401 | } |
2402 | |
2402 | |
2403 | int glGenList () |
2403 | int glGenList () |
2404 | CODE: |
2404 | CODE: |
2405 | RETVAL = glGenLists (1); |
2405 | RETVAL = glGenLists (1); |