Home My Page Projects Code Snippets Project Openings 3D graphics for Standard ML
Summary Activity SCM

SCM Repository

[sml3d] Diff of /trunk/sml3d/gen/gen-from-xml/glgen/gen-consts.sml
ViewVC logotype

Diff of /trunk/sml3d/gen/gen-from-xml/glgen/gen-consts.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1379, Fri Apr 4 23:40:39 2014 UTC revision 1384, Sat Apr 5 05:17:20 2014 UTC
# Line 26  Line 26 
26            \ * COPYRIGHT (c) %4d The SML3d Project (http://sml3d.cs.uchicago.edu)\n\            \ * COPYRIGHT (c) %4d The SML3d Project (http://sml3d.cs.uchicago.edu)\n\
27            \ * All rights reserved.\n\            \ * All rights reserved.\n\
28            \ *\n\            \ *\n\
29            \ * These are the OpenGL constants taken from %s.\n\            \ * These are the OpenGL constants taken from %s, which has the following\n\
30              \ * copyright notice:\n\
31              \ *\n\
32              \ * Copyright (c) 2013-2014 The Khronos Group Inc.\n\
33              \ *\n\
34              \ * Permission is hereby granted, free of charge, to any person obtaining a\n\
35              \ * copy of this software and/or associated documentation files (the\n\
36              \ * \"Materials\"), to deal in the Materials without restriction, including\n\
37              \ * without limitation the rights to use, copy, modify, merge, publish,\n\
38              \ * distribute, sublicense, and/or sell copies of the Materials, and to\n\
39              \ * permit persons to whom the Materials are furnished to do so, subject to\n\
40              \ * the following conditions:\n\
41              \ *\n\
42              \ * The above copyright notice and this permission notice shall be included\n\
43              \ * in all copies or substantial portions of the Materials.\n\
44              \ *\n\
45              \ * THE MATERIALS ARE PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND,\n\
46              \ * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF\n\
47              \ * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.\n\
48              \ * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY\n\
49              \ * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,\n\
50              \ * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE\n\
51              \ * MATERIALS OR THE USE OR OTHER DEALINGS IN THE MATERIALS.\n\
52            \ *\n\            \ *\n\
53            \ * WARNING: this file is generated; do not edit!!!\n\            \ * WARNING: this file is generated; do not edit!!!\n\
54            \ *)\n\            \ *)\n\
# Line 59  Line 81 
81                              if Atom.same(ty, a_GLint) then (true, "glint")                              if Atom.same(ty, a_GLint) then (true, "glint")
82                              else if Atom.same(ty, a_GLenum) then (false, "glenum")                              else if Atom.same(ty, a_GLenum) then (false, "glenum")
83                              else if Atom.same(ty, a_GLuint) then (false, "gluint")                              else if Atom.same(ty, a_GLuint) then (false, "gluint")
84                              else if Atom.same(ty, a_GLuint64) then (false, "glint64")                              else if Atom.same(ty, a_GLuint64) then (false, "gluint64")
85                              else raise Fail "unknown C type"                              else raise Fail "unknown C type"
86                          | _ => raise Fail "unknown C type"                          | _ => raise Fail "unknown C type"
87                        (* end case *))                        (* end case *))

Legend:
Removed from v.1379  
changed lines
  Added in v.1384

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0