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

SCM Repository

[sml3d] Diff of /trunk/sml3d/src/opencl/cl-sizes_sml.in
ViewVC logotype

Diff of /trunk/sml3d/src/opencl/cl-sizes_sml.in

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

revision 1199, Sun Jul 17 13:51:24 2011 UTC revision 1200, Sun Jul 17 13:54:56 2011 UTC
# Line 4  Line 4 
4   * All rights reserved.   * All rights reserved.
5   *   *
6   * @configure_input@   * @configure_input@
7   *)   *
8     * For each cl_* type, the corresponding struct contains information
 (* for each cl_* type, the corresponding struct contains information  
9   * about its size, alignment, etc.   * about its size, alignment, etc.
10   *)   *
11  signature CL_TYPE_SIZE =   *    type t
12    sig   *    val name : string
13      type t   *    val size : arity -> {szb : CSize.t, algn : CSize.t}
14      val name : string                           (* the OpenCL type name for this type *)   *    val get : CPtr.t * CPtrDiff.t -> t
15      val info : {szb : CSize.t, align : CSize.t},(* size and aligment in bytes *)   *    val set : CPtr.t * CPtrDiff.t * t -> unit
16      val get : CPtr.t * CPtrDiff.t -> t          (* get(p, i) returns p[i] *)   *
17      val set : CPtr.t * CPtrDiff.t * t -> unit   (* set(p, i, v) sets p[i] to v *)   * TODO:
18    end   *      cl_half
   
 (* scalar types:  
         cl_char/cl_uchar  
         cl_short/cl_ushort  
         cl_int/cl_uint  
         cl_long/cl_ulong  
         cl_float  
         cl_double               -- not all implementations  
         cl_half  
   
    vector types (where ty is a scalar type, but not cl_half):  
         ty2  
         ty3                     -- OpenCL 1.1 or later  
         ty4  
         ty8  
         ty16  
19   *)   *)
20    
21  structure CL_Char = Int@BITSOF_CL_CHAR@  structure CL_Char = Int@BITSOF_CL_CHAR@

Legend:
Removed from v.1199  
changed lines
  Added in v.1200

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