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

SCM Repository

[sml3d] Diff of /trunk/sml3d/src/base/opengl/gl-sig.sml
ViewVC logotype

Diff of /trunk/sml3d/src/base/opengl/gl-sig.sml

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

revision 411, Wed Jan 21 20:17:55 2009 UTC revision 412, Wed Jan 21 20:19:23 2009 UTC
# Line 228  Line 228 
228      val fogEnd : float -> unit      val fogEnd : float -> unit
229      val fogHint : hint -> unit      val fogHint : hint -> unit
230    
 (* texture stuff moved to TEXTURE signature  
   (* texture and multitexture support *)  
     eqtype texture_unit  
     val TEXTURE0 : texture_unit  
     val TEXTURE1 : texture_unit  
     val TEXTURE2 : texture_unit  
     val TEXTURE3 : texture_unit  
     val TEXTURE4 : texture_unit  
     val TEXTURE5 : texture_unit  
     val TEXTURE6 : texture_unit  
     val TEXTURE7 : texture_unit  
     val TEXTURE8 : texture_unit  
     val TEXTURE9 : texture_unit  
     val TEXTURE10 : texture_unit  
     val TEXTURE11 : texture_unit  
     val TEXTURE12 : texture_unit  
     val TEXTURE13 : texture_unit  
     val TEXTURE14 : texture_unit  
     val TEXTURE15 : texture_unit  
     val TEXTURE16 : texture_unit  
     val TEXTURE17 : texture_unit  
     val TEXTURE18 : texture_unit  
     val TEXTURE19 : texture_unit  
     val TEXTURE20 : texture_unit  
     val TEXTURE21 : texture_unit  
     val TEXTURE22 : texture_unit  
     val TEXTURE23 : texture_unit  
     val TEXTURE24 : texture_unit  
     val TEXTURE25 : texture_unit  
     val TEXTURE26 : texture_unit  
     val TEXTURE27 : texture_unit  
     val TEXTURE28 : texture_unit  
     val TEXTURE29 : texture_unit  
     val TEXTURE30 : texture_unit  
     val TEXTURE31 : texture_unit  
     val texture : int -> texture_unit  
     val activeTexture : texture_unit -> unit  
     val getActiveTexture : unit -> texture_unit  
     val maxTextureCoords : unit -> int  
     val maxTextureUnits : unit -> int  
   
     eqtype texture_target  
     val TEXTURE_1D              : texture_target  
     val TEXTURE_2D              : texture_target  
     val TEXTURE_3D              : texture_target  
     val TEXTURE_CUBE_MAP        : texture_target  
   
     eqtype texture_id  
     val genTexture              : unit -> texture_id  
     val genTextures             : int -> texture_id list  
     val deleteTextures          : texture_id list -> unit  
     val bindTexture             : texture_target * texture_id -> unit  
   
     eqtype min_filter  
     val NEAREST                 : min_filter  
     val LINEAR                  : min_filter  
     val NEAREST_MIPMAP_NEAREST  : min_filter  
     val LINEAR_MIPMAP_NEAREST   : min_filter  
     val NEAREST_MIPMAP_LINEAR   : min_filter  
     val LINEAR_MIPMAP_LINEAR    : min_filter  
   
     eqtype mag_filter  
     val MAG_NEAREST     : mag_filter  
     val MAG_LINEAR      : mag_filter  
   
     eqtype texture_wrap  
     val CLAMP           : texture_wrap  
     val CLAMP_TO_BORDER : texture_wrap  
     val CLAMP_TO_EDGE   : texture_wrap  
     val MIRRORED_REPEAT : texture_wrap  
     val REPEAT          : texture_wrap  
   
     eqtype tex_coord  
     val S_COORD : tex_coord  
     val T_COORD : tex_coord  
     val R_COORD : tex_coord  
     val Q_COORD : tex_coord  
   
     eqtype tex_gen_mode  
     val OBJECT_LINEAR   : tex_gen_mode  
     val EYE_LINEAR      : tex_gen_mode  
     val SPHERE_MAP      : tex_gen_mode  
     val NORMAL_MAP      : tex_gen_mode  
     val REFLECTION_MAP  : tex_gen_mode  
   
     val enableTexture           : texture_target -> unit  
     val disableTexture          : texture_target -> unit  
     val enableTexGen            : tex_coord -> unit  
     val disableTexGen           : tex_coord -> unit  
     val texMinFilter            : texture_target * min_filter -> unit  
     val texMagFilter            : texture_target * mag_filter -> unit  
     val texWrapS                : texture_target * texture_wrap -> unit  
     val texWrapT                : texture_target * texture_wrap -> unit  
     val texWrapR                : texture_target * texture_wrap -> unit  
     val texGenMode              : tex_coord * tex_gen_mode -> unit  
     val texGenObjectPlanef      : (tex_coord * float * float * float * float) -> unit  
     val texGenObjectPlaned      : (tex_coord * double * double * double * double) -> unit  
     val texGenEyePlanef         : (tex_coord * float * float * float * float) -> unit  
     val texGenEyePlaned         : (tex_coord * double * double * double * double) -> unit  
 (* TODO:  
     val getTexGenMode           : tex_coord -> tex_gen_mode  
     val texImage1D              : ??  
     val texImageProxy1D         : ??  
     val texImage2D              : ??  
     val texImageProxy2D         : ??  
     val texImage3D              : ??  
     val texImageProxy3D         : ??  
 *)  
 *)  
   
231    (* misc. state changes *)    (* misc. state changes *)
232      val cullFace : face -> unit      val cullFace : face -> unit
233      val pointSize : float -> unit      val pointSize : float -> unit

Legend:
Removed from v.411  
changed lines
  Added in v.412

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