Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: 4f2676de2a
Fetching contributors…

Cannot retrieve contributors at this time

99 lines (85 sloc) 2.37 kb
#
# 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'
require 'matrix'
include Gl
include Glut
Gl.enable_error_checking
$window_size = 512
def glut_init()
display_func = lambda do
raise
end
glutInit
glutInitDisplayMode(GLUT_DEPTH | GLUT_DOUBLE | GLUT_RGBA | GLUT_STENCIL | GLUT_ACCUM | GLUT_ALPHA)
glutInitWindowPosition(1, 1)
glutInitWindowSize($window_size, $window_size)
glutCreateWindow("test")
# hack the need to call glutMainLoop on some implementations
glutDisplayFunc(display_func)
begin
glutMainLoop()
rescue
# continue
end
end
def approx_equal(a,b,epsilon=0.01)
(0...a.size).each do |i|
if ((a[i] - b[i]).abs > epsilon)
return false
end
end
true
end
def common_setup
if $glut_initialized == nil
glut_init()
$glut_initialized = true
end
glPushAttrib(GL_ALL_ATTRIB_BITS)
glPushClientAttrib(GL_CLIENT_ALL_ATTRIB_BITS)
glMatrixMode(GL_MODELVIEW)
glLoadIdentity()
glMatrixMode(GL_PROJECTION)
glLoadIdentity()
glClearColor(0,0,0,0)
glClear(GL_COLOR_BUFFER_BIT)
end
def common_teardown
glPopAttrib()
glPopClientAttrib()
glRenderMode(GL_RENDER)
# in case there is an GL error that escaped error checking routines ...
error = glGetError()
p gluErrorString(error) if (error!=0)
assert_equal(error,0)
end
def supported?(funcs)
Array(funcs).each do |name| # convert to array if it isn't already
if !Gl.is_available?(name)
puts ""
print "#{name} not supported, test skipped"
return false
end
end
return true
end
Jump to Line
Something went wrong with that request. Please try again.