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

SCM Repository

[diderot] Diff of /branches/lamont/src/compiler/c-util/gen-load-nrrd.sml
ViewVC logotype

Diff of /branches/lamont/src/compiler/c-util/gen-load-nrrd.sml

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

revision 2297, Fri Mar 15 22:05:31 2013 UTC revision 2298, Fri Mar 15 22:18:22 2013 UTC
# Line 62  Line 62 
62                          | lp (i, d::dd, init) =                          | lp (i, d::dd, init) =
63                              lp(i+1, dd, (i, CL.I_Exp(CL.mkInt(IntInf.fromInt d)))::init)                              lp(i+1, dd, (i, CL.I_Exp(CL.mkInt(IntInf.fromInt d)))::init)
64                        val dimInit = CL.mkDecl(                        val dimInit = CL.mkDecl(
65                              CL.T_Ptr(CL.T_Named "unsigned int"), "_dims",                              CL.T_Array(CL.T_Named "unsigned int", SOME nDims), "_dims",
66                              SOME(lp(0, dims, [])))                              SOME(lp(0, dims, [])))
67                        in                        in
68                          (nDims, [dimInit], CL.mkVar "_dims", Ty.TensorTy[])                          (nDims, [dimInit], CL.mkVar "_dims", Ty.TensorTy[])

Legend:
Removed from v.2297  
changed lines
  Added in v.2298

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