1 files changed, 0 insertions, 50 deletions
diff --git a/src/glx/apple/gen_code.tcl b/src/glx/apple/gen_code.tcl
deleted file mode 100644
index bb38d9f1c97..00000000000
--- a/src/glx/apple/gen_code.tcl
+++ /dev/null
@@ -1,50 +0,0 @@
-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]