From 76a7fa1bede6b97b38d2e69cfa4166c66c64ece4 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 6 May 2009 19:53:32 +0000 Subject: [PATCH] add version to libGL reference svn: r14732 --- collects/sgl/gl.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/sgl/gl.ss b/collects/sgl/gl.ss index 3be4084225..8f377ae9ae 100644 --- a/collects/sgl/gl.ss +++ b/collects/sgl/gl.ss @@ -10,11 +10,11 @@ (define gl-lib (case stype [(windows) (ffi-lib "opengl32")] [(macosx) (ffi-lib "/System/Library/Frameworks/OpenGL.framework/Versions/A/Libraries/libGL")] - [else (ffi-lib "libGL")])) + [else (ffi-lib "libGL" '("1" ""))])) (define glu-lib (case stype [(windows) (ffi-lib "glu32")] [(macosx) (ffi-lib "/System/Library/Frameworks/OpenGL.framework/Versions/A/Libraries/libGLU")] - [else (ffi-lib "libGLU")])) + [else (ffi-lib "libGLU" '("1" ""))])) (define (unavailable name) (lambda () (lambda x (error name "unavailable on this system"))))