Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /branches/vis12-cl/src/compiler/cl-target/cl-names.sml
ViewVC logotype

Diff of /branches/vis12-cl/src/compiler/cl-target/cl-names.sml

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

revision 2713, Sun Sep 21 14:33:32 2014 UTC revision 2724, Tue Sep 23 21:07:21 2014 UTC
# Line 2  Line 2 
2   *   *
3   * COPYRIGHT (c) 2013 The Diderot Project (http://diderot-language.cs.uchicago.edu)   * COPYRIGHT (c) 2013 The Diderot Project (http://diderot-language.cs.uchicago.edu)
4   * All rights reserved.   * All rights reserved.
5     *
6     * These are names used in the generated OpenCL code.
7   *)   *)
8    
9  structure CLNames =  structure CLNames =
# Line 65  Line 67 
67      fun matTy (n, m) = concat["Diderot_Mat", Int.toString n, "x", Int.toString m, "_t"]      fun matTy (n, m) = concat["Diderot_Mat", Int.toString n, "x", Int.toString m, "_t"]
68    
69    (* host-side names for OpenCL types *)    (* host-side names for OpenCL types *)
70      fun shadowIntTy () = "cl_int"       (* QUESTION: should this be precision dependent? *)      fun shadowIntTy () = "Shadow_int_t"
71      fun shadowRealTy () = "Shadow_real_t"      fun shadowRealTy () = "Shadow_real_t"
72      fun shadowVecTy n = F.format "Shadow_vec%d_t" [F.INT n]      fun shadowVecTy n = F.format "Shadow_vec%d_t" [F.INT n]
73      fun shadowMatTy (m, n) = F.format "Shadow_Mat%dx%d_t" [F.INT m, F.INT n]      fun shadowMatTy (m, n) = F.format "Shadow_Mat%dx%d_t" [F.INT m, F.INT n]
# Line 75  Line 77 
77      val shadowGlaobalsName = "shadowGlobals"      val shadowGlaobalsName = "shadowGlobals"
78      fun convertToShadowVec n = "ShadowVec" ^ Int.toString n      fun convertToShadowVec n = "ShadowVec" ^ Int.toString n
79      fun convertToShadowMat (m,n) = F.format "ShadowMat%dx%d" [F.INT m, F.INT n]      fun convertToShadowMat (m,n) = F.format "ShadowMat%dx%d" [F.INT m, F.INT n]
   (*GPU side image data types and functions *)  
     val imageDataType = "Diderot_data_ptr_t"  
     val globalImageDataName = "diderotDataPtrs"  
     fun imageDataName name = name ^ "Data"  
80    
81    (* names of generated types, functions, and globals *)    (* names of generated types, functions, and globals *)
82      val initGlobals = "Diderot_InitGlobals"     (* function for initializing program globals *)      val initGlobals = "Diderot_InitGlobals"     (* function for initializing program globals *)

Legend:
Removed from v.2713  
changed lines
  Added in v.2724

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