1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
|
#
# Copyright (C) 2007 Jan Dvorak <jan.dvorak@kraxnet.cz>
#
# This program is distributed under the terms of the MIT license.
# See the included MIT-LICENSE file for the terms of this license.
#
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
# OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
# IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
# CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
# TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
# SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
#
if __FILE__ == $0
# If we are being called from the command line, e.g., ruby foo.rb, then
# fixup the load path so we can find the OpenGL extension libs
$: << File.join(File.dirname(__FILE__), '..', 'lib')
end
require 'test/unit'
require 'gl'
require 'glut'
include Gl
include Glut
class Test_misc < Test::Unit::TestCase
def setup
return if $glut_initialized
glut_init()
$glut_initialized = true
end
def test_isavailable
assert_equal(is_available?(1.1),true)
assert_equal(is_available?("GL_ARB_multitexture"),true)
assert_equal(is_available?("GL_NON_EXISTENT"),false)
end
def test_errorchecking
Gl.disable_error_checking
assert_equal(Gl.is_error_checking_enabled?,false)
Gl.enable_error_checking
assert_equal(Gl.is_error_checking_enabled?,true)
begin
glEnable(0)
rescue Gl::Error => err
assert_equal(err.id,GL_INVALID_ENUM)
else
assert(false) # error not detected
end
end
end
|
