From ad503c41557606d15b0420c824369456f6d20a8f Mon Sep 17 00:00:00 2001 From: Jeremy Huddleston Date: Thu, 1 Apr 2010 11:01:31 -0700 Subject: apple: Initial import of libGL for OSX from AppleSGLX svn repository. Signed-off-by: Jeremy Huddleston --- src/glx/apple/gen_code.tcl | 50 ++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 50 insertions(+) create mode 100644 src/glx/apple/gen_code.tcl (limited to 'src/glx/apple/gen_code.tcl') diff --git a/src/glx/apple/gen_code.tcl b/src/glx/apple/gen_code.tcl new file mode 100644 index 00000000000..bb38d9f1c97 --- /dev/null +++ b/src/glx/apple/gen_code.tcl @@ -0,0 +1,50 @@ +if 0 { + Copyright (c) 2008 Apple Inc. + + Permission is hereby granted, free of charge, to any person + obtaining a copy of this software and associated documentation files + (the "Software"), to deal in the Software without restriction, + including without limitation the rights to use, copy, modify, merge, + publish, distribute, sublicense, and/or sell copies of the Software, + and to permit persons to whom the Software is furnished to do so, + subject to the following conditions: + + The above copyright notice and this permission notice shall be + included in all copies or substantial portions of the Software. + + 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 ABOVE LISTED COPYRIGHT + HOLDER(S) 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. + + Except as contained in this notice, the name(s) of the above + copyright holders shall not be used in advertising or otherwise to + promote the sale, use or other dealings in this Software without + prior written authorization. +} + +package require Tcl 8.5 + +proc main {} { + set tclsh [info nameofexecutable] + + puts TYPES + exec $tclsh ./gen_types.tcl stage.1 + puts DEFS + exec $tclsh ./gen_defs.tcl specs/enum.spec stage.2 + puts FUNCS + exec $tclsh ./gen_funcs.tcl specs/gl.spec stage.3 stage.4 + puts HEADER + exec $tclsh ./gen_api_header.tcl stage.4 apple_xgl_api.h + puts "C API" + exec $tclsh ./gen_api_library.tcl stage.4 apple_xgl_api.c + puts "EXPORTS" + exec $tclsh ./gen_exports.tcl stage.4 exports.list + + return 0 +} +exit [main] -- cgit v1.2.3