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 1383, Sat Apr 5 04:41:20 2014 UTC revision 1384, Sat Apr 5 05:17:20 2014 UTC
# Line 81  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.1383  
changed lines
  Added in v.1384

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